B.Text1.Text"END"

C.Text1.Text13

D.KeyAscii13

..." />

当前位置:IT认证>BASIC题库

问题:[选择题]

[单项选择题] 在窗体上画1个文本框,名称为Text1,然后编写如下程序: Private Sub Form Load() Open "C:dat.txt" For Output As#1 Text1.Text="" End Sub Private Sub Text1_KeyPress(KeyAscii As integer) If______=13 Then If UCase(Text1.Text=______)Then Close 1 End


A.KeyAscii"END"
B.Text1.Text"END"
C.Text1.Text13
D.KeyAscii13

参考答案: A

  参考解析

本题考查KeyPress事件。在Text1中输入字符时,将触发Text1的KeyPress事件,同时可返回一个KeyAscii参数(输入字符的ASCII码,区分大小写)。当KeyAscii为13时,表示输入了回车键,此时判断Text1的文本信息,如果Text1的文本为“END”,则关闭文件,退出程序。

微信端