单选题在窗体上画一个文本框，然后编写如下事件过程。当该程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。 Private Sub Text1_KeyPress＜KeyAscii As Integer) Dim char as String char=Chr(KeyAscii) Text1.Text=String(5，KeyAscii) End Sub
单选题下面可以正确定义2个整型变量和1个字符串变量的语句是
单选题数据库系统的三级模式不包括( )。
单选题窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Command1，并编写了下列程序：PrivateSubCommand1_Click()Callcale(HV.Value，HT.Value)EndSubPublicSubcale(xAsInteger,yAsInteger)Text1.Text=x*yEndSub运行程序，单击“计算”按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是()。
单选题下列程序段的执行结果为{{U}} {{/U}}。
X=2.4：Z=3：K=5 Print"A(";X+Z*K;")"
A.A(17)
B.A(17.4)
C.A(18)
D.A(2.4+3*5)
单选题窗体上有一个名称为Shapel并显示为圆的形状控件(其Width和Height属性值相等)，一个名称为Timerl的计时器，并有下面程序代码：
Dim r As Single．flag As Integer Private Sub Timerl_Timer()
Private Sub Form_Load() Ifflag=0 Then
r=Shapel．Width Shapel．Width=Shapel．Width-10
Timerl．Enabled=True If Shape 1．Width=r Then
flag=0
End If
End If
End Sub
运行程序后产生的结果是
单选题设窗体上有一个标签Label1和一个计时器Timer1，Timer1的Interval属性被设置为1000，Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是______。
A.Private Sub Timer1_Timer() Label1.Caption=True
End Sub
B.Private Sub Timer1_Timer() Label1.Caption=Time$
End Sub
C.Private Sub Timer1_Timer() Label1.Interval=1 End
Sub
D.Private Sub Timer1_Timer() For k=1 To Timer1.Interval
Label1.Caption=Timer Next k End Sub
单选题执行如下两条语句后，窗体上显示的是______。 a=9.8596 Print Format(a,"$00 ,00.00") A) 0,009.86 B) $9.68 C) 9.68 D) $ 00,09.86
单选题单击命令按钮执行以下程序，则输出结果为( )。 Private Sub Command1_Click() Dim x As Integer,y As Integer X=14:y=48 Call Proc(x,y) Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10:m=m Mod 10 End Sub
单选题若在某窗体模块中有如下事件过程Private Sub Commandl_Click(Integer)End Sub则以下叙述中正确的是
单选题为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为( )。
单选题Visual Basic程序中语句行的续行符是（ ）
单选题在窗体上画—个名称为Text1的文本框和—个名为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。
单选题如果想对多个控件进行操作，正确的操作是______ 。
单选题要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为
单选题下列关于栈的叙述正确的是( )。 A) 栈按“先进先出”组织数据 B) 栈按“先进后出”组织数据 C) 只能在栈底插入数据 D) 不能删除数据
单选题文本框TextBox中的内容若要设置为用户不能修改，应设置( )属性。
单选题编写如下程序： Private Sub Commandl_Click() Dim x As Integer,y As Integer x=InputBox(”输入第一个数”)：y=InputBox(”输入第二个数”) Call f(x，y) Print x，y End Sub Sub f(a As Integer，ByVal b As Integer) a=a*2：x=a+b：b=b+100 End Sub 程序运行后，单击命令按钮Command1，并输入数值10和15，则输出结果为
单选题阅读程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 art=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。
单选题为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的( )属性设置为True。