VB作业之比较两个数的大小

下面是我编写的“计算”代码：

Private Sub Command1_Click()
Dim M As Integer, N As Integer
   M = Val(Text1.Text)
   N = Val(Text2.Text)
   If M > N Then
    Print M
   Else
    Print N
 End If
End Sub

然后再编写“清除”事件的代码：

Private Sub Command2_Click()
   Text1.Text = ""
   Text2.Text = ""
End Sub

心得体会：本来我没设计“清除”按钮，有了以前的经验，我又把“清除”按钮的事件的代码编写上，这样整个程序就显的更加完美了，还不错、嘻嘻、、