问题
填空题
在窗体上画两个文本框,其名称分别为Namel和PassWordl,然后编写如下事件过程 Private Sub Form_Load() Show Namel.Text=" " Passwordl.Text=" " Passwordl.SetFocus End Sub Private Sub Passwordl_KeyDown(KeyCode As Integer,Shift As Integer) Namel.Text=Name1.Text+Chr(KeyCode - 3) End Sub 程序运行后,如果在Passwordl中输入“hit’’’,则在Namel文本框中显示的内容是【 】。
答案
参考答案:EFQ
解析:在Form_Load事件过程中,属性Text用来设置文本框中显示的内容,所 以首先要清空文本框name1和password1中的内容;SetFocus函数是把光标移动到文本框 中,当在窗体上建立了多个文本框后,可以用该方法把光标置于所需要的文本框,所以在 本程序运行时光标位置在password1上;在password1_KeyDown事件过程中,只有一条语 句,即将从password1中接收到的“键”其码值减去3后和前面的一起输出;因为KeyDown 事件返回的是“键”,所以当按下键“a”时,与按下键“A”是一样的KeyCode码,所以当在 password1中输入h时,KeyCode中的值为&H46,当减去3后,它的值为E的码值,而函数 Chr是将码值转换为字符,所以输出E;同样的道理,最后的输出字符应该是EFQ。