![](https://static.youtibao.com/asksite/comm/h5/images/m_q_title.png)
执行下面的程序,单击窗体后在窗体上显示的第一行结果是(),第三行结果是()。Private Sub Comm
执行下面的程序,单击窗体后在窗体上显示的第一行结果是(),第三行结果是()。
Private Sub Command1_Click()
s1="B"
For i = 1 To 3
s2=LCase(s1)
s1=s1 & s2
s=s & s1
Print s
s1=Chr(Asc(s1)+i)
Next i
End Sub
![](https://static.youtibao.com/asksite/comm/h5/images/solist_ts.png)
执行下面的程序,单击窗体后在窗体上显示的第一行结果是(),第三行结果是()。
Private Sub Command1_Click()
s1="B"
For i = 1 To 3
s2=LCase(s1)
s1=s1 & s2
s=s & s1
Print s
s1=Chr(Asc(s1)+i)
Next i
End Sub
A.-5
B.25
C.-1
D.1
在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
Dim x As Integer
x = Val(InputBox("请输入一个整数"))
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。
A.46
B.123
C.3412
D.1234
PrivateSubForm_Click()
DimA(1To3)AsString
DimcAsInteger
DimjAsInteger
A(1)="4"
A(2)="8"
A(3)="12"
c=1
Forj=1To3
c=c+Val(A(j))
Nextj
Printc
EndSub
写出程序运行时单击窗体后,窗体Form1上的结果。
写出下面程序运行时单击窗体的输出结果。
Private Sub f(a%, b%)
a = a + b
b = a - b
End Sub
Private Sub Form_Click()
Dim a%, b%
a = 23
b = 12
Call f(a, b)
Print "a=" & a; ",b=" & b
End Sub
A.Visual Basic窗体文件扩展名为vbp
B.一个Visual Basic应用程序可以包含多个窗体文件
C.一个窗体文件可以有多个代码窗口
D.Visual Basic程序按过程编写先后顺序依次执行
A.Form1_Click
B.Form1_Enter
C.Form1_Load
D.Form1_MouseEnter
A.如果指派了屏幕保护程序密码,则必须键入登陆密码
B.在屏幕保护程序启动后要将其清除,移动一下鼠标或按任意键
C.选择屏幕保护程序后,当计算机空闲了一定时间后,将自动启动
D.单击“预览”查看所选的屏幕保护程序在监视器上的显示方式,移动鼠标或按任意键结束预览
E.查看特定的屏幕保护程序的可能设置选项,单击屏幕保护程序选项卡的“设置”