全国计算机VB无纸化题库真题选择题Word文件下载.docx

1、下列叙述中正确的是（B）。A） 提高耦合性降低内聚性有利于提高模块的独立性B） 降低耦合性提高内聚性有利于提高模块的独立性C） 耦合性是指一个模块内部各个元素间彼此结合的紧密程度D） 内聚性是指模块间互相连接的紧密程度8.数据库应用系统中的核心问题是（A）。A） 数据库设计B） 数据库系统设计C） 数据库维护D） 数据库管理员培训9.在ER图中，用来表示实体联系的图形是（C）。A） 椭圆形B） 矩形C） 菱形D） 三角形10.有三个关系R、S和T如下：则关系T是由关系R和S通过某种操作得到，该操作为（D）。A） 选择B） 投影C） 交D） 并11.以下叙述中错误的是（D）。A） 标准模块文件的

2、扩展名是.basB） 标准模块文件是纯代码文件C） 在标准模块中声明的全局变量可以在整个工程中使用D） 在标准模块中不能定义过程12.在Visual Basic中，表达式3*25 Mod 3的值是（ A ）。A） 1B） 0C） 3D） 出现错误提示13.设a4，b5，c6，执行语句Print ab And b10 Thentx1Elsetx2ftEnd Function运行程序，则窗体上显示的是（B）。A） 38B） 49C） 61D） 7032.窗体上有一个名称为Picture1的图片框控件，一个名称为Label1的标签控件，如图所示。现有如下程序：Public Sub display（x

3、 As Control）If TypeOf x Is Label Thenx Caption计算机等级考试xPictureLoadPicture（pic.jpgPrivate Sub Label1_Click（）Call display（Label1）Private Sub Picture1_Click（）Call display（Picture1）对以上程序，下列叙述中错误的是（A）。A） 程序运行时会出错B） 单击图片框，在图片框中显示一幅图片C） 过程中的x是控件变量D） 单击标签，在标签中显示一串文字33.设有如下通用过程：Public Function Fun（xStr As Str

4、ing）As String Dim tStr As String， strL As Integer tStr strLLen（xStr） i1 Do While istrL / 2 tStrtStr & Mid（xStr， i， 1）& Mid（xStr， strLi1， 1） ii1 Loop FuntStr End Function 在窗体上画一个名称为Command1的命令按钮。然后编写如下的事件过程： Private Sub Command1_Click（） Dim S1 As String S1abcdef Print UCase（Fun（S1） End Sub程序运行后，单击命令按

5、钮，输出结果是（C）。A） ABCDEFB） abcdefC） AFBECDD） DEFABC34.某人为计算n！（0n12）编写了下面的函数过程：Private Function fun（n As Integer）As Long Dim p As Long p1 For kn1 To 2 Step1 pp * k Next k funp 在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3种是正确的，错误的方案是（B）。A） 把p1改为 pnB） 把For kn1 To 2 Step1 改为 For k1 To n1C） 把For kn1 To 2 Step1 改为

6、For k1 To nD） 把For kn1 To 2 Step1 改为 For k2 To n35.窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下：If Index1 ThenPrintIf Index2 ThenPrint Command1（2）.Caption运行程序，单击命令按钮2，则如下叙述中正确的是（D）。A） Print Command1（2）.Caption语句有错B） 在窗体上显示C） 在窗体上显示命令按钮3D） 在窗体上显示36.下面程序的执行结果是（B）。a0k1Do While k4xk k akk1Print x；LoopA） 1 4 2

7、7B） 1 1 1C） 1 4 9D） 0 0 037.设有如图所示窗体和以下程序：Text1.TextVisual BasicPrivate Sub Text1_LostFocus（）If Text1.TextBASICThenText1.TextText1.SetFocus程序运行时，在Text1文本框中输入Basic（如图所示），然后单击Command1按钮，则产生的结果是（A）。A） 文本框中无内容，焦点在文本框中B） 文本框中为，焦点在文本框中C） 文本框中为，焦点在按钮上D） 文本框中为38.窗体上有一个名称为Command1的命令按钮，其事件过程如下：xVisualBasicPr

8、ogrammingaRight（x， 11）bMid（x， 7， 5）cMsgBox（a ， ， b）运行程序后单击命令按钮。以下叙述中错误的是（D）。A） 信息框的标题是BasicB） 信息框中的提示信息是ProgrammingC） c的值是函数的返回值D） MsgBox的使用格式有错39.在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1、Label2的标签，然后编写如下程序代码：Private X As Integer X5： Y3 Call proc（X， Y） Label1.CaptionX Label2.CaptionY Private Sub proc（a As Integer， ByVal b As Integer） Xa * a Ybb 程序运行后，单击命令按钮，则两个标签中显示的内容分别是（A）。A） 25和3B） 5和3C） 25和6D） 5和640.在窗体上画一个名为Command1的命令按钮，然后编写以下程序： Dim M（10）As Integer For k1 To 10 M（k）12k x8 Print M（2M（x） 运行程序，单击命令按钮，在窗体上显示的是（A）。A） 6B） 5C） 7D） 8