设窗体上有2个文本框Textl和Text2,并有下面的事件过程: Dim n Private Sub Text l_KeyPress(KeyAscii As Integer) If“A”<=Chr(KeyAscii)An

admin2013-10-16  23

问题 设窗体上有2个文本框Textl和Text2,并有下面的事件过程:
    Dim n
    Private Sub Text l_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
    程序运行时,在文本框Textl中输入“Visual Basic 6.0”并按回车键后,在文本框Text2中显示的是

选项 A、2   
B、9   
C、13
D、16

答案A

解析 KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键触发的,KeyPress(KeyAscii As Integer)事件中KeyAseii参数是所按键的ASCⅡ代码,该参数不显示键盘的物理状态,而只是传递一个字符代码。KeyPress将每个字符的大、小写形式作为不同的键代码解释,即作为两种不同的字符。在本题中n的值是文本框中大写字母的个数。
转载请注明原文地址:https://kaotiyun.com/show/ZhQp777K
0

最新回复(0)