执行下面的程序,单击窗体后在窗体上显示的结果是 ______。Private Sub form_ Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" for I = t To 2 Str2 = Ucase (Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 str1 = Chr (Asc(Str1) + I) Next I Print Str3End Sub
A.EeFF
B.eEfF
C.EEFF
D.eeFF
第1题:
执行下面的程序,单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STR&CHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUB
A.ABCE
B.ABCD
C.ABDB
D.ABFB
第2题:
运行下列程序:
Private Sub Form_Click( )
Dim y As Integer, x As Integer
Do Until x > 20
x = x + 10
y = y + x
If x > 20 Then Exit Do
Loop
Print x, y
End Sub
单击窗体后,则在窗体上显示的结果是( )。
A.10 20
B.30 60
C.10 30
D.20 60
第3题:
运行下列程序:
Private Sub Form_Click( )
Dim x As Integer, y As String, z As String
y = "12345"
For x = 1 To Len(y)
z = Mid(Left(y, x), 1)
Next x
Print z
End Sub
单击窗体后,则在窗体上显示的结果是( )。
A.1
B.11111
C.55555
D.12345
第4题:
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.机床
B.车床
C.钻床
D.轴承
第5题:
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
A.9 8 7 6 3 2
B.2 3 6 7 8 9
C.9 8 7 6 3
D.2 3 6 7 8
第6题:
在程序运行时,下面的叙述中正确的是( )。
A. 用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_Load事件过程
B. 用鼠标左键单击窗体的标题栏,会执行窗体的Form. Click事件过程
C. 只装入而不显示窗体,也会执行窗体的Form. Load事件过程
D. 装入窗体后,每次显示该窗体时,都会执行窗体的Form. Click事件过程
第7题:
在程序运行时,下面的叙述中正确的是( )。
A.用鼠标右键单击窗体中任何无控件部分,会执行窗体的Form—Load事件过程
B.用鼠标左键单击窗体的标题栏,会执行窗体的Form—Click事件过程
C.只装入而不显示窗体,也会执行窗体的Form—Load事件过程
D.装入窗体后,每次显示该窗体时,都会执行窗体的Form—Click事件过程
第8题:
在程序运行时,下面的叙述中正确的是
A.用鼠标右键单击窗体中无控件的部分,会执行窗体的Form. L0ad事件过程
B.用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程
C.只装入而不显示窗体,也会执行窗体的Form. Load事件过程
D.装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程
第9题:
( 18 )在程序运行时,下面的叙述中正确的是
A )用鼠标右键单击窗体中无控件的部分,会执行窗体的 Form_Load 事件过程
B )用鼠标左键单击窗体的标题栏,会执行窗体的 Form_Click 事件过程
C )只装入而不显示窗体,也会执行窗体的 Form_Load 事件过程
D )装入窗体后,每次显示该窗体时,都会执行窗体的 Form_Click 事件过程