确定复选框是否选中，可访问的属性是( )。

为了用键盘打开菜单和执行菜单命令，第一步应按的键是( )。

A．功能键F10或Alt键
B．Shift+功能键F4
C．Ctrl或功能键F8
D．Ctrl+Alt键

InputBox函数返回值的类型是( )。

如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件，那么执行语句
Open"c:studata.dat"For Append As #1之后，将( )。

A．删除文件中原有内容
B．保留文件中原有内容，并在文件尾添加新内容
C．保留文件中原有内容，并在文件头添加新内容
D．以上均不对

单项选择题

使用语句Dim A As Integer声明数组A之后，以下说法正确的是( )。

A．A数组中所有元素值为0
B．A数组中的所有元素值不确定
C．A数组中的所有元素值为Empty
D．执行EraseA后，A数组中的所有元素值为0

单项选择题

将数学表达式cos²(a+b)+5e²写成Visual Basic的表达式，其正确的形式是( )。

A．cos(a+b)^2+5*exp(2)
B．cos^2(a+b)+5*exp(2)
C．cos(a+b)^2+5*ln(2)
D．cos^2(a+b)+5*ln(2)

单项选择题

假定窗体有一个标签，名为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

单项选择题

定义含有10个元素的单精度实型一维数组正确的语句是( )。

A．Dim a(9)as Single
B．Option Base 1:Dim a(9)
C．Dim a#(9)
D．Dim a(10)As Integer

单项选择题

下面的程序运行结果是( )。
Private Sub Form_Click()
　i=0
　Do
　　i=i+1
　　if i＞10 then Exit Do
　Loop Until i＜10
　Print i
End Sub

A．0
B．1
C．10
D．11

单项选择题

下列说法中正确的是( )。

A．对象属性只能在“属性窗口”中设置
B．一个新的工程可以在“工程窗口”中建立
C．必须先建立一个工程，才能开始设计应用程序
D．只能在“代码窗口”中编写程序代码

单项选择题

要从自定义对话框Form2中退出，可以在该对话框的“退出”按钮Click事件过程中使用( )语句。

A．Form2.Unload
B．UnloadForm2
C．Hide.Form2
D．Form2.Hide

单项选择题

下列叙述中正确的是( )。

A．Visual Basic与Basic没有什么不同
B．Visual Basic与Basic的编程机制不同
C．Visual Basic是过程设计语言
D．Visual Basic与Basic两种之间没有什么联系

单项选择题

MsgBox函数用于显示提示信息，关于函数返回值的说明正确的是( )。

A．函数的返回值是提示信息的数据类型
B．函数的返回值是提示信息的数据长度
C．函数的返回值是整数，指示按下哪个按钮
D．函数的返回值是符号常量，指示按下哪个按钮

单项选择题

下列程序运行时，两次单击窗体后，显示的结果是( )。
Private Sub Form_Click()
Dim b As Integer
Static c As Integer
b=b+2
c=c+2
Print "b="；b;"c=";c
End Sub

A．b=2 c=2
b=2 c=2
B．b=2 c=2
b=4 c=4
C．b=2 c=2
b=2 c=4
D．b=2 c=2
b=4 c=2

单项选择题

设有如下三个关系表

下列操作中正确的是( )。

单项选择题

下列叙述中正确的是( )。

A．软件测试应该由程序开发者来完成
B．程序经调试后一般不需要再测试
C．软件维护只包括对程序代码的维护
D．以上三种说法都不对

单项选择题

下列说法正确的是( )。

A．任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器
B．只有当代码窗口为活动窗口时，才能打开菜单编辑器
C．只有当某个窗体为活动窗体时，才能打开菜单编辑器
D．任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器

单项选择题

在下面各关系中，当X取小数或负数时都能成立的式子是( )。

A．Int(X)＞=Abs(X)
B．Int(X)=Abs(x)
C．Int(X)＜Abs(X)
D．Int(X)＜＞Abs(X)

单项选择题

用InputBox函数设计的对话框，其功能是( )。

A．能接收用户输入的数据，但不会返回任何信息
B．能接收用户输入的数据，并能返回用户输入的信息
C. 既能用于接收用户输入的信息，又能用于输出信息
D．专门用于输出信息

单项选择题

窗体文件中的信息是( )和其他信息。

A．窗体的形状及其特征
B．窗体中控件的形状及其特性
C．窗体及其控件的属性
D．运行窗体的代码

单项选择题

假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是( )。

A．bool_x="False"
B．bool_x=.False.
C．bool_x=#False#
D．bool_x=False

单项选择题

下面4个语句中，能打印显示20*30字样的是( )。

A．Print"20*30"
B．Prin 20*30
C．Print Chr$(20)+"*"+Chr$(30)
D．Print Val("20")*VaL("30")

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
　　c=1234
　　c1=Trim(Str(c))
　　For i=1 To 4
　　　Print______
　　Next
End Sub
程序运行后，单击命令按钮，要求在窗体上显示如下内容
1
12
123
1234
则在下划线处应填入的内容为( )。

A．Right(c1,i)
B．Left(c1,i)
C．Mid(c1,i,1)
D．Mid(c1,i,i)

单项选择题

窗体上有一个命令按钮和一个列表框(Sorted属性为True)，执行下列过程后的输出结果是( )。
Private Sub Command1_Click()
List1.AddItem"China"
List1.AddItem"Great"
List1.AddItem"Is",1
List1.AddItem"!",3
Print List1.List(2)
End Sub

A．China
B．Great
C．Is
D．!

单项选择题

假定有下面的过程：
Function Func(a As Integer,b As Integer)As Integer
Static m As Integer,i As Integer
m=0
i=2
i=i+m+1
m=i+a+b
Func=m
End Function
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command 1_Click()
Dim k As Integer，m As Integer
Dim p As Integer
k=4
m=1
p=Func(k，m)
Print p；
p=Func(k，m)
Print p
End Sub
程序运行后，单击命令按钮，输出结果为( )。

A．8 17
B．8 16
C．8 20
D．8 8

单项选择题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
　　Dim a
　　s=0
　　a=Array(1,2,3,4)
　　j=1
　　For i=4 To 1 Step-1
　　s=s+a(i)J
　　j=j10
　Next i
　Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是( )。

A．4321
B．1234
C．34
D．12

单项选择题

在窗体上画一个命令按钮和两个标签，其名称分别为Command1、Label1和Label2，然后编写如下事件过程：
Private Sub Command1_Click()
　　a=0
For i=1 T0 10
　　a=a+1
　　b=0
　　For j=1 To 10
　　　a=a+1
　　　b=b+2
　　Next j
Next i
Label1.Caption=Str(a)
Label2.Caption=Str(b)
End Sub
程序运行后，单击命令按钮，在标签Label1和Label2中显示的内容分别是( )。

A．10和20
B．20和110
C．200和110
D．110和20

单项选择题

在Activate事件过程中，写入下面的程序：
Prirate Sub Form_Activate()
Dim S As String，a As String，b As String
a="*"：b="$"
For i=1 To 4
If i/2=Int(i/2) Then
S=String(Len(a)+i,b)
Else
S=String(Len(a)+i,a)
End If
Print S：
Next i
End Sub
运行程序后，显示的结果是( )。

A．$$***$$$$*****
B．*$$**$$***$$$****$$$$
C．**$$$****$$$$$
D．$*$$**$$$***$$$$****

单项选择题

设有如下程序：
Private Sub Command1_Click()
　　Dim sum As Double，x As Double
　　sum=0
　　n=0
　　For i=1 To 5
　　　x=n/i
　　　n=n+1
　　　sum=sum+x
　　Next
End Sub
该程序通过For循环计算一个表达式的值，这个表达式是( )。

A．1+1/2+2/3+3/4+4/5
B．1+1/2+2/3+3/4
C．1/2+2/3+3/4+4/5
D．1+1/2+1/3+1/4+1/5

单项选择题

单击一次命令按钮之后，下列程序段的执行结果为( )。
Pubic Sub Proc(a()As Integer)
　Static i As Integer
　Do
　　a(i)=a(i)+a(i+1)
　　i=i+1
　Loop While i<2
End Sub
Private Sub Command1_Click()
　Dim m As Integer,i As Integer,x(10)As Integer
　For i=0 To 4:x(i)=i+1:Next i
　For i=1 To 2:CallProc(x()):Next i
　For i=0 To 4:Print x(i);Next i
End Sub

A．3 4 7 5 6
B．3 5 7 4 5
C．1 2 3 4 5
D．1 2 3 5 7

单项选择题

在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
　If Buaon=1 Then
　　PopupMenu Menu0
　End If
End Sub
则以下叙述中错误的是( )。

A．该过程的作用是弹出一个菜单
B．单击鼠标右键时弹出菜单
C．Menu0是在菜单编辑器中定义的弹出菜单的名称
D．参数X、Y指明鼠标当前位置的坐标

确定复选框是否选中，可访问的属性是( )。

你可能感兴趣的试题

为了用键盘打开菜单和执行菜单命令，第一步应按的键是( )。

InputBox函数返回值的类型是( )。

代数式|e3+lgy1+arctgy2|对应的Visiual Basic表达式是( )。

下面关于Visual Basic 6.0工具栏的说法不正确的是( )。

下列4项对InputBox函数的使用说明，不正确的是( )。

不能打开属性窗口的操作是( )。

确定复选框是否选中，可访问的属性是( )。

如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件，那么执行语句 Open"c:studata.dat"For Append As #1之后，将( )。

使用语句Dim A As Integer声明数组A之后，以下说法正确的是( )。

将数学表达式cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是( )。

假定窗体有一个标签，名为Label1，为了使该标签透明并且没有边框，正确的属性设置为( )。

定义含有10个元素的单精度实型一维数组正确的语句是( )。

下面的程序运行结果是( )。 Private Sub Form_Click() i=0 Do i=i+1 if i＞10 then Exit Do Loop Until i＜10 Print i End Sub

下列说法中正确的是( )。

要从自定义对话框Form2中退出，可以在该对话框的“退出”按钮Click事件过程中使用( )语句。

下列叙述中正确的是( )。

MsgBox函数用于显示提示信息，关于函数返回值的说明正确的是( )。

下列程序运行时，两次单击窗体后，显示的结果是( )。 Private Sub Form_Click() Dim b As Integer Static c As Integer b=b+2 c=c+2 Print "b="；b;"c=";c End Sub

设有如下三个关系表 下列操作中正确的是( )。

下列叙述中正确的是( )。

下列说法正确的是( )。

在下面各关系中，当X取小数或负数时都能成立的式子是( )。

用InputBox函数设计的对话框，其功能是( )。

窗体文件中的信息是( )和其他信息。

假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是( )。

下面4个语句中，能打印显示20*30字样的是( )。

窗体上有一个命令按钮和一个列表框(Sorted属性为True)，执行下列过程后的输出结果是( )。 Private Sub Command1_Click() List1.AddItem"China" List1.AddItem"Great" List1.AddItem"Is",1 List1.AddItem"!",3 Print List1.List(2) End Sub

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s=0 a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*J j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是( )。

在Activate事件过程中，写入下面的程序： Prirate Sub Form_Activate() Dim S As String，a As String，b As String a="*"：b="$" For i=1 To 4 If i/2=Int(i/2) Then S=String(Len(a)+i,b) Else S=String(Len(a)+i,a) End If Print S： Next i End Sub 运行程序后，显示的结果是( )。

设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过For循环计算一个表达式的值，这个表达式是( )。

代数式|e³+lgy1+arctgy2|对应的Visiual Basic表达式是( )。

如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件，那么执行语句
Open"c:studata.dat"For Append As #1之后，将( )。

将数学表达式cos²(a+b)+5e²写成Visual Basic的表达式，其正确的形式是( )。

下面的程序运行结果是( )。
Private Sub Form_Click()
　i=0
　Do
　　i=i+1
　　if i＞10 then Exit Do
　Loop Until i＜10
　Print i
End Sub

下列程序运行时，两次单击窗体后，显示的结果是( )。
Private Sub Form_Click()
Dim b As Integer
Static c As Integer
b=b+2
c=c+2
Print "b="；b;"c=";c
End Sub

设有如下三个关系表

下列操作中正确的是( )。

窗体上有一个命令按钮和一个列表框(Sorted属性为True)，执行下列过程后的输出结果是( )。
Private Sub Command1_Click()
List1.AddItem"China"
List1.AddItem"Great"
List1.AddItem"Is",1
List1.AddItem"!",3
Print List1.List(2)
End Sub

在Activate事件过程中，写入下面的程序：
Prirate Sub Form_Activate()
Dim S As String，a As String，b As String
a="*"：b="$"
For i=1 To 4
If i/2=Int(i/2) Then
S=String(Len(a)+i,b)
Else
S=String(Len(a)+i,a)
End If
Print S：
Next i
End Sub
运行程序后，显示的结果是( )。

设有如下程序：
Private Sub Command1_Click()
　　Dim sum As Double，x As Double
　　sum=0
　　n=0
　　For i=1 To 5
　　　x=n/i
　　　n=n+1
　　　sum=sum+x
　　Next
End Sub
该程序通过For循环计算一个表达式的值，这个表达式是( )。