Данные строкового типа
End Sub
End Function
End Sub
'Функция вычисления суммы n элементов массива m.
'Формальные параметры: n – количество элементов массива,m - массив
Private Function Sum(n As Integer, m) As Integer
Dim i As Integer
Sum = 0
For i = 0 To n - 1
Sum = Sum + m(i)
Next i
Private Sub Command1_Click()
Dim i As Integer
n = Val(Text1.Text) 'Количество элементов массивов
ReDim a(n) 'Задание количества элементов массива a
ReDim b(n) ' Задание количества элементов массива b
'Обращение к процедуре. Фактические параметры: промежуток [-10,10], n – количество 'элементов массива, x - массив
Vd -10, 10, n, x
Vd -5, 5, n, y
'Вычисление значения результата. Sum(n, a) – обращение к функции. Фактические 'параметры: n – количество 'элементов массива, a - массив
Text3.Text = Str(Sum(n, x)* Sum(n, y) / (Sum(n, x)+
Sum(n, y)))
Здесь дважды вызывается процедура
Vd(a As Integer,b As Integer,n As Integer, x)
заполнения массива случайными числами. Первый раз в нее передаются фактические значения для формальных параметров a, b и n соответственно равные –10, 10, n, при этом результат сохраняется как значение переменной массива x. Во второй раз передаются значения параметров –5, 5, n, а результат сохраняется как значение переменной массива y. Функция Sum(n As Integer, x) As Integer вызывается в операторе присваивания при вычислении искомого значения S.
В реальных задачах часто встречаются объекты символьного типа – строки. Строка трактуется как последовательность символов. В состав строки могут входить буквы латинского алфавита, кириллица, цифры, всевозможные знаки, скобки, пробел и др. Каждый символ строки занимает 1 байт памяти (десятичный код от 0 до 255, зафиксированный в кодовой таблице ASCII).
Фрагмент таблицы символьной кодировки ASCII
Количество символов в строке называется ее длиной. Пустая строка имеет нулевую длину.
Строковая константа – последовательность символов, заключенных в двойные кавычки. Например:
”Это строковая константа”, ”123”.
Таким образом, при использовании в выражениях строка обязательно заключается в кавычки.
Два следующих друг за другом апострофа (””), обозначают пустую строку, т.е. строку с нулевой длиной.
Различают строки переменной и фиксированной длины. Строки переменной длины могут иметь длину до 2 Гбайт. Когда такой переменной присваивается значение, то размер переменной изменяется так, чтобы он соответствовал длине присвоенного строкового значения. Строка фиксированной длины – это строка постоянного размера, указанного при объявлении переменной. Если такой строке присваивается более длинное значение, то лишние символы отбрасываются, а если более короткое значение, то оставшееся справа место заполняется пробелами. Строковые переменные фиксированной длины должны объявляться явно.
Формат описания строковой переменой переменной длины:
Dim Имя_строки As String |
Формат описания строковой переменой фиксированной длины:
Dim Имя_строки As String*Длина строки |
Например:
Dim Name As String*20
Dim St As string