Нажав на кнопку CommandButton1 содержимое полей должны записываться в процедуру и сохраняться в массиве - VB

Узнай цену своей работы

Формулировка задачи:

Дана форма(на скрине). Нажав на кнопку CommandButton1 содержимое полей должны записываться в процедуру и сохраняться в массиве. Помогите, в чём ошибки?

Решение задачи: «Нажав на кнопку CommandButton1 содержимое полей должны записываться в процедуру и сохраняться в массиве»

textual
Листинг программы
Option Explicit
Dim Op(1 To 2) As Double
 
Private Sub Options()
    Op(1) = Val(Replace(TextBox1.Text, ",", "."))
    Op(2) = Val(Replace(TextBox2.Text, ",", "."))
End Sub
 
Private Sub CommandButton1_Click()
    Options
    'Проверяем что в массиве
    MsgBox "Op(1)=" & Op(1) & vbTab & "Op(2)=" & Op(2)
End Sub

Оцени полезность:

10   голосов , оценка 4 из 5
Похожие ответы