单选题阅读程序:
Private Sub Form_Click()
msg1$="继续吗?"
msg2$="操作对话框"
r=MsgBox(msg1$,vbYesNo Or vbDefauhButton2,msg2$)
End Sub
程序运行后,单击窗体,将产生一个信息框。此时如果直接按回车键,则相当于用鼠标单击信息框中的某个按钮,这个按钮是
单选题在窗体上画一个名称为Text1的文本框,然后画一个名称为Hscroll1的滚动条,其Min和Max属性分别为0和1000。程序运行后,如果移动滑块,则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是______。
单选题设在菜单编辑器中定义了一个菜单项,名为menul为了在运行时隐藏该菜单项,应使用的语句是
单选题设有如下程序段:
Dim a(10)
…
For Each x In a
Print x;
Next x
在上面的程序段中,变量X必须是______。
单选题在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Commandl_Click()
Text1.Text=LCase(SaveAll)+SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为______。
单选题当Visual Basic表达式中含有以下多种运算时( )。 ①关系运算 ②算术运算 ③逻辑运算 ④函数运算 正确的运算顺序为( )。
单选题在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click() Private Sub fl(ByRef x1 As Integer,_ Dimx As Integer y1 As Integer) x=10:y=5 x1=x1+2:y1=y1+2 Call fl(x,y) End Sub Print x,y End sub 程序运行后,单击命令按钮,在窗体上显示的内容是
单选题在窗体上有一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(5)As String
a(i)=Chr(Asc("A")+(i-1))
Next
For Each b In a
Print b;
Next
End Sub
程序运行后,单击命令按钮,输出结果是______。
单选题下列说法正确的是_________。
A.窗体的属性包括Name、Caption、Height、Visible、Paint等
B.窗体是Visual Basic的一个控件
C.窗体的所有属性都可以在运行阶段设置
D.窗体相当于一个容器,可以把其他控件放在其上
单选题为了清除窗体上的一个控件,下列正确的操作是
单选题以下语句的输出结果是 a=Sqr(3) Print Format(a, "$$ # # # # . # # #")
单选题下列程序段的执行结果为( )。
a=3
b=1
For I=1 To 3
f=a + b
a=b
b=f
Print f
Next I
单选题设窗体上有一个列表框控件List1,含有若干列表项。下列能表示当前被选中的列表项内容的是( ) A.List1.List B.List1.ListIndex C.List1.Text D.List1.Index
单选题下列关于Visual Basic“方法”的概念的说法错误的是_________。
A.方法是对象的一部分
B.方法是预先规定好的操作
C.方法是对事件的响应
D.方法用于完成某些特定功能
单选题设一个工程由两个窗体组成,其名称分别为Fornml和Fornm2,在Fornml上有一个名称为Command1的命令按钮。窗体Fornml的程序代码如下: Private Sub Command1_Click() Private Sub g(f As Fornm,x As Integer) Dim a=10 y=IIf(x>10,100,一100) Call g(Fornm2,a) f.Show End Sub f.Caption=y End Sub 运行以上程序,正确的结果是
单选题程序运行时,要清除图片框Picture1中的图像,应使用语句( )。
单选题在窗体上画—个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后,如果按A键,然后单击窗体,则窗体上显示的内容是 ______。
单选题以下关于复选框的说法,正确的是( )。
单选题语句Dim a(-3 To 4, 3 To 6) As Integer定义的数组的元素个数是( )。 A) 18 B) 28 C) 21 D) 32
单选题窗体上有一个命令按钮Command1和一个列表框List1,其中List1有0、1、2、3、4的内容,有下列程序: Private Sub Command1_Click() Dim i,s For i=0 To List1.ListCount s=s+List1.List(i) Next i Print s End Sub 程序运行后,单击命令按钮,则窗体上显示的是