Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.79/19: Рейтинг темы: голосов - 19, средняя оценка - 4.79
1 / 1 / 0
Регистрация: 07.06.2012
Сообщений: 212

Как вызвать функцию

11.07.2012, 18:37. Показов 4040. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Скажите не получается вызвать функцию myFunction ,делаю всё как написано вот тут
http://www.sd-company.su/article/vba/functions

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
Public Class Form1
   
    Function myFunction(ByVal j As Integer) As Double
        Dim r As Double
        r = 3.87 * j
        myFunction = r
 
 
    End Function
 
    Dim val1 As Double
    myFunction(1)
End Class
Добавлено через 21 минуту
Ругается последней строкой ,я не очень понимаю зачем во всех примерах которые я видел делать сохранение значения в переменную из функции .
Почему только такой потход?

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
Public Class Form1
   
    Function myFunction(ByVal j As Integer) As Double
        Dim r As Double
        r = 3.87 * j
        myFunction = r
 
 
    End Function
 
    Dim val1 As Double = myFunction(1)
MsgBox(val1)
End Class
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
11.07.2012, 18:37
Ответы с готовыми решениями:

Как вызвать функцию?
Всем привет. Ребят, туплю что то. Есть функция для отображения списка компов в сети. Friend Shared Function DomainComputers()...

Как на Page_Load() вызвать JavaScript-овскую функцию?
Попытка вставить в файле *.aspx <body onLoad='MyFunc()'> к успеху не приводит. А как это сделать в Page_Load()в файле *.vb?

Как вызвать функцию с параметрами в отдельном потоке
Всем привет. Есть такой код: Imports System.Threading.Thread Public Class Form1 Dim N, f, n1 As Integer Dim f1 As Long ...

8
 Аватар для Юпатов Дмитрий
1721 / 1208 / 228
Регистрация: 23.12.2010
Сообщений: 1,544
11.07.2012, 18:51
это твой код. в нем функция вызывается ВНЕ какой либо процедуры. а должна в процедуре или функции. именно на это и ругается студия
0
1 / 1 / 0
Регистрация: 07.06.2012
Сообщений: 212
11.07.2012, 20:53  [ТС]
Юпатов Дмитрий, в контексте какой продцедуры?
ТОлько внутри sub, а вне контеста какойлибо процедуры или функции можно вызвать мою функцию?
0
290 / 271 / 107
Регистрация: 10.06.2011
Сообщений: 696
11.07.2012, 22:11
нет, нельзя
0
 Аватар для Юпатов Дмитрий
1721 / 1208 / 228
Регистрация: 23.12.2010
Сообщений: 1,544
11.07.2012, 22:17
Цитата Сообщение от saladd Посмотреть сообщение
ТОлько внутри sub
угу, или в теле самой себя (рекурсия) или другой Function
0
1 / 1 / 0
Регистрация: 07.06.2012
Сообщений: 212
13.07.2012, 19:49  [ТС]
Скажите ,а в каких случаях среда Visual подчёркивает слово
VB.NET
1
End Function
0
233 / 223 / 146
Регистрация: 19.03.2012
Сообщений: 369
13.07.2012, 20:47
Если так, как на картинке? То это когда переменная объявлена но не использована. Еще когда ошибка.
Изображения
 
0
290 / 271 / 107
Регистрация: 10.06.2011
Сообщений: 696
13.07.2012, 21:41
Цитата Сообщение от saladd Посмотреть сообщение
Скажите ,а в каких случаях среда Visual подчёркивает слово
VB.NET
1
End Function
наведи мышку на подчеркивание и напиши какая ошибка, мы не экстрасенсы
0
 Аватар для Юпатов Дмитрий
1721 / 1208 / 228
Регистрация: 23.12.2010
Сообщений: 1,544
13.07.2012, 22:13
Скорее всего, функции не возвращается значение. Нет строки
VB.NET
1
Return переменная_с_результатом_работы_функции
отсюда подчеркивание и подсказка при наведении: "Функция "имя_функции" возвращает значение не для всех ветвей кода. Во время выполнения может произойти исключение при ссылке на значение NULL". Или строка есть, но в одной из ветвей, а если условие не выполняется, то и результат не вернется:
VB.NET
1
2
3
4
5
6
Function пример() As String
        Dim s As String
        If s = "" Then
            Return "1"
        End If
    End Function
тут End Function будет подчеркнуто...
А тут нет:
VB.NET
1
2
3
4
5
6
7
8
Function пример() As String
        Dim s As String
        If s = "" Then
            Return "1"
        Else
            Return "1"
        End If
    End Function
и тут нет:
VB.NET
1
2
3
4
5
6
7
8
9
Function пример() As String
        Dim s As String
        If s = "" Then
            s = "1"
        Else
            s = "0"
        End If
        Return s
    End Function
Прошу текст функций рассматривать только как некую абстрактную структуру, не задумываясь о смысле ее кода
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
13.07.2012, 22:13
Помогаю со студенческими работами здесь

Как во второй форме вызвать процедуру или функцию созданную в первой форме
Короче создал первую форму, в ней процедуру. Потом создал вторую форму и хотел в ней вызвать процедуру созданную в первой форме, но забыл...

Как правильно вызвать функцию с указателем на другую функцию как параметр
Вот вариант: double f(double x) { ... } double k(double (*f)(double), double y) { ...

Как правильно передать вектор в функцию и вызвать эту функцию?
Здравствуйте, объясните как исправить ошибку. Возникает после for(), выдается, что размер polygon = 0. Вот так функции объявлены в классе: ...

Как в функцию main вызвать функцию из другого .c файла
Здравствуйте. Я написал программу, которая в функцию main вызывает функцию из другого .c файла, но выводит ошибку undefined reference to...

Как вы думаете, можно ли из основной ветки программы вызвать функцию, вложенную в другую функцию? Почему?
В языке Python можно внутри одной функции определять другую. Напишите программу по следующему описанию. В основной ветке программы...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru