更多"[单选题]运行下面程序后,在窗体中显示的是(). Private S"的相关试题:
[单选题]第179题 （1.0分）
运行下面程序后,在窗体中显示的是().
Private Sub Form_Click()
a$="*". b$="$"
For k=1 To 3
x$=String$(Len(a$)+k,b$)
Print x$;
Next k
Print
End Sub
A.*** ** ****
B.*$*$*$
C.1*$2*$3*$
D.$$$$$$$$$
[单选题]题 （1.0分）
下面过程运行后显示的结果是
().
Pubic Sub F1(n%,ByVal m%) Private Sub Command1_Click()
N=n Mod 10 Dim x%,y%
M=m\10 x=12.y=34
End Sub Call F1(x,y)
Print x,y
End Sub
A.2 34
B.12 34
C.2 3
D.12 3
[单选题]运行时,单击窗体将窗体的前景色设置为红色的事件过程是().
A.Private Sub Form_Click()
BackColor=vbRed
End Sub
B.Private Sub Form_Click()
Form1.ForeColor=vbRed
End Sub
C.Private Sub Form Click()
Form1.BackCOlor=.
[单选题]要将名为MyForm的窗体显示出来,正确的使用方法是().
A.MyForm Show
B.Show.MyForm
C.MyForm Load
D.MyForm.Show
[单选题]当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不会接收到().
A.MouseDown
B.MouseUp
C.Load
D.Click
[判断题] Visual Basic程序的运行,仅能从某一窗体启动,如Form1窗体
A.正确
B.错误
[单选题]题 （1.0分）
运行时,单击窗体将窗体的前景色设置为红色的事件过程是().
A.Private Sub Form_Click()
BackColor=vbRed
End Sub
B.Private Sub Form_Click()
Form1.ForeColor=vbRed
End Sub
C.Private Sub Form Click()
Form1.BackCOlor=1
End Sub
D.Private Sub Form_Click()
ForeColor=0
End Sub
[判断题]
若已在窗体中加入了一个通用对话框:要求在运行时,通过
ShowOpen打开对话框时,只显示扩展名为 DOC 的文件,则
对通用对话框的 Filter的属性设置应该是:"(*.DOC)| ( .DOC)".
A.正确
B.错误
[单选题]题 （1.0分）
要将名为MyForm的窗体显示出来,正确的使用方法是().
A.MyForm Show
B.Show.MyForm
C.MyForm Load
D.MyForm.Show
[单选题]下列属性只能在运行期间设置窗体的属性是().
A.BorderStyle
B.Caption
C.Name
D.MaxButton
[单选题]下面程序运行的输出是().
Private Sub Command1_Click()
Cls
Line(60,60)-(70,70),5,B
Line(50,50)-(80,80),1,B
Line(40,40)-(90,90),2,B
Line(30,30)-(100,100),3,B
Line(20,20)-(110,110),4,B
End Sub
A.同心的彩色正方形
B.同心的彩色圆
C.相交的彩色正方形
D.相交的彩色圆
[单选题]下列程序运行后,信息框显示的内容是().
Private Sub Commandl_Click()
Dim s1 As String ,s2 AS Integer
S1 = "Hello-World,2003"
S2 = Len(s1) + InStr(1,S1,"2")
MsgBOX s2
End Sub
A.Hello-World
B.2003
C.16
D.29
[单选题]题 （1.0分）
当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不会接收到().
A.MouseDown
B.MouseUp
C.Load
D.Click
[单选题]窗体上有一个命令按钮Command1,编写如下事件过程:
Private Sub Command1_Click()
X = InputBox("x=")
Y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是().
A.444
B.123321
C.123+321
D.出错信息
[单选题]下面程序运行后,输出的结果是().
Private Sub Command1_Click()
S=0
For K=1 To 3
If K<=1 Then
x=1
ElseIf K<=2 Then
x=2
Elself K<=3 Then
x=3
Else
x=4
End lf
Print x;
S=S+x
Next K
Print S
End Sub
A.3 3 3 9
B.3 2 1 6
C.1 1 1 3
D.1 2 3 6
