UC知道vb问题，帮我完善一下代码！快
来源：百度知道 编辑：UC知道 时间：2024/09/28 13:32:36
编辑程序，使之实现如下功能：程序运行时，输入3个整数，输出最小的一个整数！
帮我完善下面的代码：
Private Sub Form_Load()
Dim x As Integer
Dim min As Integer
Dim i As Integer
min = InputBox("请输入数据", "输入3个数")
For i = 1 To
x = InputBox("请输入数据", "输入3个数")
If Then
min = x
End If
Next i
Text1.Text = _____
End Sub
Private Sub Label1_Click()
End Sub
窗体是
帮我完善下面的代码：
Private Sub Form_Load()
Dim x As Integer
Dim min As Integer
Dim i As Integer
min = InputBox("请输入数据", "输入3个数")
For i = 1 To
x = InputBox("请输入数据", "输入3个数")
If Then
min = x
End If
Next i
Text1.Text = _____
End Sub
Private Sub Label1_Click()
End Sub
窗体是
Private Sub Form_Load()
Dim x As Integer
Dim min As Integer
Dim i As Integer
min = InputBox("请输入数据", "输入3个数")
For i = 1 To 2
x = InputBox("请输入数据", "输入3个数")
If x < min Then
min = x
End If
Next i
Text1.Text = min
End Sub
Private Sub Form_Load()
Dim x As Integer
Dim min As Integer
Dim i As Integer
min = InputBox("请输入数据", "输入3个数")
For i = 1 To 2 '表示要输入三个数
x = InputBox("请输入数据", "输入3个数")
If min>x Then
min = x
End If
Next i
Text1.Text =min
End Sub
Private Sub Label1_Click()
End Sub