程式
Public Class Form1
Dim a As Decimal
Dim b As Decimal
Dim k
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
a = TextBox1.Text
b = TextBox2.Text
k = a * b
MsgBox(k)
End Sub
End Class
沒有留言:
張貼留言