2. 计算机
  3. 在窗体上画一个名称为Text1的文本框，编写如下事件过程代码： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) If Not(ch＞="0"

在窗体上画一个名称为Text1的文本框，编写如下事件过程代码： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) If Not(ch＞="0"

admin2018-06-20  76
问题 在窗体上画一个名称为Text1的文本框，编写如下事件过程代码：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim ch As String
ch=Chr(KeyAscii)
If Not(ch＞="0"And ch＜="9")Then
_____________________
End If
End Sub
程序的功能是，当程序运行时，只能向文本框中输入数字字符，则以下叙述中正确的是(    )。
选项 A、当该事件被触发时，形参KeyAscii表示的是所输入字符的ASCII码
B、程序代码中，横线处应填入的语句为KeyAscii=" "
C、程序运行过程中，若按下字母键，则不执行此事件过程
D、将该事件过程中的代码移到Text1的KeyDown事件过程中时，程序功能不变
答案A
解析 KeyPress事件过程中参数KeyAscii是所按键的ASCII码，A选项叙述正确；Chr为转换函数，可以将ASCII码转换为对应的字符，程序中使用If语句判断ch是否为非数字字符，若ch为非数字字符，则退出程序，故程序横线处应填入语句Exit Sub，结束程序，B选项叙述错误；程序中按下键盘上任意按键，都会触发该事件，C选项叙述错误；与KeyPress事件不同，KeyDown事件返回的是键盘的按下状态，而KeyPress并小反映键盘的按下状态。故两个事件过程执行的功能不同，D选项叙述错误。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/xaGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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