单项选择题

在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Text1_ KeyPress(KeyAscii As Integer)
Dim char As String
char = Chr(KeyAscii)
KeyAscii = Asc(Ucase(char))
Print String(6, KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母a，则窗体上显示的内容为______。

A．a
B．A
C．aaaaaa
D．AAA
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Tcxt1的文本框，然后编写如下程序：Private Sub Command1_ Click Dim x, y, z As Integer x = 5: y = 7: z =0 Text1. Text = Call p1(x, y, z) Text1.Text = Str (z)End SubPrivate Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a+ bEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是______。
A．0
B．12
C．Str(z)
D．没有显示
单项选择题
程序如下：Private Sub form_ Activate() Dim a As Integer for i=4 To 5 a=fun(i) Print a, Next iEnd SubPrivate Function fun(n)As Integer if n ＞0 then fun =n* fun(n-1) Else fun=1 End ifEnd Function 程序最后打印结果是______。
A．4 5
B．12 120
C．24 120
D．24 60
相关试题