Код событийной процедуры перевода чисел из десятичной системы счисления в шестнадцатеричную Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
TextBox4.Text = Hex(_____(TextBox1.Text))
TextBox5.Text = Hex(_____(TextBox2.Text))
TextBox6.Text = Hex(_____(TextBox3.Text))
End Sub

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

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim I, l As Byte
Dim sum As Integer
l = _____
sum = 0
For I = 1 To l
sum = sum + Val(Mid(TextBox1.Text, I, 1))
Next
TextBox2.Text = Str(sum)
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры для выполнения вычитания Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox3.Text = Val(TextBox1.Text) – _____
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры для выполнения вычитания Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox3.Text = _____ – Val(TextBox2.Text)
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры для выполнения деления Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TextBox3.Text = Val(TextBox1.Text) / _____
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры для выполнения умножения Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox3.Text = Val(TextBox1.Text) * _____
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры для выполнения умножения Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox3.Text = _____ * Val(TextBox2.Text)
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры перевода чисел из десятичной системы счисления в шестнадцатеричную Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
TextBox4.Text = _____
TextBox5.Text = Hex(Val(TextBox2.Text))
TextBox6.Text = Hex(Val(TextBox3.Text))
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры перевода чисел из шестнадцатеричной системы счисления в десятичную Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
TextBox1.Text = _____("&H" + TextBox4.Text)
TextBox2.Text = _____("&H" + TextBox5.Text)
TextBox3.Text = _____("&H" + TextBox6.Text)
End Sub

Введите пропущенную функцию.
Код событийной процедуры перевода чисел из шестнадцатеричной системы счисления в десятичную Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
TextBox1.Text = Val("_____" + TextBox4.Text)
TextBox2.Text = Val("_____" + TextBox5.Text)
TextBox3.Text = Val("_____" + TextBox6.Text)
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры, которая заменяет заданное натуральное число на число, получаемое из исходного путем записи его цифр в обратном порядке:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim I, l As Byte
l = _____
For I = 1 To l
TextBox2.Text = TextBox2.Text + Mid(TextBox1.Text, l + 1 - I, 1)
Next
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры, которая позволяет вырезать из строки произвольную подстроку:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim l, I As Byte
Dim a As String
TextBox2.Text = Mid(TextBox1.Text, Val(TextBox3.Text), Val(TextBox4.Text))
l = _____
a = ""
For I = 1 To l
If I < Val(TextBox3.Text) Then
a = a + Mid(TextBox1.Text, I, 1)
End If
If I >= Val(TextBox3.Text) + Val(TextBox4.Text) Then
a = a + Mid(TextBox1.Text, I, 1)
End If
Next
TextBox1.Text = a
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры, которая позволяет заменить все символы строки их кодами:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim I, l As Byte
l = _____
For I = 1 To l
TextBox2.Text = TextBox2.Text + Str(Asc(Mid(TextBox1.Text, I, 1)))
Next
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры, позволяющей получать таблицы истинности суммы и переноса для одноразрядного полусумматора двоичных чисел:

Dim A, B, C, D As Boolean

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
A = TextBox1.Text
B = TextBox2.Text
C = (A And Not (B)) Or (Not (A) And B)
D = _____
TextBox3.Text = C
TextBox4.Text = D
End Sub

Введите пропущенное выражение.
Код событийной процедуры, реализующей логическую функцию Not Проекта 3 «Логический калькулятор»:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
A = TextBox1.Text
C = _____
TextBox3.Text = C
End Sub

Введите пропущенное выражение.
Код событийной процедуры, реализующей логическую функцию Or Проекта 3 «Логический калькулятор»:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
A = TextBox1.Text
B = TextBox2.Text
C = _____
TextBox3.Text = C
End Sub

Введите пропущенное выражение.
Код событийной процедуры, реализующей логическую функцию Or Проекта 3 «Логический калькулятор»:

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
A = _____
B = TextBox2.Text
C = A Or B
TextBox3.Text = C
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры, реализующей логическую функцию Xor Проекта 3 «Логический калькулятор»:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
A = TextBox1.Text
B = TextBox2.Text
C = _____
TextBox3.Text = C
End Sub

Введите пропущенное выражение.
Код событийной процедуры, реализующей логическую функцию Xor Проекта 3 «Логический калькулятор»:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
A = _____
B = TextBox2.Text
C = A Xor B
TextBox3.Text = C
End Sub

Введите пропущенное выражение (без пробелов).
Код событийной процедуры перевода чисел из десятичной системы счисления в шестнадцатеричную Проекта 1 «Мультисистемный калькулятор»:

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
TextBox4.Text = _____(Val(TextBox1.Text))
TextBox5.Text = _____(Val(TextBox2.Text))
TextBox6.Text = _____(Val(TextBox3.Text))
End Sub

Введите пропущенную функцию.
В Visual Basic для определения количества символов в строке используется функция
В Visual Basic для перевода чисел из десятичной системы счисления в восьмеричную используется функция
В Visual Basic для преобразования символов в соответствующий им числовой код используется функция
В Visual Basic для преобразования строковых значений, вводимых в текстовые поля, в десятичные числа используется функция
Укажите соответствие между обозначением логического оператора в Visual Basic и его назначением