2. 计算机
  3. 设窗体上有2个文本框Text1和Text2，并有下面的事件过程： Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z

设窗体上有2个文本框Text1和Text2，并有下面的事件过程： Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z

admin2020-01-02  26
问题 设窗体上有2个文本框Text1和Text2，并有下面的事件过程：
Dim n
Private Sub Text1_KeyPress(KeyAscii As Integer)
If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z"Then
n=n+1
End If
IfKeyAscii=13 Then Text2.Text=n
End Sub
程序运行时，在文本框Text1中输入“Visual Basic6.0”并按回车键后，在文本框Text2中显示的是
选项 A、2
B、9
C、13
D、16
答案A
解析 KeyPress(KeyAscii As Integer)事件是在对象具有焦点时，按下键盘上的键触发的，KeyPress(KeyAscii As Integer)事件中KeyAscii参数是所按键的ASCII代码，该参数不显示键盘的物理状态，而只是传递一个字符代码。KeyPress将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。在本题中n的值是文本框中大写字母的个数。
转载请注明原文地址:https://www.kaotiyun.com/show/QbTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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