Приложение: hello.rar
Занятие 27.1.1. Создание и вызов пользовательских функций
Вспомним:
если определенный кусок кода в программе очень часто используется, его можно записать в функцию, и писать не весь код, а только одно слово (имя функции).
Синтаксис:
Function Имя функции(ByVal Имя переменной As Тип) As Тип Код End Function |
Сейчас мы сделаем простейшую функцию, которая будет вызываться при нажатии на кнопку.
На форме установите текстовое поле, надпись и две кнопки.
Function Hello(ByVal myname As String) As String 'Объявляем функцию с именем Hello, в скобках объявляем переменную 'myname'(если нужно использовать еще переменные, то их надо объявлять через запятую), после скобок следует тип, который будет принимать функция
Hello = myname & "- hello!!!" ' Значение функции Hello равно значению текстового поля(переменная myname) + текст
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = Hello(TextBox1.Text) ' Текстовое поле равно значению функции Hello
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Text = ""
Label1.Text = ""
End Sub