编写VB程序,从键盘上输入三个整数,输出绝对值最小的数

Private Sub Command1_Click()
a = Abs(InputBox(请输入第一个整数, 输入数据))
b = Abs(InputBox(请输入第二个整数, 输入数据))
c = Abs(InputBox(请输入第三个整数, 输入数据))
Min = a
If b < Min Then
Min = b
End If
If c < Min Then
Min = c
End If
Print Min
End Su