在窗体上画一个文本框和一个命令按钮 如下图所示。 编写如下程序: Private Sub Form
在窗体上画一个文本框和一个命令按钮,如下图所示。 编写如下程序: 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,程序输出的结果是【 】。 ②程序运行后,单击一次“命令按钮1”,然后从键盘上输入abc,程序输出的结果是【 】。
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:cde BCD
本题主要用来加深理解窗体的KeyPreview属性。在默认情况下,控件的键盘事件优先于窗体的键盘事件,因此在发生键盘事件时,总是先触发控件的键盘事件。如果希望窗体先接收键盘事件,则必须将窗体的KcyPreview属性设置为True,否则不能触发窗体的键盘事件。在上面的程序中,“命令按钮1”的事件过程用来对窗体的KeyPreview属性值进行切换,每单击一次该按钮,KeyPreview属性改变一次值,即从True变为False或从False变为True。当该属性为True时,首先执行的是窗体的KeyPress事件过程:如果该属性为False,则执行文本框的KeyPress事件过程。
相似问题
以下程序的功能是 从键盘上输入若干数据 统计并输出最大值和最小值 当输入负数时结束输入 请填空。 D
以下程序的功能是,从键盘上输入若干数据,统计并输出最大值和最小值,当输入负数时结束输入,请填空。 Dim amax As Single,amin As Single x=In
在一个窗体上有两个命令按钮 cmdMax 和 cmdMin。单击cmdMax时 窗体上显示“字体由小
在一个窗体上有两个命令按钮,cmdMax 和 cmdMin。单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2;单击cmdMin时,窗体上显示“字体由大变小
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的结果是【 】。请帮忙给出正确答案和分析,谢谢!
下面程序运行后 单击命令按钮 输出的结果是【 】 Private Sub Commandl_Clic
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Commandl_Click( ) Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl,str2 For
运行下列程序 单击Command1命令按钮后 则在窗体上显示第一行和第二行的结果分别是【 】和【 】
运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是【 】和【 】。 Private Sub Command1_Click() t=1:x=2:y=3:z=4
