ID:9102-10772
设组合框Combo1中有3个项目,则以下能删除最后一项的语句是( )
A)Combo1.RemoveItem Text B)Combo1.RemoveItem 2
C?xml:namespace>)Combo1.RemoveItem 3 D)Combo1.RemoveItem Combo1.Listcount查看解析
ID:9102-10779
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As Integer, s As Integer
a = 8:s = 1
Do
s = s + a:a = a-1
Loop While a <= 0
Print s; a
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是( )
A) 7 9 B) 34 0 C?xml:namespace>) 9 7 D)死循环查看解析
ID:9102-10768
如果要改变窗体的标题,则需要设置的属性是( )
A)Caption B)Name C)BackColor D)BorderStyle查看解析
ID:9102-10780
设有如下通用过程:
Public Function f(x As Integer)
Dim y As Integer
x = 20:y = 2:f = x * y
End Function
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Static x As Integer
x = 10 :y=5:y = f(x):Print x; y
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )
A)10 5 B)20 5 C?xml:namespace>)20 40 D)10 40?xml:namespace>
查看解析
ID:9102-10735
假定窗体有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为
A)Label1.Backstyle=0 Label1.BorderStyle=0
B)Label1.Backstyle=1 Label1.BorderStyle=1
C)Label1.Backstyle=True Label1.BorderStyle=True
D)Label1.Backstyle=False Label1.BorderStyle=False?xml:namespace>
查看解析