【正确答案】【操作步骤】 步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符“'”,将问号改为正确的内容。
参考答案(字体加粗部分是需考生填入的内容)
Private Sub Command1_Click()
Combo1.
AddItem Text1.Text '将Text1中的内容加入Combo1中
Text1.Text="" '同时将Text1内容清除
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii>57 Or KeyAscii<48
Then '数字的Ascii码值下界
MsgBox "请输入数字!"
KeyAscii=0 '清空
End If
End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。