用单行结构条件语句实现用inputbox输入三个数,选出其中的最大值和最小值,用消息框msgbox显示最大值和最小值

Private Sub Command1_Click()
a = CInt(InputBox("请输入第 1 个数："))
b = CInt(InputBox("请输入第 2 个数："))
c = CInt(InputBox("请输入第 3 个数："))
If a > b Then t = a:a = b:b = t
If a > c Then t = a:a = c:c = t
If b > c Then t = c:c = b:b = t
MsgBox "最大的数是：" & c & ",最小的数是：" & a
End Su