Visual Basic程序设计-作业二代码.docVIP

3 Private Sub Form_Click() Dim x%, a%, b%, c% x = Val(InputBox(输入一个3位数:, 20120913055_李萍)) a = Int(x \ 100) b = Int((x - a * 100) \ 10) c = Int(x - a * 100 - b * 10) Print 输入的三位数的个位,十位,百位分别是:; c; ,; b; ,; a Print 输出的逆序三位数:; (c * 100 + b * 10 + a) MsgBox 输入的三位数的个位,十位,百位分别是: c , b , a _ vbCrLf 输出的逆序三位数: (c * 100 + b * 10 + a), , 20120913055_李萍 End Sub 4.1 4.2 5 去掉d#