下面程序执行时，输出的结果是______。 Private Sub For...

单项选择题

待排序的关键码序列为(15，20，9，30，67，65，45，90)，要按关键码值递增的顺序排序，采取简单选择排序法，第一趟排序后关键码15被放到第______个位置。

A.2
B.3
C.4
D.5

单项选择题

对关系S和关系R进行集合运算，结果中既包含关系S中的所有元组也包含关系R中的所有元组，这样的集合运算称为______。

A.并运算
B.交运算
C.差运算
D.除运算

单项选择题

下列选项中，不属于数据管理员(DBA)职责的是______。

A.数据库维护
B.数据库设计
C.改善系统性能，提高系统效率
D.数据类型转换

单项选择题

下面的数写成普通十进制数是______。 8.6787E+8

A.86787000
B.867870000
C.8678700
D.8678700000

单项选择题

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的______。

A.AutoSize属性
B.Resize事件
C.AutoRedraw属性
D.Stretch属性

单项选择题

以下能正确定义数据类型SystemInfo的代码是______。

A.Type SystemInfo DiskDrives AS String*10 Memory AS Long End Type
B.Type SystemInfo DiskDrives AS String*10 Memory AS Long End SystemInfo
C.Type SystemInfo DiskDrives String*10 Memory Long End Type SystemInfo
D.Typedef SystemInfo DiskDrives String*10 Memory Long End Type

单项选择题

以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是______。

A.Left
B.Mid
C.String
D.Instr

单项选择题

设“A="87654321"”，则表达式Val(Left(A,4)+Mid(A,4,2))的值为______。

A.876543
B.876554
C.8
D.6

单项选择题

窗体上命令按钮的事件过程如下： Private Sub Command1_Click() A="34":B="26":C="98" Print B+C+A End Sub 运行程序后，单击命令按钮，输出结果是______。

A."269834"
B.269834
C.158
D.程序运行出错

单项选择题

当窗体最小化时缩小为一个图标，设置这个图标的属性是______。

A.MouseIcon
B.Icon
C.Picture
D.MousePointer

单项选择题

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

单项选择题

在程序运行时，下面的叙述中正确的是______。

A.用鼠标右键单击窗体中无控件的部分，会执行窗体的Form_Load事件过程
B.用鼠标左键单击窗体的标题栏，会执行窗体的Form_Click事件过程
C.只装入而不显示窗体，也会执行窗体的Form_Load事件过程
D.装入窗体后，每次显示该窗体时，都会执行窗体的Form_Click事件过程

单项选择题

下面的程序执行完毕后，组合框中数据项的值是______。 Private Sub Form_Click() For i=1 To 6 Combo1.AddItem i Next i For i=1 To 3 Combo1.RemoveItem i Next i End Sub

A.1 5 6
B.1 3 5
C.4 5 6
D.2 4 6

单项选择题

窗体上有1个名称为Text1的文本框；1个名称为Thner1的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer If flag=0 Then flag=1 flag=-flag If flag=1 Then Text1.ForeColor=&HFF& ’&HFF&为红色 Else Text1.ForeColor=&HC000$ ’&HC000&为绿色 End If End Sub 以下叙述中正确的是______。

A.每次执行此事件过程时，flag的初始值均为0
B.flag的值只可能取0或1
C.程序有逻辑错误，Else分支总也不能被执行
D.程序执行后，文本框中的文字每5秒改变一次颜色

单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 do Until x=-1 a=InputBox("请输入a的值") a=Val(a) b=InputBox(”请输入b的值") b=Val(b) x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1则输出结果是______。

A.2
B.3
C.14
D.15

单项选择题

下列程序的执行结果为______。 A="5":B="6" A=Val(A)+Val(B) B=Val("56") If A＜＞B Then Print A-B Else Print B-A

A.-45
B.45
C.56
D.0

单项选择题

执行下面的程序段后，变量S的值为______。 S=5 For i=2.6 To 4.9 Step 0.6 S=S+1 Next i

A.10
B.8
C.9
D.7

单项选择题

数学式子5+(a+b)×2对应的Visual Basic表达式是______。

A.5+a+b*2
B.5+(a+b)2
C.5+(a+b)*2
D.5+(a+b)*(a+b)

单项选择题

假定有以下循环结构 Do Until条件循环体 Loop 则正确的描述是______。

A.如果“条件”是一个为0的常数，则一次循环体也不执行
B.如果“条件”是一个为0的常数，则至少执行一次循环体
C.如果“条件”是一个不为0的常数，则至少执行一次循环体
D.不论“条件”是否为“真”，至少要执行一次循环体

单项选择题

某人编写如下函数来判断a是否为素数，若是，则函数返回True；否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean If a＜2 Then isprime=False Else isprime=True k=2 Do While k＜a/2 And isprime If a Mod k=0 Then isprime=False Else k=k+1 End If Loop End If prime=isprime End Function 在测试时发现有1个非素数也被判断为素数，这个错判的数是______。

A.0
B.1
C.4
D.6

单项选择题

假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是______。

A.数组中每个命令按钮的名称(名称属性)均为Command1
B.数组中每个命令按钮的标题(Caption属性)都一样
C.数组中所有命令按钮可以使用同一个事件过程
D.用名称Command1(下标)可以访问数组中的每个命令按钮

单项选择题

以下叙述中正确的是______。

A.事件过程都由用户来编写
B.事件过程都不是由用户编写的
C.事件过程有的由用户编写，有的由系统确定
D.用户可以确定事件方法过程是否由用户编写

单项选择题

下面程序执行时，输出的结果是______。 Private Sub Form_Click() Dim i As Integer,j As Integer i=10 Do i=i+j For j=10 To i Step-3 i=i+j Next j Loop While i＜50 Print i;j End Sub

A.50 10
B.50 9
C.57 10
D.57 9

单项选择题

下列不一定是传值的虚实结合方式的选项是______。

A.调用过程时实参为表达式
B.调用过程时实参为常量
C.调用过程时实参为变量名
D.调用过程时实参将变量名用括号括起来

单项选择题

在窗体上有两个文本框：Text1和Text2，然后编写如下事件过程： Private Sub Form_Load() Show Text1.Text="":Text2.Text="":Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在Text2文本框中输入“ertyu”，则Text1文本框中的内容为______。

A.anpuq
B.ANPUQ
C.ERTYU
D.ertyu

单项选择题

下列叙述中错误的是______。

A.一个工程中可以含有多个标准模块文件
B.以.bas为扩展名的文件是标准模块文件
C.窗体文件包含该窗体及其控件的属性
D.在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件

单项选择题

要使菜单项MenuOne在程序运行时失效，应使用的语句是______。

A.MenuOne.Visible=True
B.MenuOne.Visible=False
C.MenuOne.Enabled=True
D.MenuOne.Enabled=False

单项选择题

下列程序的功能是调用字体对话框来设置文本框中的字体，单击Command1按钮弹出对话框，进行相应的字体、字号等的设置，然后单击“确定”按钮退出对话框，则文本框中将发生哪些变化______。 Private Sub Command1_Click() CommonDialog1.CancelError=True CommonDialog1.Flags=3 On Error Resume Next CommonDialog1.ShowFont Text1.Font.Name=CommonDialog1.FontName Text1.Font.Size=CornmonDialog1.FontSize Text1.Font.Bold=CommonDialog1.FontBold Text1.Font.Italic=CommonDialog1.FontItalic Text1.Font.Underline=CommonDialog1.FontUnderline Text1.FontStrikethru=CommonDialog1.FontStrikethru Text1.ForeColor=CommonDialog1.Color End Sub

A.Text1的文字下划线发生变化
B.Text1的字体发生变化
C.Text1的字体和颜色发生变化
D.程序出错

单项选择题

下面______不是VB的文件系统控件。

A.DriveListBox控件
B.DirListBox控件
C.FileListBox控件
D.ListBox控件

单项选择题

下面的程序执行时，将把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框Text1中显示出来。在横线处应填写______。 Private Sub Command1_Click() Dim inData As String Text1.Text="" Open ".\smtext1.txt"AS #1 Do While Input #1,inData Text1.Text=Text1.Text & inData Loop Close #1 End Sub

A.Input (EOF(1))
B.Input (Not EOF(1))
C.Append (Not EOF(1))
D.Append (EOF(1))

单项选择题

以下程序的功能是：把父目录下顺序文件smtext1.txt的内容读入内存，并在文本框Text3中显示出来。请选择适合横线处的语句______。 Private Sub Command1_Click() Dim inData As String Text3.Text="" Open "..\smtext1.txt"As #1 Do While Input #1,inData Text3.Text=Text3.Text & inData Loop Close #1 End Sub

A.For Input Not EOF(1)
B.For Output EOF(1)
C.For Append Not EOF(1)
D.For Random EOF(1)

单项选择题

为达到把a、b中的值交换后输出的目的，某人编程如下： Private Sub Command1_Click() a%=10:b%=20 Call swap(a,b) Print a,b End Sub Private Sub swap(ByVal a As Integer,ByVal b As Integer) c=a:a=b:b=c End Sub 在运行时发现输出结果错了，需要修改。下面列出的错误原因和修改方案中正确的是______。

A.调用swap过程的语句错误，应改为：Call swap a,b
B.输出语句错误，应改为：Print "a","b"
C.过程的形式参数有错，应改为：swap(ByRef a As Integer,ByRef b As Integer)
D.swap中3条赋值语句的顺序是错误的，应改为a=b:b=c:c=a

单项选择题

有如下函数过程： Function f1(x As Integer)As Long Dim s As Long Dim i As Integer s=0 For i=1 To x s=s+i Next i f1=s End Function 在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为______。 Private Sub Command1_Click() Dim i As Integer Dim sum As Long For i=1 To 5 sum=sum+f1(i) Next i Print sum End Sub

A.25
B.35
C.45
D.55

下面程序执行时，输出的结果是______。 Private Sub Form_Click() Dim i As Integer,j As Integer i=10 Do i=i+j For j=10 To i Step-3 i=i+j Next j Loop While i＜50 Print i;j End Sub

你可能感兴趣的试题

算法的时间复杂度是指______。

数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是______。

在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键，它们称为该表的______。

检查软件产品是否符合需求定义的过程称为______。

以下数据结构中，属于非线性数据结构的是______。

内聚性是对模块功能强度的衡量，下列选项中，内聚性较弱的是______。

数据结构中，与所使用的计算机无关的是数据的______。

待排序的关键码序列为(15，20，9，30，67，65，45，90)，要按关键码值递增的顺序排序，采取简单选择排序法，第一趟排序后关键码15被放到第______个位置。

对关系S和关系R进行集合运算，结果中既包含关系S中的所有元组也包含关系R中的所有元组，这样的集合运算称为______。

下列选项中，不属于数据管理员(DBA)职责的是______。

下面的数写成普通十进制数是______。 8.6787E+8

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的______。

以下能正确定义数据类型SystemInfo的代码是______。

以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是______。

设“A="87654321"”，则表达式Val(Left(A,4)+Mid(A,4,2))的值为______。

窗体上命令按钮的事件过程如下： Private Sub Command1_Click() A="34":B="26":C="98" Print B+C+A End Sub 运行程序后，单击命令按钮，输出结果是______。

当窗体最小化时缩小为一个图标，设置这个图标的属性是______。

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

在程序运行时，下面的叙述中正确的是______。

下面的程序执行完毕后，组合框中数据项的值是______。 Private Sub Form_Click() For i=1 To 6 Combo1.AddItem i Next i For i=1 To 3 Combo1.RemoveItem i Next i End Sub

下列程序的执行结果为______。 A="5":B="6" A=Val(A)+Val(B) B=Val("56") If A＜＞B Then Print A-B Else Print B-A

执行下面的程序段后，变量S的值为______。 S=5 For i=2.6 To 4.9 Step 0.6 S=S+1 Next i

数学式子5+(a+b)×2对应的Visual Basic表达式是______。

假定有以下循环结构 Do Until条件 循环体 Loop 则正确的描述是______。

假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是______。

以下叙述中正确的是______。

下面程序执行时，输出的结果是______。 Private Sub Form_Click() Dim i As Integer,j As Integer i=10 Do i=i+j For j=10 To i Step-3 i=i+j Next j Loop While i＜50 Print i;j End Sub

下列不一定是传值的虚实结合方式的选项是______。

下列叙述中错误的是______。

要使菜单项MenuOne在程序运行时失效，应使用的语句是______。

下面______不是VB的文件系统控件。

假定有以下循环结构 Do Until条件循环体 Loop 则正确的描述是______。