在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程： Dim Str1 As String，str2 As String Private Sub form_load() Text1.Text="" T

admin2010-11-20 62

问题在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程：
Dim Str1 As String，str2 As String
Private Sub form_load()
Text1.Text=""
Text2.Text=""
Text1.Enabled=False
Text2.Enabled=False
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
str1=str1 & Chr(KeyAscii)
End Sub
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
str2=str2 & Chr(KeyCode)
End Sub
Private SubCommand1_Click()
Text1.Text=str1
Text2.Text=str2
str1=""
str2=""
End Sub
当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为

选项 A、abc
B、不显示任何信息
C、ABC
D、出错

答案A

解析在Command1的Click事件中将字符串变量Str赋给Text1，Str变量是在KeyPress事件中被赋值的，语句Str=Str & Chr(KeyAscii) 将输入的字符存储并连接起来，此处是通过参数KeyAscii来得到输入字符的(因此要区分字母的大小写) ，又因为在Form的Load事件中将Text1和Text2的Enabled属性设置成False，所以当前拥有输入焦点的对象是窗体，为了使窗体能接收键盘事件，已经将窗体的KeyPreview属性设置为True，所以在输入小写字母abc后，单击Command1，触发其 Click事件，使得Text1文体控件的值等于Str字符串的值，即abc。

转载请注明原文地址:https://www.kaotiyun.com/show/Dohp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

0

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)