Question

大学VB编程题！急用！！！

在窗体Form1上有两个文本框Text1和Text2、1个标签Label1、一个命令按钮Command1.编程实现：在Text1和Text2中分别输入两个整数，单击命令按钮后，则较小的数显示在标签Label1中。写出相应事件。

Answer 1

Private Sub Command1_Click()
    Dim a As Integer, b As Integer
    a = Val(Text1.Text)
    b = Val(Text2.Text)
    Label1.Caption = "较小的数是："
    If a < b Then
        Label1.Caption = Label1.Caption & a
    Else
        Label1.Caption = Label1.Caption & b
    End If
End Sub

已经运行过，有什么问题请留言。

Answer 2

Private Sub Command1_Click()
Label1.Caption = IIf(Val(Text1.Text) < Val(Text2.Text), Val(Text1.Text), Val(Text2.Text))
End Sub