在窗体上画一个文本框和一个命令按钮,如下图所示。
![](https://img.ixiawen.com/uploadfile/2018/0617/20180617090335175.gif)
编写如下程序:
Private Sub Form_Load()
Show
Text1.Text=" "
Form1.KeyPreview=False
Text1.SetFocus
End Sub
Private Sub Command1_Click()
KeyPreview=Not KeyPreview
Print
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print UCase(Chr(KeyAscii+1));
End Sub
Private sub Text1_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii+2)
KeyAscii=0
End Sub
阅读以上程序,理解每个事件过程的操作,然后填空。
①程序运行后,直接从键盘上输入abc,程序输出的结果是 【9】 。
②程序运行后,单击一次“命令按钮1”,然后从键盘上输入abc,程序输出的结果是 【10】 。