Как создать функцию

Функции используются для операций, которые возвращают значение.
Они имеют возвращаемый тип, который должен быть объявлен.
Вы можете объявить параметры, которые будут передаваться в функцию при вызове.

Программа

Вначале вы можете ввести число в текстовое поле (TextField).
Если щелкнуть по клавише, первая этикетка покажет текст "Hello",
а вторая покажет произведение вашего числа и пяти.

Код:

Fmain.class

STATIC PUBLIC SUB Main()
DIM hForm AS Fmain
hForm = NEW Fmain
hForm.show
END

PUBLIC SUB Button1_Click()
Label1.Text=sayHello()
Label2.Text=timesFive(TextBox1.Text)
'the parameter of the function is declared as
'Integer, but it works if the input is
'like a integer number
'or use CInt()
END

PUBLIC FUNCTION sayHello() AS String
'the returntype is String
  word AS String
word = "Hello"
RETURN word
END

PUBLIC FUNCTION timesFive(x AS Integer) AS Integer
RETURN x * 5
END

Исходник

Download