单项选择题

在窗体上面有一个文本框，其名称为Text1，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
str=Chr(KeyAscii)
KeyAscii=Asc(UCase(str))
Text1.Text=String(2,KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“a”，则在文本框Text1中显示的内容为( )。

A．aaa
B．AAA
C．AA
D．aa

<上一题目录下一题>

热门试题

单项选择题

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x),y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer) As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2(x As Integer, y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为( )。

A．2 4
2 4
B．2 4
4 8
C．4 4
8 8
D．10 10
58 58

单项选择题

按文件的内容划分有( )。

A．顺序文件和随机文件
B．ASCII文件和二进制文件
C．程序文件和数据文件
D．磁盘文件和打印文件

相关试题