VB冲刺模拟试卷一
VB模拟试卷和答案
北京语言大学网络教育学院《VB 〉模拟试卷一1. 试卷保密，考生不得将试卷带出考场或撕页，否则成绩作废。
请监考老师负责监督。
2. 请各位考生注意考试纪律，考试作弊全部成绩以零分计算。
3. 本试卷满分100分，答题时间为90分钟。
4. 本试卷分为试题卷和答题卷，所有答案必须答在答题卷上，答在试题卷上不给分。
一、【单项选择题】（本大题共20小题，每小题2分，共40分）在每小题列出的四个选 项中只有一个选项是符合题目要求的，请将正确选项前的字母填在 答题卷相应题号处1、关于VB 的特点描述错误的是（ ）。
[A] VB 编程是可视化编程 [C]不可以访问数据库2、下面关于鼠标的指针设置说法不正确的是（ [A] 可以使用Mouselcon 设置鼠标的形状 [B] 可以使用MousePo in ter 设置鼠标的形状[B]是面向对象的程序设计 [D]采用事件驱动编程机制）。
[C] MousePointer 设为 99 时，可用 [D] MouseIcon 只能通过属性窗口选择鼠标形状3、 Dim Snow （ 1 to 12 ， 1），As Integer [A]13*2 [B] 13*14、 在工具箱里的都是（）。
[A]标准控件 [C] ActiveX 控件5、 一个窗体大小改变时被触发的事件是（ [A] Click 事件 [C] Initialize 事件6、 下列关于控件说法不正确的是（ [A] Age nt 控件用于设置动画行为[B] TextBox 用于接收用户输入的信息 MouseIcon 设置鼠标的形状是大小为（）的二维数组。
[C] 12*2 [D] 12*1[B]外部控件[D] 可插入对象（OLE ））。
[B] Resize 事件 [D] Un load 事件）。
组，当框架移动时，其中的控件不移动 [D] ListBox 向列表中添加一个新的项目 7、关于CheckBox 控件描述错误的是（ [A] 是复选框按钮，用"表示选中 [C] Value 为1表示选中该框 &关于Shape 控件描述正确的是（ [A] 用于向窗体添加矩形、圆形等图形 [C] Arial 用于设置显示控件的形状9、下面不属于循环控制语句的是（ ）。
VB程序设计模拟试卷3套
6.1 笔试模拟卷6.1.1 笔试模拟试卷一一、选择题（每小题2分，共70分）1.在下列选项中，哪个不是一个算法一般应该具有的基本特征______。
A. 确定性B. 可行性C. 无穷性D. 拥有足够的情报2.在单链表中，增加头结点的目的是______。
A.方便运算的实现B.使单链表至少有一个结点C.标识表结点中首结点的位置D.说明单链表是线性表的链式存储实现3. 下列关于队列的叙述中正确的是______。
A. 在队列中只能插入数据B. 在队列中只能删除数据C. 队列是先进先出的线性表D. 队列是先进后出的线性表4. 对长度为N的线性表进行顺序查找，在最坏情况下所需要的比较次数为______。
A. N+1B. NC. (N+1)/2D. N/25. 信息隐蔽的概念与下述哪一种概念直接相关______。
A. 软件结构定义B. 模块独立性C. 模块类型划分D. 模拟耦合度6.面向对象的设计方法与传统的的面向过程的方法有本质不同，它的基本原理是______。
A. 模拟现实世界中不同事物之间的联系B. 强调模拟现实世界中的算法而不强调概念C. 使用现实世界的概念抽象地思考问题从而自然地解决问题D. 鼓励开发者在软件开发的绝大部分中都用实际领域的概念去思考7. 在结构化方法中，软件功能分解属于下列软件开发中的阶段是______。
A. 详细设计B. 需求分析C. 总体设计D. 编程调试8. 软件调试的目的是______。
A. 发现错误B. 改正错误C. 改善软件的性能D. 挖掘软件的潜能9. 按条件f对关系R进行选择，其关系代数表达式为______。
A. R|X|RB. R|X|RC. бf(R)D. ∏f(R)10. 数据库概念设计的过程中，视图设计一般有三种设计次序，以下各项中不对的是______。
A. 自顶向下B. 由底向上C. 由内向外D. 由整体到局部11.在VB中可以作为容器的是：______。
A.Form、TextBox、PictureBoxB.Form、PictureBox、FrameC.Form、TextBoX、LabelD.PictureBox、TextBox、ListBox12.VB中除窗体能显示图片外，下面列控件中可以显示图片的控件有:__ __。
VB第一套模拟练习题+复习指导思想.doc
期末考试题型主要包括以下几种，本试卷不具有任何代表性，大家自己找两 小时时间做完，给自己打个分。
复习思路已经列在本试卷的下方，认真准备。
考试试卷是从10名老师所出的10份试卷中随机抽取题目组卷，10人互相 不清楚对方出了哪些题目。
一、选择题（每小题1分，期末考试共20小题）10、文本框控件的名称和Text 属性的缺省值分别为（）。
A. Textl, TextB. Text, TextlC. Text, Text11、 语句Open "test. dat 〃 For Append As #5的功能说明中错误的是（）。
A. 打开顺序文件气est.dat",文件指针指示在文件末尾B. 如果文件"test.dat"不存在，则建立一个新文件C. 如果文件气est.dat 〃已存在，则打开该文新写入的的数据将覆盖原有的数据D. 如果文件"test. dat /z已存在，则打开该文新写入的的数据将添加到文件的后面12、 V B 过程调用语句中的实参数必须与过程说明中的形式参数在（）上保持一致。
A.个数、类型、名称 B.个数、类型、顺序C.个数、顺序、名称D.个数、格式、顺序1、 2、 3、窗体的Name 属性为Frm,它的Load 事件过程名是（ A. FormLoad 表达式TNT （RNDA. [11, 110] 将命令按钮的（ D. Me Load 4、 5、 6、 7、 8、 9、B. FormlLoadC. FrmLoad * 11） + 100的值的范围是（）o B. [100, 110]C. [11, 100]）屈性设置为True,当用户按下【EnteC 键时可以激发对应命令按 钮的Click 事件。
A. NameB. EnableC. Default Visual Basic 规定标准模块文件的扩展名是（）。
A.・ form 使用（）方法， A. Additem x + y 小于15, A. x+y<15 or C. x+y<15 andB. frm C- vbp 可向列表框屮的添加列表项。
vb机试模拟试题(十五套)
附录2 Visual Basic上机模拟试题（1～10套）上机模拟试题 1一、调试程序（程序存盘文件名Test11.frm、Test11.vbp）（40分）在磁盘上有一名为“test11.vbp”的文件（程序界面如图1所示）。
其功能为：单击图片框后，则在图片框Picture1中输出如下所示的图形。
图1该程序中存在多处错误，请调试并改正之（注意：在程序调试过程中，不能删除整个语句，添加语句也不得超过2条。
）二、编程（程序存盘文件名Test12.frm、Test12.vbp）（60分）建立一个窗体，界面如图2所示。
程序功能要求如下：1、单击“查找”按钮后，查找所有四位数中满足条件“奇数位之和与偶数位之和均为素数”的数，并显示列表框list1中。
2、统计找到的满足条件的数的个数。
3、单击“存盘”按钮，将找到的数据存入数据文件“test12out.txt”中。
4、要求编写函数来判断是否是素数。
图2上机模拟试题2一、调试程序（程序存盘文件Test21.frm、Test21.vbp）（40分）在磁盘上有一名为“test21.vbp”的文件（程序界面如图1所示）。
其功能为：当在text1中输入行数和在text2中输入起始字母后，单击命令按钮command1，则在picture1中输出图形如图1所示。
要求：在text2中只能输入一个英文字母字符（大小写均可以），否则，提示错误信息，如图2所示。
图1 图2 该程序中存在多处错误，请调试并改正之（注意：在程序调试过程中，不能删除整个语句，添加语句也不得超过2条。
）二、编程（程序存盘文件名Test22.frm、Test22.vbp）（60分）建立一个成绩查询窗体，界面如图3所示。
程序功能要求如下：图31、在Form1_Load时，打开磁盘文件“test22in.txt”读取数据，并将读入的学号和姓名分别添加进两个列表框中，同时将三门课程的考试成绩读入c，d，e三个数组中（每个数组可定义为200个元素）；并默认选中第一名学生。
VB模拟试题一
VB模拟试题一一、选择题1．工程文件的扩展名是（）A．.vbg B．。
vbp C．.vbw D．。
vbl2．一个窗体中带图片框控件（已装入图像）的VB应用程序从文件上看，至少应该包括的文件有（）A．窗体文件（。
frm)、项目文件（.vbp/vbw）B．窗体文件（。
frm）、项目文件（。
vbp/vbw）和代码文件（。
bas)C．窗体文件（.frm)、项目文件（。
vbp/vbw)和模块文件(。
bas）D．窗体文件（.frm）、项目文件（.vbp/vbw）和窗体的二进制文件（。
frx）3．以下关于窗体描述正确的是（）A．只有用于启动的窗体可以有菜单B．窗体事件和其中所有控件事件的代码都放在窗体文件中C．窗体的名字和存盘的窗体文件名必须相同D．开始运行时窗体的位置只能是设计阶段时显示的位置4．VB中控件主要分为3类,下面哪一种不是VB中的控件类（)A．标准控件B．ActiveX C．可插入控件D．外部控件5．在VB的基本数据类型中,通用类型(Variant)可以表示任何类型的变量,如果有定义Dim a,则以下变量赋值中正确的是（）A．a=”OK”B．A＄=OK C．a=04/01/2001 D．a＄=”OK”6．在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：Private Sub Command1_Click( )A=1。
2C=Len(Str＄（A)+Space（10))Text1.text=CEnd Sub程序运行后，单击命令按钮，在文本框中显示（）A．3 B．8 C．14 D．107．在MsgBox函数中哪一个参数是必须的（）A．prompt B．buttons C．title D．context8．以下语句的输出结果是（）Print Format＄（1234.5,”00,000。
00”)A．1234。
5 B．01，234.50 C．01,234.5 D．1,234.509．有如下语句：Type StudentName As StringAge As IntegerSex As StringEnd TypeDim Stu As StudentWith Stu。
VB考试题模拟卷（参考答案）
VB考试题模拟卷（参考答案）上海交通⼤学基础医学院⼆010年～⼆011学年第⼀学期 10 级专业VB程序设计课程模拟试卷考试⽇期2010.12 ⼤班⼩班姓名学号1、在E盘中的根⽂件夹创建⼀个⼦⽂件夹，新⽂件夹名称为⾃⼰的学号、姓名和“考试”；例如：“5078058001-李⽂海-考试”。
2、要求编程题在上述⽂件夹中保存两个⽂件(窗体⽂件：李⽂海．frm和⼯程⽂件李⽂海．vbp)。
3、将上述⽂件夹上传到⽼师⽹盘上相应班级的⽂件夹中。
⼀、选择题（10分，正式试卷为10题）1、VB是⼀种⾯向对象的可视化程序设计语⾔，采取了____的编程机制。
A、事件驱动B、过程驱动C、函数驱动D、模块驱动2、在VB中____是⼀个特例，它既是类也是对象。
A、命令按钮B、⽂本框C、标签D、窗体3、多窗体程序是由多个窗体组成。
在缺省情况下，VB在应⽤程序执⾏时，总是把____指定为启动窗体。
A、包含控件最多的窗体B、设计时的第⼀个窗体C、含有Form_Load过程的窗体D、命名为Form1的窗体4、VB集成开发环境具有三种⼯作模式，以下____是使⽤最多的VB⼯作模式。
A、编辑B、设计C、运⾏D、中断5、有⼀程序代码：Text1.FontSize = ”宋体”，其中Text1、FontSize和”宋体”分别代表的是____。
A、对象、⽅法、属性B、对象、属性、值C、属性、对象、值D、对象、值、属性6、不具备Caption属性的对象是____。
A、⽂本框B、标签框C、命令按钮D、多选框7、VB是⼀种⾯向对象的程序设计语⾔，____不是⾯向对象系统所包含的三个要素。
A、变量B、事件C、⽅法D、属性8、不具备Text属性的对象是____。
A、⽂本框B、图⽂框C、组合框D、列表框9、当启动程序时，系统⾃动执⾏的是____事件过程。
A、Form_ClickB、Form_LoadC、Command_ClickD、Text1.Change10、表达式Int (19 / 3) +5 ^ 2 * 8 Mod 10 \ 3的值是____。
VB程序设计期末模拟试题及答案
VB程序设计期末模拟试题及答案第一篇：VB程序设计期末模拟试题及答案《VB》期末复习题及答案综合复习题一、填空题1．创建一个VB应用程序三个主要的步骤是__创建应用程序界面_、_设置属性_和_编写代码_。
2．当程序运行时，要求窗体中的文本框呈现空白，则在设计时，应当在此文本框的属性窗口中，把此文本框的__text__属性设置成空白。
3．Label和TextBox控件用来显示和输入文本，如果仅需要让应用程序在窗体中显示文本信息，可使用___Label_____控件；若允许用户输入文本，则应使用___TextBox___控件。
4．窗体的常用方法有_Load方法 Show方法 Hide方法 Unload方法 5．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK，应当编写的语句是txtshow.text=“GOOD WORK” 6．若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1，请对以下事件过程填空。
Private Sub Cmdopen_ Click()、frm1.show End Sub 7．Visual Basic 6种类型的表达式是算术表达式字符串表达式关系表达式布尔表达式日期表达式对象表达式，Visual Basic根据表达式的_运算符来确定表达式的类型。
8．表达式93 7 Mod 2 ^ 2 的值是___________。
9．已知a=3，b=4，c=5，表达式a>b and Not c>a Or c>b And c达式c>a And Not b10．日期表达式 #2/24/02#1 > c2 End Sub 7．#12/31/1999#3 * I Print “ ”;Next j For k = 1 To I Print k;Next k For k = IX Print Tab(Y + 5);“*”;Next Y Print Next X 4．Private Sub Form_Activate()Print “aa” & “bb”,-5 * 6,Not 2 <= 3 Print “aa” & “bb”;-5 * 6;Not 2 <= 3 Print Print“30+60”, Print 30 + 60 ？“30+60”;30 + 60 End Sub 5． X=1 Do While X<=10 If X Mod 7 =0 Then Y = X + 6 Else Z = X End If X = X + 2 Loop Print X,Y,Z五、编程题1．设计一个计算程序。
《VB程序设计》会考模拟试卷(一)
《VB 程序设计》会考模拟试卷（一） (考试时间：90分钟，满分：100分)2分，共60分） 1、VB 中的变量如果没有显式声明其数据类型，则默认为（ ） A 、日期型 B 、数值型 C 、字符型 D 、变体型 2、设置标签显示内容的属性是（ ）A 、captionB 、textC 、nameD 、top3、在窗体上画一个文本框，其名称为text1,为了在程序运行后隐藏该文本框，应使用（ ）A 、text1.clearB 、text1.visible=falseC 、text1.hideD 、text1.enabled=false4、为了把窗体上的某个控件变为活动的，应执行的操作是（ ） A 、单击窗体的边框 B 、单击控件的内部 C 、双击该控件 D 、双击窗体5、确定一个控件在窗体上的位置的属性是（ ） A 、width 或 height B 、width 和 height B 、top 或 left D 、top 和 left6、为了同时改变一个活动控件的高度和宽度，正确的操作是（ ） A 、拖动控制4个角上的某个小方块 B 、只能拖动位于控件右下角上的小方块 C 、只能拖动位于控件左下角上的小方块 D 、不能同时改变控件的高度和宽度7、可获得当前系统日期的函数是（ ）A 、date( )B 、time( )C 、isdate( )D 、year( ) 8、下列不能打开代码窗口的操作是（ ） A 、双击窗体的某个控件 B 、双击窗体C 、在“视图”菜单单击“代码窗口”D 、单击窗体或控件 9、按任一键的事件名为（ ）A 、changeB 、keydownC 、clickD 、keypress 10、下面变量不合法的（ ）A 、a2_1B 、abcdC 、a$xD 、CDE11、下面合法的变量是( )A 、1/2B 、’abcd ’C 、1.2*5D 、false12、在VB 中，用于获得字符串S 最左边4个字符的函数是（ ） A 、left(S,4) B 、left(1,4) C 、right(S,4) D 、right(S) 13、在VB 中，基本数据类型包括（ ） A 、数值型数据、日期型、字节型、货币型、逻辑型、字符型、对象型、变体型 B 、整型、实型、字符型、记录型 C 、整型、实型、逻辑型、集合型D 、实型、逻辑型、字符型、自定义型 14、VB 中可以用类型说明符来标识变量的类型，其中表示货币型是的（ ） A 、% B 、# C 、@ D 、$ 15、表达式a+b=c 是（ ）A 、赋值表达式B 、字符表达式C 、算术表达式D 、关系表达式 16、设a=2,b=3,c=4,d=5,下列表达式的值是（ ）a>b and c<=d or 2*a>cA 、trueB 、falseC 、-1D 、017、语句print 5*5\5/5的输出结果是（ ）A 、5B 、25C 、0D 、1 18、以下语句的输出结果是（ ）Print format$(32548.5,”000,000.00”)A 、32548.5B 、32,548.5C 、0.32,548.50D 、32,548.50 19、如果在立即窗口中依次执行下列命令：a=8 b=9print a>b则输出的结果是（ ）A 、1B 、0C 、falseD 、true 20、在立即窗口中执行下列语句：a=”beijing ” b=”shanghai ” print a;b则输出结果是（ ）(△表示空格)A 、beijing △ shanghaiB 、△beijing △shanghaiC 、beijingshanghaiD 、△beijing △shanghai △ 21、执行print sqr(9)命令后，输出结果为（ ）A 、3B 、9C 、81D 、2722、inputbox 函数返回值的类型为（ ）A 、数值B 、字符串C 、变体D 、数值或字符串（视输入的数据而定）班级： 姓名： 学号○ ○ 密 ○ 封 ○ 装 ○ 订 ○ 线 ○ ○密 封 线 内 不 要 答 题23、通过代码在运行时设置属性的语法格式为（）A、对象名=属性.新值B、对象名.属性=新值C、对象名.新值=属性.新值D、对象名.属性=属性.新值24、使文本框获得焦点的方法是（）A、changeB、gotfocusC、setfocusD、lostfocus25、若要求在文本框中输入密码时，文本框中只显示#号，则应在此文本框的属性窗口中设置（）A、caption属性值为#B、text属性值为#C、passwordchar属性值为#D、passwordchar属性值为真26、设a=10，则执行X=iif(a>5,-1,0)后，x的值为（）A、5B、6C、0D、-127、a的初值为1，当VB执行下面语句后，a的值为（）If a>0 then a=a+1If a>=1 then a=0A、0B、1C、2D、328、在窗体中添加一个文本框（其中name属性为text1），然后编写如下代码：Private sub form_click( )Text1.text=””Text1.setfocusFor i=1 to 10Sum=sum+iNext iText1.text=sumEnd sub上述程序运行后，单击窗体，则运行的结果（）A、在文本框text1中输出35B、在文本框text1中输出0C、出错D、在文本框text1中输出不定值29、使用语句dim a(-3 to 5) as integer 定义的数组的元数个数是（）A、7B、8C、9D、1030、sub和function的最大差别在于（）A、function可以通过函数名返回值，而sub不能B、function需要输入参数，而sub不用C、sub可以用call语句调用，而function不行D、两者并无不同2分，共40分）（）和（）。
VB考前辅导班模拟试题
VB考前辅导班模拟试题试题一（在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name 属性为Command1），然后编写如下事件过程：Private Sub Command1_Click()x=0Do Until x > = 50x= (x + 4)*(x + 3)n= n+1LoopText1.Text=Str(n)Text2.Text=Str(x)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）A)1 和 0 B)2 和240C)3 和 50 D)4 和168参考答案：B试题二在窗体上画一个名称为Command1的命令按钮，编写如下程序：Private Sub Command1_Click()Print pl(3,7)End SubPublic Function pl(x As Single,n As Integer) As SingleIf n=0 Thenpl=1ElseIf n Mod 2=1 Thenpl=x*x+nElseP1=x*x-nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的结果是（）A)2 B)1C)0 D)16参考答案：D试题三读下列程序：Private Sub Form_Click()Static x(4) As IntegerFor i = 1 to 4x(i) =x (i) + i * 3Next iPrintFor i = 1 to 4print "x("；i；") ="；x(i)Next iEnd Sub该程序在运行了三次后，其最终结果是：参考答案：x(1)=9 x(2)=18 x(3)=27 x(4)=36试题四有如下程序：Private Sub Form_Click()Dim check As Boolean, n As Integercheck=Falsen= 0DoDo While n< 10n=n + 1If n= 5 Thencheck=TrueExit DoEnd IfPrint n；LoopLoop Until check=TrueEnd Sub程序运行后，输出的结果是（）A)1 2 3 B)1 2 3 4C)1 2 3 4 5 D)1 2 3 4 5 6参考答案：B试题五在窗体上画一个名称为Command1的命令按钮，并编写如下程序：Private Sub Command1_Click()Dim x As IntegerStatic y As Integerx=10y=5Call f1(x,y)Print x,yEnd SubPrivate Sub f1(ByRef x1 As Integer, y1 As Integer)x1=x1+2y1=y1+2End Sub程序运行后，单击命令按钮，在窗体上显示的内容是A) 10 5 B) 12 5 C) 10 7 D) 12 7参考答案：D试题六执行下面的程序，单击Command1按钮时，列表框中显示的第一行是________，第二行是_________，第三行是________。
全国计算机等级考试VB语言模拟试题(附答案)
全国计算机等级考试VB语言模拟试题（附答案）一、选择题（每题2分，共20分）1. 以下不属于VB的数据类型的是（）A. 整数类型B. 浮点数类型C. 字符串类型D. 布尔类型答案：D2. 在VB中，变量必须声明在（）A. 过程中B. 窗体中C. 模块中D. 以上都可以答案：A3. VB中，数组的默认下标范围是（）A. 0 到 10B. 0 到 65535C. -32768 到 32767D. 1 到 100答案：B4. 以下叙述错误的是（）A. VB是面向对象的程序设计语言B. VB中的窗体是VB应用程序的基本组成部分C. VB中的模块是VB应用程序的基本组成部分D. VB中的工程是VB应用程序的基本组成部分答案：C5. 在VB中，以下哪个不是事件过程？（）A. ClickB. LoadC. WriteD. Run答案：D6. 在VB中，要将字符串转换为数值型数据，应使用（）A. Val函数B. Int函数C. Str函数D. Date函数答案：A7. 下面哪个函数可以实现求绝对值的功能？（）A. Abs(x)B. Sqr(x)C. Int(x)D. Fix(x)答案：A8. VB中，DateDiff函数用于计算两个日期之间的（）A. 年数B. 月数C. 星期数D. 天数答案：D9. VB中，Randomize语句的作用是（）A. 初始化随机数发生器B. 生成一个随机数C. 清除随机数发生器D. 设置随机数的范围答案：A10. 下列哪个关键字用于定义常量？（）A. DimB. ConstC. LetD. Var答案：B二、填空题（每题2分，共20分）1. 在VB中，______用于声明一个变量。
答案：Dim2. VB中，______语句用于打开一个文件。
答案：Open3. 在VB中，______函数用于求一个数的平方根。
答案：Sqr4. VB中，______语句用于关闭打开的文件。
答案：Close5. 在VB中，______用于定义一个过程。
VB模拟试题试及参考答案
VB模拟试题试及参考答案2016VB模拟题第⼀套单项选择题得分：1: 计算机的基本⼯作原理是__C______。
A. 可靠性与可⽤性B. ⾼速度与⾼精度C. 存储程序与程序控制D. 具有记忆功能2: 计算机中数据的表⽰形式是____A____。
A. ⼆进制B. ⼋进制C. ⼗进制D. ⼗六进制3: 电⼦邮件标识中带有⼀个“别针”，表⽰该邮件_____C_。
A. 设有优先级B. 带有标记C. 带有附件D. 可以转发4: 安装防⽕墙的主要⽬的是__C______。
A. 提⾼⽹络的运⾏效率B. 对⽹络信息进⾏加密C. 保护内⽹不被⾮法⼊侵D. 防⽌计算机数据丢失5: 淘宝⽹的⽹上购物属于计算机现代应⽤领域中的___C___。
A. 计算机辅助系统B. 电⼦政务C. 电⼦商务D. 办公⾃动化6: Visual Basic中标准模块⽂件的扩展名是____D__。
A. FrmB. VbpC. ClsD. Bas7: 启动程序时，系统⾃动执⾏启动窗体的___A___事件过程。
A. LoadB. UnloadC. ClickD. DblClick8: 下列_____C_⽅法可以显⽰窗体。
A. HideB. UnLoadC. ShowD. WindowState9: 已知a="123456789"，则表达式Mid(a, 5, 2) + Left(a, 2)的值是_____B___。
A. "5689"B. "5612"C. 68D. 125610: 下列不正确的赋值语句是__C____。
A. x=30-yB. y=x+30C. x+y=30D. y=x\311: 下列选项中，合法的变量名是_B______ 。
A. 1_xB. x_1C. x-1D. x 112: 下列选项不是Visual Basic基本数据类型的是______A__。
A. CharB. StringC. BooleanD. Double13: 在下列表达式中，正确的⽇期型常量是__D____ 。
VB模拟试卷参考答案
计算机等级考试二级VB模拟试卷(一)杭州师范学院钱江学院计算机等级考试二级VB模拟考试参考答案一、计算机基础题（共15分）二、VB程序设计（共85分）（四）程序阅读题（20分，每题4分）1、4 5 62、101103、1 9 8 7 6 5 4 3 2 101 7 6 5 4 32 8 9 104、1 4 65、wFg,C4d5（五）程序设计题（25分，题1为5分）1、Public Function g(x As Single, eps As Single) As SingleDim e&, t!, i%If x < -1 Or x > 1 Theng = 0Elsee = 1i = 1Doe = e * it = (i + x) / eg = g + ti = i + 1Loop Until t < epsEnd IfEnd Function2、Private Sub Form_Click()Dim a(1 To 50) As Integer, i%, s!For i = 1 To 50a(i) = Val(InputBox("请输入一个数")) Next is = 0For i = 1 To 50s = s + a(i)Next is = s / 50Open "g:\data.txt" For Output As #1For i = 1 To 50If a(i) > s Then Print #1, a(i)Next IClose #1End Sub3.Dim n%Private Sub Command1_Click()n = Val(InputBox("输入要计时的秒数")) Timer1.Enabled = TrueCommand1.Enabled = FalseEnd SubPrivate Sub Form_Load()Form1.Caption = "到计时牌"Command1.Caption = "设置"Timer1.Interval = 1000Timer1.Enabled = FalseLabel1.Caption = "计时"End SubPrivate Sub Timer1_Timer()n = n - 1h = n \ 3600m = (n Mod 3600) \ 60s = n Mod 60Label1 = "还剩" & h & "小时" & m & "分" & s & "秒" If n = 0 ThenTimer1.Enabled = FalseLabel1 = "时间到！"Command1.Enabled = TrueEnd IfEnd Sub。
VB模拟试题试及参考答案
2016VB模拟题第一套单项选择题得分：1: 计算机的基本工作原理是__C______。
A. 可靠性与可用性B. 高速度与高精度C. 存储程序与程序控制D. 具有记忆功能2: 计算机中数据的表示形式是____A____。
A. 二进制B. 八进制C. 十进制D. 十六进制3: 电子邮件标识中带有一个“别针”，表示该邮件_____C_。
A. 设有优先级B. 带有标记C. 带有附件D. 可以转发4: 安装防火墙的主要目的是__C______。
A. 提高网络的运行效率B. 对网络信息进行加密C. 保护内网不被非法入侵D. 防止计算机数据丢失5: 淘宝网的网上购物属于计算机现代应用领域中的___C___。
A. 计算机辅助系统B. 电子政务C. 电子商务D. 办公自动化6: Visual Basic中标准模块文件的扩展名是____D__。
A. FrmB. VbpC. ClsD. Bas7: 启动程序时，系统自动执行启动窗体的___A___事件过程。
A. LoadB. UnloadC. ClickD. DblClick8: 下列_____C_方法可以显示窗体。
A. HideB. UnLoadC. ShowD. WindowState9: 已知a="123456789"，则表达式Mid(a, 5, 2) + Left(a, 2)的值是_____B___。
A. "5689"B. "5612"C. 68D. 125610: 下列不正确的赋值语句是__C____。
A. x=30-yB. y=x+30C. x+y=30D. y=x\311: 下列选项中，合法的变量名是_B______ 。
A. 1_xB. x_1C. x-1D. x 112: 下列选项不是Visual Basic基本数据类型的是______A__。
A. CharB. StringC. BooleanD. Double13: 在下列表达式中，正确的日期型常量是__D____ 。
vb模拟题1
11.在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。
程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。
以下能实现上述操作的事件过程是A、Private Sub Text1_Change()Command1.Caption = "计算机等级考试"End SubB、Private Sub Command1_Click()Caption = "计算机等级考试"End SubC、Private Sub Form_Click()Text1.Caption = "计算机等级考试"End SubD、Private Sub Command1_Click()Text1.Text = "计算机等级考试"End SubA B C D a12.设a=5，b=4，c=3，d=2，下列表达式的值是3>2*b Or a=c And b<>c Or c>dA、1B、TrueC、FalseD、2A B C D b13.设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是A、b=Left(a,10)B、b=Mid(a,10)C、b=Right(a,10)D、b=Mid(a,11,10)A B C D b14.假定有如下的窗体事件过程：Private Sub Form_Click()a$ = "Microsoft VisualBasic"b$ = Right(a$, 5)c$ = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是A、Microsoft VisualB、MicrosoftC、BasicD、5A B C D c15.设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A", "B")后，x的值为A、"a"B、"b"C、"B"D、"A"A B C D16.为了使命令按钮（名称为Command1）右移200，应使用的语句是A、Command1.Move -200B、Command1.Move 200C、Command1.Left = Command1.Left + 200D、Command1.Left = Command1.Left - 200A B C D d17.在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()x = InputBox("请输入一个整数")Print x + Text1.TextEnd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为A、123B、456C、579D、123456A B C D c18.在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。
VB笔试模拟试卷1(题后含答案及解析)
VB笔试模拟试卷1(题后含答案及解析)题型有：1. 选择题 2. 填空题选择题（每小题2分，共70分）下列各题A、B、C、D四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上。
1．假设线性表的长度为n，则在最坏情况下，冒泡排序需要的比较次数为A．log2nB．n2C．O(n1.5)D．n(n-1)/2正确答案：D解析：假设线性表的长度为n，则在最坏情况下，冒泡排序要经过n/2遍的从前往后的扫描和n/2遍的从后往前的扫描，需要的比较次数为n(n-1)/2。
2．算法分析的目的是A．找出数据结构的合理性B．找出算法中输入和输出之间的关系C．分析算法的易懂性和可靠性D．分析算法的效率以求改进正确答案：D解析：算法分析是指对一个算法的运行时间和占用空间做定量的分析，一般计算出相应的数量级，常用时间复杂度和空间复杂度表示。
分析算法的目的就是要降低算法的时间复杂度和空间复杂度，提高算法的执行效率。
3．线性表L=(a1，a2，a3，…ai，…an)，下列说法正确的是A．每个元素都有一个直接前件和直接后件B．线性表中至少要有一个元素C．表中诸元素的排列顺序必须是由小到大或由大到小D．除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件正确答案：D解析：线性表可以为空表；第一个元素没有直接前件，最后一个元素没有直接后件；线性表的定义中，元素的排列并没有规定大小顺序。
4．在单链表中，增加头结点的目的是A．方便运算的实现B．使单链表至少有一个结点C．标识表结点中首结点的位置D．说明单链表是线性表的链式存储实现正确答案：A解析：头结点不仅标识了表中首结点的位置，而且根据单链表(包含头结点)的结构，只要掌握了表头，就能够访问整个链表，因此增加头结点目的是为了便于运算的实现。
5．软件工程的出现是由于A．程序设计方法学的影响B．软件产业化的需要C．软件危机的出现D．计算机的发展正确答案：C解析：软件工程概念的出现源自于软件危机。
VB机试模拟试卷1(题后含答案及解析)
VB机试模拟试卷1(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．注意：下面出现的“考生文件夹”均为c;\wexam\25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在窗体上建立一个二级菜单，该菜单含有“文件”和“帮助”(名称分别为vbFile和vbHelp)两个主菜单项，其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项(名称分别为vbOpen、vbClose和vbExit)，如图1-1所示。
只建立菜单，不必定义其事件过程。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
(2)在名为Form1的窗体上画一个框架，名称为Frm1，标题为“框架”，高度为2500，宽度为4000，框架内建立一文本框，距左边框600，距框架的上边框1200，文本框中的初始内容设置为“文本框”。
如图1-2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。
正确答案：(1)在Visual Basic中，菜单项通过菜单编辑器来建立。
解题步骤：第一步：打开“菜单编辑器”窗口，建立菜单项。
用到的菜单项及其属性见表1-1。
第二步：调试并运行程序。
第三步：按题目要求存盘。
(2)在窗体上建立好控件后，再按题目要求设置各自的属性即可。
需要指出的是在框架里的控件需要画出框架后，单击工具箱里的控件然后在框架里拖动画出所需控件，不可以用双击的方法，否则所需的控件放不到框架里。
窗体中的控件的具体位置由控件的Top、Left属性设置，大小由属性Height Width设置。
解题步骤：第一步：设置框架的Height、Width属性分别为2500，4000；文本框的Left、Top 属性值分别为600，1200。
(以上均可在属性栏里没置) 第二步：调试并运行程序。
VB对口高考模拟试题1
VB对⼝⾼考模拟试题1《VB》对⼝⾼考模拟试题1⼀、选择题。
（每个1分，共30分）1、某⼀VB⼯程含F1、F2两个窗体，执⾏“F1．Show: F2．Hide”语句后，F1、F2窗体显⽰的结果为（）。
A、都显⽰B、都不显⽰C、仅显⽰F1窗体D、仅显⽰F2窗体2、删除列表框中指定的项⽬所使⽤的⽅法为（）A moveB removeC clearD removeitem3、Integer类型的变量可存放的最⼤整数是（）。
A、255B、256C、32768D、327674、下列符号不能作为VB中变量名的是（）。
A 、abcd B、p1234 C、89edf D、xyz5、将焦点主动设置到指定的控件或窗体上，应采⽤的⽅法是（）。
A、SetDateB、SetFocusC、SetTextD、GetGate6、若要求从⽂本框中输⼊密码时在⽂本框中只显⽰*号，则应⽤在此⽂本框的属性窗⼝中设置（）。
A、Text属性值为*B、Caption属性值为*C、Password属性值为空D、Passwordchar属性值为*7、表达式10+10Mod3*3的值为（）。
A、11B、2C、13D、68、数学式⼦Sin25?写成VB表达式是（）。
A、Sin25B、Sin（25）C、SIN（25?）D、Sin（25*3.14/180）9．Sub过程与Function过程最根本的区别是（）。
A、Sub过程可以使⽤Call语句或直接使⽤过程名调⽤，⽽Function过程不可以。
B、Function过程可以有参数，Sub过程不可以。
C、两种过程参数的传递⽅式不同。
D、Sub过程的过程名不能返回值，⽽Function过程能够通过过程名返回值。
10、多窗体程序由多个窗体组体组成，在缺省的情况下，VB在执⾏应⽤程序时，总是将（）指定为启动窗⼝。
A、不包含任何控件的窗⼝B、包含控件最多的窗⼝C、命名为Form1的窗体D、设计时的第⼀个窗体11、要退出Do…Loop循环，可使⽤的语句是（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB冲刺模拟试卷一一、选择题1、VB的启动有多种方法，下面不能启动VB的是（）A．使用“开始”菜单中的“程序”命令B．使用“开始”菜单中的“运行”命令，在弹出的对话框中输入VB启动文件的名字C．使用“我的电脑”，在VB所在硬盘驱动器中找到相应的VB文件夹D．先打开VB的“文件”菜单，再按Zlt+Q组合键2、VB的工程资源管理器可管理多种类型的文件，下面叙述不正确的是（）A．窗体文件的扩展名为.frm，每个窗体对应一个窗体文件B．标准模块是一个纯代码性质的文件，它不属于任何一个窗体C．用户通过类模块来定义自已的类，每个类都用一个文件来保存，其扩展名为.basD．资源文件是一种纯文本文件，可以用简单的文字编辑器来编辑3、下列可以打开文件对话框的操作是（）A．Ctrl+D B、Ctrl+E C、Ctrl+F D、Ctrl+G4、下面对哪一种变量的类型说明符的使用是正确的（）A．Dim a:a@=2000 B、Dim a:a%=50000C．Dim a:a&=True D、Dim a:a$=”OK”5、下列变量名中，合法的变量名是（）A．C24 B、A B C、A：B D、1+26、用于获得字符串S从第2个字符开始的3个字符的函数是（）A．Mid$(S,2,3) B、Middle(S,2,3) C、Right$(S,2,3) D、Left$(S,2,3)7、计算结果为0的表达式是（）A．Int(2.4)+Int(-2.8) B、Cint(2.4)+Cint(-2.8)C．Fix(2.4)+Int(-2.8) D、Fix(2.4)+Fix(-2.8)8、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click( )A=1234B$=Str$(A)C=Len(B$)Print CEnd Sub程序运行后，单击命令按钮，则在窗体上显示的内容是（）A．0 B．5 C．6 D．79、定义变量如下：Dim My VarMy Var =”come see me “若在立即窗口中显示My Var的值，下面正确的是（）A．Debug.Print My Var B、PictureBox.Print My Var C．Printer.Print My Var D、Print My Var10、在以下Form1窗体中没有采用的控件是（）A．文本框 B．水平滚动条 C．框架 D．选项按钮11、滚动条控件的LargeChange属性所设置的是（）A．单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改变量B．滚动条中滚动块的最大移动位置C．滚动条中滚动块的最大移动范围D．滚动条控件无该属性12、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（）A．Caption B．Name C．Text D．Value13、在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序：Private Sub Command1_Click( )a=Text1.textb=Text2.textC=Lcase(a)D=Ucase(b)PrintC;DEnd Sub程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是（）A．abcEFG B．abcefg C．ABCefg D．ABCEFG14．假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（）A．Label1.BackStyle=0 B．Label1.BackStyle=1Label1.BorderStyle=0 Label1.BorderStyle=1C．Label1.BackStyle=True D．Label1.BackStyle=FalseLabel1.BorderStyle=True Label1.BorderStyle=False15．选中一个窗体，启动菜单编辑器的方法有（）A．单击工具栏中的“菜单编辑器”命令B．执行“工具”菜单中的“菜单编辑器”命令C．按Ctrl+E D、按Shift+Alt+M16．比较图片框（PictureBox）和图像框（Image）的使用，正确的描述是（）A．两类控件都可以设置AutoSize属性，以保证装入的图形可以自动改变大小B．两类控件都可以设置Stretch属性，使得图形根据物件的实际大小进行拉伸调整，保证显示图形的所有部分C．当图片框（PictureBox）的AutoSize自属性为Jlase时，只在装入图元文件（*.wmf）时，图形才能自动调整大小以适应图片框的尺寸D．当图像框（Image）的Stretch属性为True时，图像框会自动改变大小以适应图形的大小，使图形充满图像框17．当利用Line方法进行添加图时，以下正确的说法是（）A．有7种不同的线型，而且不管线宽多少都可以绘制虚线/点划线/点线B．使用Line(100,100)-(1000,1200)和Line(100,100)-Step(900,1100)将绘制两条相同位置的直线C．可利用Line方法添加矩形，如Line(300,300)-(2000,2000),BF D．可利用Line方法添加矩形，如Line(300,300)-(2300,2300),B+F 18．下面语句中错误的是（）A． Redim Preserve Matrix(10,Ubound(Matrix,2)+1)B． Redim Preserve Matrix(Ubound(Matrix,1)+1,10)C． Redim Preserve DynArray(Ubound(DynArray)+1)D． Redim DynArray(Ubound(DynArray)+1)19．可以惟一标识控件数组中的每一个控件属性的是（）A．Name B．Caption C．Index D．Enabled20、下面（）不是VB的文件类控件A．DriveListBox控件 B．KirListBox控件C．FileListBox控件 D、MsgBox21、窗体中有3个按钮Command1、Command2和Command3，该程序的功能是当单击按钮Command1时，按钮2可用，按钮3不可见，正确的程序是（）A．Private Sub Command1_Click( ) B、Private SubCommand1_Click( )Command2.Visible=True Command2.Enabled=True Command2.Visible=False Command2.Enabled=FalseEnd Sub End SubC．Private Sub Command1_Click( ) D、Private SubCommand1_Click( )Command2.Enable=True Command2.Enabled=False Command2.Visible=False Command2.Visible=FalseEnd Sub End Sub23、在窗体中添加一个命令按钮Command1，并编写如下程序：Private Sub Command1_Click( )x=InputBox(x)If x^2=9 Then y=xIf x^2<9 Then y=1/xIf x^2>9 Then y=x^2+1Print yEnd Sub程序运行后，在InputBox中输入3，单击命令按钮，程序的运行结果是（）A．3 B．0.33 C．17 D．0.2524、设有如下程序：Private Sub Form_Click( )Print “*”;Tab(6);2,5For I=15 To 16Print IFor j=2 To 6 Step 3Print Tab(3*j);j*I;Next jPrintNext IEnd Sub程序运行后，单击窗体，则在窗体上显示的是（）A． B．C． D．25、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序；Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 ThenPrint "12345"End IfEnd SubPrivate Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)Print "67890"End Sub]程序运行后，在命令按钮上单击鼠标右键，则在窗体上显示的内容是（）A．12345 B．67890 C．12345 D．6789067890 1234526、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click()Dim a(5),b(5)For j =1 to 4A(j)=3*jB(j)=a(j)*3Next jText1.text=b(j\2)End Sub程序运行后，单击命令按钮，在文本框中显示（）A．25 B．18 C．36 D．3527、在窗体中添加一个命令按钮、一个标签和一个文本框，并将文本框的Text属性置空，编写命令按钮Command1的Click事件代码：Private Function fun(x As Long) As BooleanIf x Mod 2 = 0 Thenfun = TrueElsefun = FalseEnd IfEnd FunctionPrivate Sub Command1_Click()Dim n As Longn = Val(text1.Text)p = IIf(fun(n), "奇数", "偶数")Lable1.Caption = n & "是一个" & pEnd Sub程序运行后，在文本框中输入20，单击命令按钮后，标签中的内容为（）A．20是一个奇数 B．20 C．20是一个偶数 D．228、在窗体中添加一个命令按钮，并编写如下程序：Public Enum workdayssunday = 5mondaytuesdaywednesdaythursdayfridaysaturdayinvalid = -1End EnumPrivate Sub Command1_Click()Dim day As workdays……End Sub程序运行后，单击命令按钮，要使程序的运行结果为10，则程序省略处的程序段应为（）A．day =Friday B、day =FridayPrint day Print Val(day)C．Workdays =Friday D．Workdays =FridayPrint Val(workdays) Print workdays29、一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。