已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是...

下列程序段，在运行时最早输出的内容是（）。　　a=2 　　C=1 　　AAA：　　　C=C + a 　　　If c＜10 Then 　　　　　Print c 　　　　　GoTo AAA 　　　Else 　　　　　Print"10以内的奇数显示完毕。" 　　End If

A．3
B．7
C．9
D．6

单项选择题

Visual Basic标题栏上显示了应用程序的（）。

A．子类的访问权限比父类方法的访问权限要高
B．继承性是面向对象方法的一个重要特征，它使代码可重用，可降低程序的复杂性
C．子类方法不能产生比父类方法更多的异常
D．重写是指子类的成员方法与父类的成员方法名字相同，参数列表相同，方法体不同

单项选择题

下列程序段的执行结果为( )。　　a=95 　　If a ＞ 60 Then degree=1 　　If a ＞ 70 Then degree=2 　　If a ＞ 80 Then degree=3 　　If a ＞ 90 Then degree=4 　　Print"degree="；degree

A． 8 9
B． 9 8
C．程序有错误
D． 9 9

单项选择题

新建一个窗体，其Borderstyle属性设置为Fixed Single，但运行时却没有最大化和最小化按钮，可能的原因是（）。

A．默认情况下，属性Visible的值为False
B．如果设置控件的Visible属性为False，则运行时控件会隐藏
C．Visible的值可设为True或者False
D．设置Visible属性同设置Enabled属性的功能是相同的，都是使控件处于失效状态

单项选择题

单击命令按钮时，下列程序的执行结果是( )。　　Private Sub Commandl_Click( ) 　　　　BT 4 　　End Sub 　　PriVate Sub BT(x As Integer) 　　　　X=X * 2 + 1 　　　　If x ＜6 Then 　　　　　Call BT(x) 　　　　End If 　　　　X=x * 2 　　　　Print x；　　End Sub

A．15
B．16
C．17
D．18

单项选择题

以下关于文件的叙述中，错误的是（）。

A．顺序文件中的记录一个接一个地顺序存放
B．随机文件中记录长度是随机的
C．执行打开文件的命令后，自动生成一个文件指针
D．LOF函数返回给文件分配的字节数

单项选择题

下列数据结构中，能用二分法进行查找的是______。

A．顺序存储的有序线性表
B．线性链表
C．二叉链表
D．有序线性链表

单项选择题

在窗体上画一个名称为File的文件列表框，并编写如下程序： Private Sub File1_DblClick( ) x=Shell(File1．FileName，1) End Sub 以下关于该程序的叙述中，错误的是（）。

A．x没有实际作用，因此可以将该语句写为：Call Shell(File．FileName，1)
B．双击文件列表框中的文件，将触发该事件过程
C．要执行的文件的名字通过File1．FileName指定
D．File1中显示的是当前驱动器、当前目录下的文件

单项选择题

下列程序段，在运行时最后输出的内容是( )。　　a=2 　　c=3 　　AAA：　　c=c * a 　　If c〈10 Then 　　　　Print c 　　　　GoTo AAA 　　Else 　　　　Print“10以内的奇数显示完毕” 　　End If

A． 5，2，3
B． -5，-12，-7
C． -5，-12，-17
D． 5，-2，-7

单项选择题

有如下程序：　　Private Sub Commandl_Click( ) 　　　　a$="A WORKER IS HERE" 　　　　x=Len(a$) 　　　　For i=1，To x-1 　　　　　　b$=Mid$(a$，i，3) 　　　　　　If b$="WOR" Then S=S+1 　　　　Next 　　　　Print S 　　End Sub 　　单击命令按钮，程序运行结果为( )。

A．1
B．2
C．3
D．5

单项选择题

设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bt，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单相应鼠标右键菜单的是( )。

A． a+=a-=(b=4) * (a=3)
B． a=a * 3+2
C． x％(-3)
D． y=float i

单项选择题

下列程序段的执行结果为( )。　　m=2 　　n=3 　　Do 　　　　m=m+n 　　　　n=n + 1 　　Loop While m＜10 　　Print m；n

A．CLASS ACLASS B
B．CLASS ACLASS BCLASS B
C．CLASS ACLASS BCLASS ACLASS B
D．CLASS ACLASS BCLASS BCLASS B

单项选择题

对下列二叉树,进行中序遍历的结果是【】

A．ACBDFEG
B．ACBDFGE
C．ABDCGEF
D．FCADBEG

单项选择题

假定有如下事件过程： Private Sub Form_Click() Dim x As Integer, n As Integer x = 1 n = 0 Do While x < 28 x = x * 3 n = n + 1 Loop Print x, n End Sub 程序运行后，单击窗体，输出结果为______。

A．81 4
B．56 3
C．28 1
D．243 5

单项选择题

以下各项中，Visual Basic不能接收的图形文件是（）。

A．.ico文件
B．.jpg文件
C．.psd文件
D．.bmp文件

单项选择题

下列描述中正确的是______。

A．软件工程只是解决软件项目的管理问题
B．软件工程主要解决软件产品的生产率问题
C．软件工程的主要思想是强调在软件开发过程中需要应用工程化原则
D．软件工程只是解决软件开发中的技术问题

单项选择题

函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正确实现上述功能的代码的是 ______。

A．Function F1(b As Integer) If b Mod 2 = 0 Then Return 0 Else Return 1 End If End Function
B．Function F1(b As Integer) If b Mod 2 = 0 ThenF1 = 0 Else F1 = 1 End If End Function
C．Function F1(b As Integer)If b Mod 2 = 0 ThenF1 = 1 Else F1 = 0 End If End Function
D．Function F1(b As Integer) If b Mod 2 <> 0 ThenReturn 0 ElseReturn 1 End If End Function

单项选择题

下列数组定义语句错误的是( )。

A．k％=10Dim Arr(k)
B．Const k％=10Dim Arr(k)
C．Dim Arrl(10) As IntegerDim Arr2(10)
D．Dim Arrl(1 To 10)Dim Arr2(1 To 10，2 To 11)

单项选择题

在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。

A．Private Sub Text1_Change() Command1.Caption = "计算机等级考试" End Sub
B．Private Sub Command1_ Click () Caption = "计算机等级考试" End Sub
C．Private Sub Form1_ Click () Text1.Caption = "计算机等级考试" End Sub
D．Private Sub Command1_ Click () Text1.Text = "计算机等级考试" End Sub

单项选择题

设菜单中有一个菜单项为“Open”。若要为该菜单命令设置访问键，即按下Alt及字母O 时，能够执行“Open”命令，则在菜单编辑器中设置“Open”命令的方式是（）。

A．把Caption属性设置为&Open
B．把Caption属性设置为&Open
C．把Name属性设置为&Open
D．把Name属性设置为&Open

单项选择题

若设置了文本框的属性Password Char=“$”,则运行程序时向文本框中输入8个任意字符后,文本框中显不的是【】

A．8个“$”
B．1个"$"
C．8个“$”
D．无任何内容

单项选择题

已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是“模态型”宙体，则“模式”值为（）。

A． True
B．0
C．1
D． False

单项选择题

用树形结构表示实体之间联系的模型是______。

A．关系模型
B．网状模型
C．层次模型
D．以上三个都是

单项选择题

下列叙述中错误的是【】

A．在数据库系统中,数据的物理结构必须与逻辑结构一致
B．数据库技术的根本目标是要解决数据的共享问题
C．数据库设计是指在已有数据库管理系统的基础上建立数据库
D．数据库系统需要操作系统的支持

单项选择题

某人创建了1个工程,其中的窗体名称为Form1；之后又添加了1个名为Fonn2的窗体,并希望程序执行时先显示Fom2.窗体,那么他需要做的工作是【】

A．在工程属性对话框中把“启动对象"设置为Form2
B．在Form1的Load事件过程中加入语句Load Form2
C．在Form2的Load事件过程中加入语句Form2.Show
D．把Form2的Tab Index属性设置为l,把Form1的Tab Index属性设置为2

单项选择题

单击命令按钮时，下列程序的执行结果为（）。　　Private Sub Command1_Click() 　　　Dim a As Integer，b As Integer，c As Integer 　　　a=2：b=3：C=4 　　　Print P2(c，b，A) 　　End Sub 　　Private Function P1(x As Integer，y As Integer，z As Integer) 　　　P1=2 * X + y + 3 * z 　　End Function 　　Private Function P2(x As Integer，y As Integer，z As Integer) 　　　P2=P1(z，x，y) + X 　　End Function

A．21
B．19
C．17
D．34

单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：　　Private Sub Command1_Click() 　　　n = Val(Text1.Text) 　　　For i = 2 To n 　　　　For j = 2 To sqr(i) 　　　　　If i Mod j = 0 Then Exit For 　　　　Next j 　　　　If j > Sqr(i) Then Print i 　　　Next i 　　End Sub 　　该事件过程的功能是（）。

A．输出n以内的奇数
B．输出n以内的偶数
C．输出n以内的素数
D．输出n以内能被j整除的数

单项选择题

有如下事件过程，当同时按下转换键Shift和功能键F5时其最后输出的信息是（）。　　Const ShiftKey=1 　　Const CtrlKey=2 　　Const Key_F5=&H74 　　Const Key_F6=&H75 　　Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) 　　　　If KeyCode=Key_F5 And Shift=ShiftKey Then 　　　　　　Print"Press Shift+F5" 　　　　ElseIf KeyCode=Key_F6 And Shift=CtrlKey Then 　　　　　　Print"Press Ctrl+F6" 　　　　End If 　　End Sub

A．无任何信息
B． Press Shift+F5
C． Press Ctrl+F6
D．程序出错

单项选择题

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：　Private Sub Command1_Click() 　　strText = InputBox("请输入") 　　Text1.Text = strText 　End Sub 　Private Sub Text1_Change() 　　Label1.Caption = Right(Trim(Text1.Text), 3) 　End Sub 　程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是

A．空
B．abcdef
C．abc
D．def

单项选择题

下列程序的执行结果为( )。　　Private Sub Commandl_Click() 　　　　Dim s1 As String ,s2 As String 　　　　s1= "abcd" 　　　　Call Transfer(sl，s2) 　　　　Print s2 　　End Sub 　　Private Sub Transfer (ByVal xstr As String，ystr As String) 　　　　Dim tempstr As String 　　　　ystr=tempstr 　　End Sub

A． dcba
B． abdc
C． abcd
D． dabc

单项选择题

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程：　　Private Sub Commandl_Click() 　　　　CommonDialogl，Flags=vbOFNHideReadOnly 　　　　CommontDialogl．Filter="All Files(．)|．|Text Files (.)|．txt|"_ 　　　　　　　　　　　　　　　　　& Batch Files (．bat) |*．bat" 　　　　CommonDialogl．Filterlndex=1 　　　　CommonDialogl．Showopen 　　　　MsgBox CommonDialogl．FileName 　　End Sub 　　程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是( )。

A．All Fries(*.*)
B．Text Files(*.*)
C．Batch Files(*．bat)
D．All Files (*．*)|Text Files(*．*)

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1，2，3，4，5) Sum=0 For i=1To 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)>x Then Print a(i)； Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是（）。

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

已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是“模态型”宙体，则“模式”值为（ ）。

你可能感兴趣的试题

为了暂时关闭计时器，应把该计时器控件的哪个属性设置为False

单击窗体上的关闭按钮时，触发的事件是（ ）。

在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为（ ）。

下列程序段，在运行时最早输出的内容是（ ）。 a=2 C=1 AAA： C=C + a If c＜10 Then Print c GoTo AAA Else Print"10以内的奇数显示完毕。" End If

Visual Basic标题栏上显示了应用程序的（ ）。

下列程序段的执行结果为( )。 a=95 If a ＞ 60 Then degree=1 If a ＞ 70 Then degree=2 If a ＞ 80 Then degree=3 If a ＞ 90 Then degree=4 Print"degree="；degree

新建一个窗体，其Borderstyle属性设置为Fixed Single，但运行时却没有最大化和最小化按钮，可能的原因是 （ ）。

单击命令按钮时，下列程序的执行结果是( )。 Private Sub Commandl_Click( ) BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x ＜6 Then Call BT(x) End If X=x * 2 Print x； End Sub

以下关于文件的叙述中，错误的是（ ）。

下列数据结构中，能用二分法进行查找的是______。

在窗体上画一个名称为File的文件列表框，并编写如下程序： Private Sub File1_DblClick( ) x=Shell(File1．FileName，1) End Sub 以下关于该程序的叙述中，错误的是（ ）。

下列程序段，在运行时最后输出的内容是( )。 a=2 c=3 AAA： c=c * a If c〈10 Then Print c GoTo AAA Else Print“10以内的奇数显示完毕” End If

有如下程序： Private Sub Commandl_Click( ) a$="A WORKER IS HERE" x=Len(a$) For i=1，To x-1 b$=Mid$(a$，i，3) If b$="WOR" Then S=S+1 Next Print S End Sub 单击命令按钮，程序运行结果为( )。

设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bt，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单相应鼠标右键菜单的是( )。

下列程序段的执行结果为( )。 m=2 n=3 Do m=m+n n=n + 1 Loop While m＜10 Print m；n

对下列二叉树,进行中序遍历的结果是【 】

假定有如下事件过程： Private Sub Form_Click() Dim x As Integer, n As Integer x = 1 n = 0 Do While x < 28 x = x * 3 n = n + 1 Loop Print x, n End Sub 程序运行后，单击窗体，输出结果为______。

以下各项中，Visual Basic不能接收的图形文件是（ ）。

下列描述中正确的是______。

函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正 确实现上述功能的代码的是 ______。

下列数组定义语句错误的是( )。

设菜单中有一个菜单项为“Open”。若要为该菜单命令设置访问键，即按下Alt及字母O 时，能够执行“Open”命令，则在菜单编辑器中设置“Open”命令的方式是（ ）。

若设置了文本框的属性Password Char=“$”,则运行程序时向文本框中输入8个任意字符后,文本框中显不的是【 】

已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是“模态型”宙体，则“模式”值为（ ）。

用树形结构表示实体之间联系的模型是______。

下列叙述中错误的是【 】

某人创建了1个工程,其中的窗体名称为Form1；之后又添加了1个名为Fonn2的窗体,并希望程序执行时先显示Fom2.窗体,那么他需要做的工作是【 】

下列程序的执行结果为( )。 Private Sub Commandl_Click() Dim s1 As String ,s2 As String s1= "abcd" Call Transfer(sl，s2) Print s2 End Sub Private Sub Transfer (ByVal xstr As String，ystr As String) Dim tempstr As String ystr=tempstr End Sub

已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是“模态型”宙体，则“模式”值为（）。

单击窗体上的关闭按钮时，触发的事件是（）。

在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为（）。

下列程序段，在运行时最早输出的内容是（）。　　a=2 　　C=1 　　AAA：　　　C=C + a 　　　If c＜10 Then 　　　　　Print c 　　　　　GoTo AAA 　　　Else 　　　　　Print"10以内的奇数显示完毕。" 　　End If

Visual Basic标题栏上显示了应用程序的（）。

下列程序段的执行结果为( )。　　a=95 　　If a ＞ 60 Then degree=1 　　If a ＞ 70 Then degree=2 　　If a ＞ 80 Then degree=3 　　If a ＞ 90 Then degree=4 　　Print"degree="；degree

新建一个窗体，其Borderstyle属性设置为Fixed Single，但运行时却没有最大化和最小化按钮，可能的原因是（）。

以下关于文件的叙述中，错误的是（）。

在窗体上画一个名称为File的文件列表框，并编写如下程序： Private Sub File1_DblClick( ) x=Shell(File1．FileName，1) End Sub 以下关于该程序的叙述中，错误的是（）。

下列程序段，在运行时最后输出的内容是( )。　　a=2 　　c=3 　　AAA：　　c=c * a 　　If c〈10 Then 　　　　Print c 　　　　GoTo AAA 　　Else 　　　　Print“10以内的奇数显示完毕” 　　End If

下列程序段的执行结果为( )。　　m=2 　　n=3 　　Do 　　　　m=m+n 　　　　n=n + 1 　　Loop While m＜10 　　Print m；n

对下列二叉树,进行中序遍历的结果是【】

以下各项中，Visual Basic不能接收的图形文件是（）。

函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正确实现上述功能的代码的是 ______。

设菜单中有一个菜单项为“Open”。若要为该菜单命令设置访问键，即按下Alt及字母O 时，能够执行“Open”命令，则在菜单编辑器中设置“Open”命令的方式是（）。

若设置了文本框的属性Password Char=“$”,则运行程序时向文本框中输入8个任意字符后,文本框中显不的是【】

已知使用Show方法的格式为:[窗体名称]．Show[模式]，如果要使窗体是“模态型”宙体，则“模式”值为（）。

下列叙述中错误的是【】

某人创建了1个工程,其中的窗体名称为Form1；之后又添加了1个名为Fonn2的窗体,并希望程序执行时先显示Fom2.窗体,那么他需要做的工作是【】