单选题Visual Basic 6.0集成环境的主窗口中不包括___________。
A.标题栏
B.状态栏
C.菜单栏
D.工具栏
单选题以下关系表达式中,其值为True的是( )。
单选题下面程序在调试时出现了死循环
Private Sub Command1_Click()
n=Input Box("请输入一个整数")
Do
If n Mod 2=0 Then
n=n+1
Else
n=n+2
End If
Loop Until n=1000
End Sub
下面关于死循环的叙述中正确的是【 】
单选题在窗体上画一个名称为CD1的通用对话框,并有以下程序:
Private Sub Form_load()
CD1.DefaultExt=".doc"
CD1.fileName="c:/file1.txt"
CD1.filter="应用程序(*.exe)|*.exe"
End Sub
程序运行时,如果显示了“打开”对话框,在文件夹类型中下拉列表中的默认文件类型为______。
单选题为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:Private Sub Command1 Click()
Dim a&,s&,k&
s=1
a=2
For k=2 To 10
a=a*2
s=s+a
Next k
Text1.Text=s
End Sub
执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是______。
单选题以下程序输出的结果为______。 x=1 y=4 Do Until y>4 x=x*y y=y + 1 Loop Print x
单选题将命令按钮设置为窗体的取消按钮,要设置的属性为
单选题下列程序代码实现生成20个0~100之问的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段( ),完成程序。 Private Sub Command1 Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=______ Text1. Text=Text1. Text&arr(i)&Chr(13)&Chr(10) Next i Surn=0 For Each X______ If X>50 Then Print Tab(20);X Sum=Sum+X End If NextX Print Tab(20);"Sum=";Sum End Sub
单选题窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyDown事件过程如下: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Dim s As String s=Chr(KeyCode+35) Text2.Text=s End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序代码:
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = 5: b = 10
Call mysub(a, b)
Print a; b
End Sub
Private Sub mysub(ByRef x As Integer, y As Integer)
x = x + 5
y = y * 2
End Sub
以下叙述中正确的是
单选题窗体上有一个名称为CD1的通用对话框控件和由4个命令按钮组成的控件数组Commamd1,其下标从左到右分别为0、1、2、3,窗外外观如图所示。命令按钮的事件过程如下:PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action=1Case1CD1.ShowSaveCase2CD1.Action=5Case3EndEndSelectEndSub对上述程序,下列叙述中错误的是______。
单选题表达式Int(-20.45)的值是________。
A.-21
B.-20
C.20
D.21
单选题下列说法错误的是______。 A) 在Visual Basic中,存在一种信息框,或者称之为消息框,用MsgBox函数建立 B) 在程序运行时,通用对话框控件是可见的 C) Visual Basic中输入对话框是用InputBox函数建立的 D) 调用同一个通用对话框控件的不同方法(如ShowOpen或ShowSave)可以打开不同的对话框窗口
单选题定义变量如下: Dim Str_x Str_x="祝你成功!" 若在立即窗口中显示Str_x的值,下面正确的是______。
单选题在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:Private Sub Command1_Click() n=0 For i=0 To 10 X=2 * i-1 If X Mod 3=0 Then n=n+1 Next i Print nEnd Sub运行程序,单击命令按钮,则窗体上显示的是( )。
单选题可以用作其他控件容器的控件有______。
单选题文本框控件最多能处理 ______ 个字节。
单选题设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1_Click() Dim a[3,3) As Integer For i=1 To 3 For j=1 To 3 a(i,j):i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序,单击命令按钮,输出结果是( )。 A) 20 B) 7 C) 16 D) 17
单选题对窗体上名称为Command1的命令按钮,编写如下事件过程:
Private Sub Command1_Click()
Move 200, 200
End Sub
程序运行时,单击命令按钮,则产生的操作是______。
单选题下述不属于概念模型应具备的性质的是( )。 A) 有丰富的语义表达能力 B) 易于交流和理解 C) 易于变动 D) 在计算机中实现的效率高