2. 计算机
  3. 在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(KeyAscii)

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(KeyAscii)

admin2013-01-23  70
问题 在窗体上画一个文本框，然后编写如下事件过程：    Private Sub Text1_KeyPress(Key Ascii As Integer)      Dim char As String      char=Chr(KeyAscii)      KeyAscii=Asc(UCase(char))      TextText=String(6，KeyAscii)    End Sub    程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。
选项 A、a
B、A
C、aaaaaaa
D、AAAAAAA
答案8
解析 该事件过程中首先用Chr函数记录下输入的字符，然后用UCase函数将其转化为大写，再用Asc函数记录下其码值。最后使用String函数将其重复6遍并输出到文本框中。当文本框中的文本内容发生变化的时候，会触发文本框的Change事件，而KeyPress事件是在Change事件之前触发的，在发生KeyPress事件之前，尚未触发Change事件。在KeyPress事件中，改变了文本框的Text属性，所以会触发Change事件，之后，键盘输入的信息“a”才在变为大写之后输入文本框，文本框中最终显示的是7个“A”。
转载请注明原文地址:https://www.kaotiyun.com/show/rwhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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