2. 计算机
  3. 在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private SUb Form Log( ) Open“C：＼dat．txt”For OutputAs#1 Textl．Text=“” End Sub Private Sub Textl

在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private SUb Form Log( ) Open“C：＼dat．txt”For OutputAs#1 Textl．Text=“” End Sub Private Sub Textl

admin2020-07-22  72
问题 在窗体上画1个文本框，名称为Text1，然后编写如下程序：
Private SUb Form Log(     )
Open“C：＼dat．txt”For OutputAs#1
Textl．Text=“”
End Sub
Private Sub Textl_KeyPress(KeyAscii As Integer)
If=13 Then
If UCase(Textl．Text=_________)Then
Close 1
End
Else
Write#1．Text1．Text
Textl．Text=“”
选项 A、KeyAscii  “END”
B、Textl．Text“END”
C、Textl．Text  13
D、KeyAscii13
答案A
解析 本题考查KeyPress事件。在Textl中输入字符时，将触发Textl的KeyPress事件，同时可返回一个KeyAscii参数(输入字符的ASCII码，区分大小写)。当KeyAseii为13时，表示输入了回车键，此时判断Textl的文本信息，如果Textl的文本为“END”，则关闭文件，退出程序。
转载请注明原文地址:https://kaotiyun.com/show/EfHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)