vb

打开vb后点击commandbutton拖入form1中，在吧textbox踏入form中创建两个。

再点击comandante进入输入以下语句

Private Sub cmdMulti_Click()

Dim a As Byte, c As Integer
Dim b As String
b = Me.Text1.Text
a = Int(Val(b))
b = Me.Text2.Text
c = Int(Val(b))
Dim r As Byte
r = a * c
Print r
End Sub