单项选择题

执行如下两条语句后，窗体上显示的是( )。　　a=9．8596 　　Print Format(a，"$00，00．00")

A．0，009．86
B．$9．86
C．9．86
D．$0，009．86

你可能感兴趣的试题

单项选择题

模块独立性是软件模块化所提出的要求，衡量模块独立性的度量标准是模块的( )。

A．抽象和信息隐蔽
B．局部化和封装化
C．内聚性和耦合性
D．激活机制和控制方法

单项选择题

按照“后进先出”原则组织数据的数据结构是( )。

A．队列
B．栈
C．双向链表
D．二叉树

单项选择题

下列对于软件测试的描述正确的是( )。

A．软件测试的目的是证明程序是否正确
B．软件测试的目的是使程序运行结果正确
C．软件测试的目的是尽可能多地发现程序中的错误
D．软件测试的目的是使程序符合结构化原则

单项选择题

面向对象的设计方法与传统的面向过程的方法有本质不同，它的基本原理是( )。

A．模拟现实世界中不同事物之间的联系
B．强调模拟现实世界中的算法而不强调概念
C．使用现实世界的概念抽象地思考问题从而自然地解决问题
D．鼓励开发者在软件开发的绝大部分中都用实际领域的概念去思考

单项选择题

下述关于数据库系统的叙述中，正确的是( )。

A．数据库系统减少了数据冗余
B．数据库系统避免了一切冗余
C．数据库系统中数据的一致性是指数据类型一致
D．数据库系统比文件系统能管理更多的数据

单项选择题

对如下二叉树
　　进行后序遍历的结果为( )。

A．ABCDEF
B．DBEAFC
C．ABDECF
D．DEBFCA

单项选择题

下列关于关系运算的叙述中正确的是( )。

A．投影、选择、连接从二维表的行的方向来进行运算
B．并、交、差从二维表的列的方向来进行运算
C．投影、选择、连接从二维表的列的方向来进行运算
D．以上三种说法都不对

单项选择题

数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是( )。

A．DB包含DBS和DBMS
B．DBMS包含DB和DBS
C．DBS包含DB和DBMS
D．没有任何关系

单项选择题

同一概念在一处为实体而在另一处为属性或联系的冲突，在视图集成中称为( )。

A．命名冲突
B．概念冲突
C．域冲突
D．约束冲突

单项选择题

索引属于( )。

A．模式
B．内模式
C．外模式
D．概念模式

单项选择题

下列不能扫开菜单编辑器的操作是( )。

A．按“Ctrl+E”组合键
B．单击工具栏中的“菜单编辑器”按钮
C．执行“工具”菜单中的“菜单编辑器”命令
D．按“Shift+AIt+M”组合键

单项选择题

在窗体上建立通用对话框需要先添加的控件是( )。

A．Data控件
B．From控件
C．CommonDialog控件
D．VBComboBox控件

单项选择题

不能脱离控件(包括客体)而独立存在的过程是( )。

A．事件过程
B．通用过程
C．Sub过程
D．函数过程

单项选择题

执行如下两条语句后，窗体上显示的是( )。　　a=9．8596 　　Print Format(a，"$00，00．00")

A．0，009．86
B．$9．86
C．9．86
D．$0，009．86

单项选择题

下面循环语句中在任何情况下都至少执行一次循环体的是( )。

A．Do While<条件>
循环体
Loop
B．While <条件>
循环体
Wend
C．Do
循环体
Loop Until<条件>
D．Do Until <条件>
循环体
Loop

单项选择题

执行x$=InputBox("请输入x的值")时，在弹出的对话框中输入123，在列表框 List1中选中一个列表项(数据为456)，使结果为123456 的语句是( )。

A．y=x$+List1．List(0)
B．y=x$+List1．List(1)
C．y=Val(x$)+Val(List1．List(0))
D．y=Val(x$)＆Val(List1．List(1))

单项选择题

如果一个变量未经定义就直接使用，则该变量的类型为( )。

A．Inieger
B．Byte
C．Boolean
D．Variant

单项选择题

下列各控件不包含滚动条的控件是( )。

A．Lis tBox
B．ComboBox
C．TextBox
D．Label

单项选择题

在Visual Basic中，要将一个窗体加载到内存进行预处理但不显示，应使用的语句是( )。

A．Load
B．Show
C．Hide
D．Unload

单项选择题

以F叙述中错误的是( )。

A．一个工程中只能有一个Sub Main过程
B．窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体
C．窗体的Hide方法和Unload方法的作用完全相同
D．若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体

单项选择题

以下叙述中错误的是( )。

A．一个工程中可以包含多个窗体文件
B．在一个窗体文件中用Private定义的通用过程能被其他窗体调用
C．在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件
D．全局变量必须在标准模块中定义

单项选择题

假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。　　Model1代码如下：　　Public X As Integer 　　Public Y As Integer 　　Sub S1() 　　 x=1 　　 S2 　　End Sub 　　Sub S2() 　　 y=10 　　 Form1．Show 　　End Sub 　　Model2的代码如下：　　Sub Main() 　　 S1 　　End Sub 　　其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是( )。

A．Form1→Model1→Model2
B．Model1→Model2→Form1
C．Model2→Model1→Form1
D．Model2→Form1→Model1

单项选择题

设有如下程序：　　Option Base 0 　　Private Sub Form_Click() 　　 Dim a 　　 Dim i As Integer 　　 a=Array(1，2，3，4，5，6，7，8，9) 　　 For i=0 To 3 　　 Print a(5-i)；　　 Next 　　End Sub 　　程序运行后，单击窗体，则在窗体上显示的是( )。

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

单项选择题

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮，运行后的窗体外观如图所示：
　　设有如下的类型和变量声明：　　Private Type Person 　　 name As STRING8 　　 major As String20 　　End Type 　　Dim P As Person 　　设文本框中的数据已正确地赋值给Person类型的变量P，当点击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是( )。

A．Open"C：＼Test2．dat"For Output As#1
Put#1，1，p
Close#1
B．0pen"c：＼Test2．dat"For Random As#1
Get#1，1，P
Close#1
C．Open”C：＼Test2．dat”For Random As#1 Len—Len(p)
Put#1，1，P
Close#1
D．Open"C：＼Test2．dat"For Random As#1 Len=Len(p)
Get#1，1，P
Close#1

单项选择题

为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是( )。

A．Visible
B．Timer
C．Enabled
D．Interval

单项选择题

在窗体上有一个命令按钮，然后编写如下事件过程：　　Private Sub Command1Click() 　　 Dim a(5)As String 　　 For i=1，To 5 　　 a(i)=Chr(Asc("A")+(i-1)) 　　 Next i 　　 For Each b In a 　　 Print b；　　 Next 　　End Sub 　　程序运行后，单击命令按钮，输出结果是( )。

A．ABCDE
B．1 2 3 4 5
C．abcde
D．出错信息

单项选择题

下列说法正确的是( )。

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

单项选择题

设a=2，b=3，c=4，d=5，下列表达式的值是( )。　　Not a<=c Or 4*C=b^2 And b<>a+C

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

单项选择题

窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是( )。

A．Private Sub save Click()
Text1．Text=file．save．Caption
End Sub
B．Private Sub save Click()
Text1．Text=save．Caption
End Sub
C．Private Sub file Click()
Text1．Text=file．save．Caption
End Sub
D．Private Sub file Click()
Text1．Text=save．Caption
End Sub

单项选择题

Sub过程与Function过程最根本的区别是( )。

A．Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以
B．Function过程可以有形参，Sub过程不可以
C．Sub过程不能返回值，而Function过程能返回值
D．两种过程参数的传递方式不同

单项选择题

目录列表框的Path属性的作用是( )。

A．显示当前驱动器或指定驱动器上的某目录下的文件名
B．显示当前驱动器或指定驱动器上的目录结构
C．显示根目录下的文件名
D．显示该路径下的文件

单项选择题

以下关于文件的叙述中，错误的是( )。

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

单项选择题

以下叙述中错误的是( )。

A．在KeyPress事件过程中不能识别键盘的按下与释放
B．在KeyPress事件过程中不能识别回车键
C．在KeyDown和KeyUp事件过程中，将键盘输入的“A”和“a”视作相同的字母
D．在KeyDown和KeyUp事件过程中，从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符

单项选择题

以下关于KeyPress事件过程中参数KeyAscii的叙述正确的是( )。

A．KeyAscii参数是所按键的ASCII码
B．KeyAscii参数的数据类型为字符串
C．KeyAscli参数可以省略
D．KeyAscii参数是所按键上标注的字符

单项选择题

窗体上有1个名称为List1的列表框，其中已经输入了若干个项目，如图所示；还有　　2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有下列事件过程。　　Private Sub Command1_Click() 　　 Dim str As String，S As String．k As Integer 　　 s=Text1 　　 str ="" 　　 For k=Listl．ListCount-1 To 0 Step-1 　　 If InStr(List1．List(k)，s)>0 Then 　　 str=str ＆ List1．List(k)＆"" 　　 End If 　　 Next k 　　 If str=""Then 　　 Text2="没有匹配的项目" 　　 Else 　　 Text2=str 　　 End If 　　End Sub
　　程序运行时，在Text1中输入"京"，单击命令按钮，则在Text2中显示的内容是( )。

A．京
B．北京南京
C．南京北京
D．没有匹配的项目

单项选择题

在窗体E先后画2个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片，如图1所示，且将banana．DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖拽到Picture1中，如图2所示。能实现此功能的事件过程是( )。

A．Private 3ub Form—DragDrop(Source As Control，X As Single，Y As Single)
banana．Move Picture1．Left+X，Picture1．Top+Y
End Sub
B．Private Sub banana_DragDrop(Source As Control，X As Single，Y As Single)
Source．Move Picture1．Left+X，Picture 1．Top+Y
End Sub
C．Private Sub Picturei_DragDrop(Source As Control，X As Single，Y As Single)
Source．Move Picture1．Left+X，Picture1．Top+Y
End Sub
D．Private Sub Picture1_DragDrop(Source As Control，X As Single，Y As Single)
banana．Move banana．Left+X，banana．Top +Y
End Sub

单项选择题

在窗体上画1个名称为Command1的命令按钮，然后编写下列程序：　　Private Sub Command1_Click() 　　Print fun("ABCDEFG") 　　End Sub 　　Function fun(st As String)As string 　　 stlen=Len(st) 　　 temp="" 　　 For k=1 To stlen／2 　　 temp=temp+Mid(st，k，1)+Mid(st，stlen-k+1，1) 　　 Next k 　　 fun=temp 　　End Function 　　程序运行时，单击命令按钮，则在窗体上显示的是( )。

A．ABCDEFG
B．AGBFCE
C．GFEDCBA
D．AGBFCED

单项选择题

在窗体上面1个名称为Command1的命令按钮，然后编写下列事件过程　　Option Base 1 　　Private Sub，Command1 Click() 　　 Dim a(5，5)ks Integer 　　 For i=1 To j 　　 For j=1 To 5 　　 a(i，j)=(i+j)*5＼10 　　 Next j 　　 Next i 　　 S=0 　　 For i=1 To j 　　 s=s+a(i，i) 　　 Next i 　　 Print s 　　End Sub 　　程序运行后，单击命令按钮，输出结果是( )。

A．15
B．13
C．11
D．9

单项选择题

在窗体上画2个命令按钮，名称分别为Command1、Command2，然后编写下列事件过程。　　Const n=5．m=4 　　Dim a(m，n) 　　Private Sub+Command1 Click() 　　 k=1 　　 For i=1 To m 　　 For j=1 To n 　　 a(i，j)=k 　　 k=k+1 　　 Next j 　　 Next i 　　 End Sub 　　Private Sub Command2 Click() 　　summ=0 　　For i=1 To m 　　 For j=1 To n 　　 If i=1 Or i=m Then 　　 summ=summ+a(i，j) 　　 Else 　　 If j=1 Or j=n Then 　　 summ=summ+a(i，j) 　　 End If 　　 End If 　　 Next j 　　 Next i 　　 Print summ 　　End Sub 　　过程Command1_Click()的作用是在二维数组a中存放1个m行n列的矩阵；过程Command2 Click()的作用是( )。

A．计算矩阵外围一圈元素的累加和
B．计算矩阵除外围一圈以外的所有元素的累加和
C．计算矩阵第1列和最后一列元素的累加和
D．计算矩阵第1行和最后一行元素的累加和

单项选择题

在窗体上从仨到右有Text1、Text2两个文本框，如图所示，要求程序运行时，在Text1 中输入1个分数后按回车键，则判断分数的合法性，若分数为0～100中的1个数，则光标移到Text2中；否则光标不动，并弹出对话框显示“分数错”。下列程序中正确的是( )。