全国高校计算机等级考试(广西考区)二级VBNET试题样卷.doc

全国高校计算机等级考试（广西考区）二级VB.NET试题样卷20XX年XX月XX日 闭卷考试 考试时间：120分钟考试类别：2考生注意: 本试卷包括第一卷和第二卷，考试时间共120分钟。第一卷全部为选择题，每题下都有四个备选答案, 但只有一个是正确的或是最佳的答案。第一卷答案必须填涂在标准化答题卡上，标记在试题卷上的答案一律无效。每题只能填涂一个答案，多涂本题无效。本次考试类别为2，请考生务必将答题卡上的考试类别栏中的2方格涂黑, 试卷种类栏不需填涂。考生答第一卷的题目时务必使用2B铅笔按正确的填涂方法在答题卡上相应题号的答案的方格涂黑，如果改动答案，可用橡皮擦擦干净后再另涂新的答案。第二卷均为填空题，在阅读和理解原题程序的基础上，在第二卷答题卡相应题号的空栏处填入适当的字符、语句。考生答第二卷的题目时，要用钢笔或圆珠笔书写，用铅笔答题无效。在试题卷上直接答题者无效。请考生在答题卡和第二卷答题卡上准确填涂或填写准考证号码。第一卷 （本卷每题2分，共70分）1在VB.NET中每个对象都有三个基本要素，它们是 。A对象的名称、值和所属类 B对象的属性、事件和方法C对象的大小、存储方式和内容 D对象的访问方法、存储方式和名称2数学函数式Sin25写成VB.NET表达式是 。 Asin25 Bsin(25) Csin(25) Dsin(25*314/180)3下列哪组语句可以将变量A、B的值互换 。AA=B:B=A BA=A+B:B=AB:A=A+B CC=A:A=B:B=C DA=(A+B)/2:B=(AB)/24“x是小于100的非负数”，用VB.NET表达式表示正确的是 。 A0x100 B0=x100 C0=x And x 00 D0=x Or x 6 Label1Text = num num = num + 24 LoopEnd Sub程序运行后，单击命令按钮，则在标签框上显示的内容是 。 A58 B. 5 C7 D 无数据输出8VB.NET中，修改了主窗体的某个属性后，发现无法启动程序，原因可能是 。 A修改了主窗体的caption属性 B修改了主窗体的ismainform属性 C修改了主窗体的name属性 D修改了main函数9在模块MyModule中定义的过程ShowHelpInfo，其访问权限为 。Public Module MyModule Sub ShowHelpInfo(String info) MessageBoxShow(info) End Sub End Module A仅在MyModule中可以使用 B在本项目中可以使用 C在本解决方案中可以使用 D在派生模块中可以使用10双击窗体会产生 事件。 AenabledBactiveCclickDload 11在VB.NET中，无返回值的过程称为 过程。 ASub BFunction C Property Dmain 12在VB.NET中，代表程序到数据库的连接的对象为 。 ADataSet BDataAdapter CCommand DConnection13添加 到某个窗体中，则在窗体运行时将不可见。 ALabel BCommandbutton Cimagelist Dtoolbar14执行下列语句后，变量x的值为 。dim a as integer=0 : a=3/2 A0 B1 C2 D315VB.NET构架中，MSIL的含义为 。 AMicrosoft Interface Language BMicrosoft Intermediate Library CMicrosoft International Language DMicrosoft Intermediate Language16在设计循环语句时，若有以下要求： 在执行循环之前先测试条件表达式 expression，然后让代码循环执行到该条件表达式的值取“真”，则应使用 循环语句。 Ado until expression Bdo Loop loop until exprssion Cdo while expression Ddo Loop loop while expression17VB.NET程序中， 显示一个内容为“this is a test”消息框。 ASystemWindowsFormsMessageBox(this is a test!) BSystemWindowsFormsMessageBoxShow(this is a test!) CSystemWindowsFormsMessageBoxShowDialog(this is a test!) DSystemWindowsFormsMessageBoxShowMessageBox(this is a test!)18若需要在File菜单下的Save与Exit两个菜单项之间插入一分隔条， 可以修改File菜单下的菜单项属性。 A在Save和Exit菜单项之间插入一新的菜单项，将其Seperator属性设为True B用画笔在Save和Exit菜单项之间划一合适长度的横线 C在Save和Exit菜单项之间插入一新的菜单项，将其Text属性设为减号- D在Save和Exit菜单项之间插入一新的菜单项，将其Style属性设为“OwnerDraw”19实现菜单功能，应向菜单项的 事件添加代码。 ACommand B Click CPopupD Select20VB.NET窗体中提供的Hide方法的作用是 。A销毁窗体对象 B关闭窗体 C将窗体极小化 D隐藏窗体21已知数组arr进行以下定义： Dim arr() as Integer = 1,1,1,1,1过程MySub定义如下：Sub MySub(ByVal ar() As Integer, ByRef x As Integer)Dim i As IntegerFor i = 0 To UBound(ar) 注：UBound(ar)求数组ar的下标上限ar(i) = xNextx = 0End Sub则执行下列语句后，数组arr和变量data中的内容是 ()。Dim data As Integer = 2MySub(arr, data) Aarr=2,2,2,2,2 data=2 Barr=1,1,1,1,1 data=2Carr=2,2,2,2,2 data=0 Darr=1,1,1,1,1 data=022以下代码： x = Microsoftvisualbasicleft(“gbc13”,1) & Mid(“pool”,2,2) & Microsoftvisualbasicright(“god”,1)变量x等于 。 AgoodBgolg Cgbog Dgobd23类MyClass 的定义如下： Public Class MyClass1 Private data as String End Class 则关键字Private 在类的定义中的作用是 。 A限定成员变量data 只在本模块内部可以使用； B限定成员变量data 仅在类MyClass 的成员方法中可以访问； C限定成员变量data 仅仅可在类以及子类的成员方法中访问 D限定类MyClass 仅在本模块中可以使用24以下定义常量不正确的语句是 。 AConst Num As Integer=200 BConst Num1 As Long=200, Sstr$=”World” CConst Sstr$=”World” DConst Num$=#World#25在窗体上放入一个名称为Button1命令按钮和两个名称分别为TextBox1、TextBox2两个文本框，然后编写如下事件过程： Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles Button1Click Dim n, x As Integer n = CInt(TextBox1Text) Select Case n Case 1 To 20 x = 10 Case 2, 4, 6 x = 20 Case Is 初值 B循环变量的终值 ，执行s=Trim(s)语句后，s的值为 。 A B C D31VB.NET对象的最后一个引用被释放后 时间，对象占用的“托管堆”空间被“垃圾收集”功能回收。 A立即 B1分钟 C1小时 D不确定32在程序运行过程中要改变文本框中字体的大小， 是不正确的语句。 ATextBox1Font=New SystemDrawingFont (宋体, 140!, DrawingFontStyleBold) BTextBox1Font=New SystemDrawingFont (宋体, 160!) CTextBox1Font=New SystemDrawingSize (180!) DTextBox1Font= New Font(宋体, 140!)33要使文本框成为密码输入框，一般应修改文本框的 。 APasswordChar属性和MaxLength属性，并且 MultiLine属性值只能为False。 BPasswordChar属性和MaxLength属性，并且Lines属性值只能为False。 C只修改PasswordChar属性值就可以了,其他属性可以不修改。 DPasswordChar属性和MaxLength属性， MultiLine属性值可以为True。34向列表框中填加一个新项目,正确的语句是（ ）。 AListBox1ItemsAdd (“How are You?”) BListBox1ItemsInsert (“How are You?”) CListBox1ItemsAdd (2,“How are You?”) DListBox1ItemsInsert (2,“How are You?”)35窗体中有一个名称为Button1的命令按钮、一个Label1控件对象，编写如下事件过程：Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e AsSystemEventArgs) Handles Button1Click Dim n As String, x, i, j As Integer x = 0 n = InputBox(请输入一个大于1的整数, 输入框) For i = 1 To CInt(n) For j = 1 To i x = x + 1 Next j Next i Label1Text = CStr(x)End Sub程序运行后，单击命令按钮，如果输入3，则在Label1显示的内容是 ( )。 A3 B4 C5 D6第二卷说明：（1）第二卷均为填空题，在阅读和理解的基础上，在第二卷答题卡上编号对应的栏目中填入适当的字符、语句。 （2）共10个空栏，每空栏3分，共30分。1在窗体上放入一个名称为Button1命令按钮和1个名称为TextBox1文本框，然后编写如下事件过程： Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles Button1Click Dim x,y,z As Integer x=5: y=7: z=0 extBox1Text =x & y & z End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是 1 。2以下的程序段的作用是用Insert语句在User表中将窗体中的文本框username1与password1的文本数据，分别写入字段username、password。（假设要连接的Access数据库名为“Examplemdb”，存放在“d:Data”目录下）。Dim oleDbConnection1 As OleDbOleDbConnection Dim strConnect As Sting= 2 oleDbConnection1= New SystemDataOleDbOleDbConnection(strConnect)comm1 = New OleDbCommand(INSERT INTO USER(username,password) values( + username1Text + , + password1Text +), conn) 3 oleDbConnection1close()3给定项目VBApplication1的功能是：计算出2+4+6+8+1000的总和,并在TextBox1文本框中显示。 Public Class Form1 Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles Button1Click Dim total As Long, i As Integer total = 0 i = 2 Do Until i 4 total = 5 i = 6 Loop TextBox1Text = total End SubEnd Class4已有一模块文件Modify.vb。该模块中的Findat过程是用于在一个字符串变量中查找at，并用消息框给出查找结果的报告：没有找到或找到的个数。Public Sub F