Question

VB 编写程序：在窗体添加一个按钮，为名称“btniInput”,按钮显示“输入一个两位数”，运行时，当单击按钮

的时候，程序完成如下功能：通过InputBox函数让用户输入一个两位正整数，程序把这个数的个位数和十位数对调位置，生成一个新的数，计算结果用MSGBOX命令显示。

Answer 1

Private Sub Form_Load()
Dim a
a = InputBox("请输入两位数：", "", 46)
a = (a Mod 10) & (a \ 10)
MsgBox a, , ""
End
End Sub