VB模拟考试
vb模拟试题及答案
vb模拟试题及答案1. 以下哪个选项是Visual Basic(VB)的编程语言?A. C++B. JavaC. PythonD. 答案:D2. 在中,以下哪个关键字用于声明一个类?A. FunctionB. ClassC. SubD. Module答案:B3. 在中,以下哪个属性用于获取或设置一个窗体的标题?A. TextB. TitleC. CaptionD. Label答案:C4. 在中,以下哪个方法用于启动一个新的线程?A. StartB. BeginInvokeC. ThreadD. Run答案:A5. 在中,以下哪个数据类型用于表示布尔值?A. BooleanB. StringC. IntegerD. Double答案:A6. 在中,以下哪个选项用于创建一个数组?A. Dim arr(5) As IntegerB. Dim arr As New Integer(5)C. Dim arr As Integer = 5D. Dim arr As Integer(5)答案:A7. 在中,以下哪个关键字用于实现继承?A. InheritsB. ImplementsC. InheritsFromD. Base答案:A8. 在中,以下哪个关键字用于捕获异常?A. TryB. CatchC. FinallyD. All of the above答案:D9. 在中,以下哪个方法用于将一个字符串转换为小写?A. ToLowerB. ToLowercaseC. LowerD. ConvertToLower答案:A10. 在中,以下哪个方法用于将一个字符串转换为大写?A. ToUpperB. ToUppercaseC. UpperD. ConvertToUpper答案:A。
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笔试模拟试卷128(题后含答案及解析)
VB笔试模拟试卷128(题后含答案及解析)题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.如果要改变窗体的标题,需要设置窗体对象的______ 属性。
A.NameB.CaptionC.BorderStyleD.BackColor正确答案:B解析:窗体的Caption属性决定了窗体对象在显示时的标题。
2.有如下程序,其运行结果为______。
Dim Sum As String*4 Read Sum, X, Y% Print Sum, Z Date “X+Y:之和”, 300, 200. 613 End A.X+Y:之和501B.X+Y之和500.613C.X+Y: 501D.X+Y: 500.613正确答案:C解析:由于“Dim Sum As String*4”定义字符型变量Sum的长度为4个字节,因而Read语句读Sum变量时,仅读对应字符常量的前4个字符;Y%为整形变量,在Read-Data语句中,对应的数值常量经四舍五入后读入,所以选择C。
3.符号%是声明______ 类型变量的类型定义符。
A.VafiantB.IntegerC.SingleD.String正确答案:B解析:Integer数据类型Integer变量存储为16位(两个字节)的数值形式,其范围为-32768~32767。
Integer的类型声明字符是百分比符号(%)。
4.表达式26/4*3的值是______ 。
A.1B.2C.18.75正确答案:B解析:运算符“*’的优先级大于“\”,所以先进行4×3的运算,再进行26\12的运算,最后的结果是2,故应选B。
5.Print方法可以输出多个表达式,若使用标准格式输出,各表达式的分隔符应是______。
A.逗号B.空格C.冒号D.分号正确答案:A解析:Print方法中,使用紧凑格式输出,各表达式的分隔符应是分号,使用标准格式输出,各表达式的分隔符应是逗号。
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机试模拟试题(十五套)
附录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笔试模拟试卷123(题后含答案及解析)
VB笔试模拟试卷123(题后含答案及解析) 题型有:1. 选择题 2. 填空题选择题(每小题2分,共70分)下列各题A、B、C、D四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上。
1.下列说法中错误的是( )。
A.在同一模块不同过程中的变量可以同名B.不同模块中定义的全局变量可以同名C.引用另一模块中的全局变量时,必须在变量名前加模块名D.同一模块中不同级的变量可以同名正确答案:D解析:变量可以分为3类:局部变量、模块变量、全局变量。
在同一模块不同过程中的变量叫做局部变量,其作用域是它所在的过程,所以不同过程中的局部变量可以同名;模块变量的作用范围是整个窗体或模块,引用其他模块中的模块变量时,必须加上模块名;当同一个模块内的不同过程使用相同的变量时,必须声明窗体层的变量,当然不能有重名。
2.下列数据结构中,属于非线性的是( )。
A.线性表B.队列C.树D.栈正确答案:C解析:线性结构,是指数据元素只有一个直接前件元素和直接后件元素。
线性表是线性结构。
栈和队列是指对插入和删除操作有特殊要求的线性表,树是非线性结构。
3.下列叙述中错误的是( )。
A.线性表是由n个元素组成的一个有限序列B.线性表是一种线性结构C.线性表的所有结点有且仅有一个前件和后件D.线性表可以是空表正确答案:C解析:线性表是一种线性结构,由n(n≥0)个元素组成,所以线性表可以是空表。
但是在线性表中,第一个结点没有前件,最后一个结点没有后件,其他结点有且只有一个前件和后件,所以C是错误的。
4.按照“先进先出”组织数据的数据结构是( )。
A.队列B.栈C.双向链表D.二叉树正确答案:A解析:队列是一种特殊的线性表,只允许在表的一端插入元素,在表的另一端删除元素,插入元素的一端叫“队尾”,删除元素的一端叫“队头”,先插入的元素先被删除,是按“先进先出”的原则组织数据的。
5.下列关于线性链表的描述中正确的是( )。
vb模拟试题全套
vb模拟试题全套1.下列关于程序设计的说法正确的是( B )A 、程序设计就是指示计算机如何去解决问题或完成一组可执行指令的过程B 、程序设计就是寻求解决问题的方法,并将其实现步骤编写成计算机可以执行的程序的过程C 、程序设计语言的发展经历了机器语言、汇编语言到高级语言的过程,比较流行的高级语言是pascal 、fortran 、excel 、c++等。
D 、程序设计语言和计算机语言是同一概念的两个方面2 C )A 、算法的开始或结束B 、输入输出操作C 、处理或运算的功能D 、用来判断条件是否满足需求3.Integer 类型的变量可存的最大整数为( C )。
A 、256B 、32768C 、32767D 、655364.代数表达式221gt 改成VB 表达式后,错误的是(D )A 、g*t^2/2 B 、g*t*t/2 C 、1/2*g*t^2 D 、gt^2/25.对于窗体,click (单击)是它的一个( C )A 、重要对象B 、重要方法C 、重要事件D 、重要属性6.下列变量名写法错误的是( D )B 、abc123C 、abc_123D 、123abc7.在VB 中,下列( B )函数是求绝对值的。
A 、int (x )B 、abs (x )C 、sqr (x )D 、gn (x )8.在VB 中,设置控件的大小,可改变下列( A )属性A 、height 与widthB 、heigth 与topC 、 left 与topD 、left 与width9.以下是一段vb 程序:a=1b=a+1c=a+b它的基本结构属于( A )A 、顺序结构B 、选择结构C 、循环结构D 、树型结构10、下列程序段运行后,V alue 的值为( A )x=20if x>=10 thenValue=5*xElseValue=4*xEnd ifB 、80C 、90D 、7011、下面是判断变量x 是不是能被5整除的偶数的程序,横线上的逻辑表达式应为(A 、B ) Private Sub Command1_Click() Dim x As Integerx = Val(text1.Text)If ________________ Thenlabel1.Caption = "这个数是能被5整除的偶数"label1.Caption = "这个数不是能被5整除的偶数"End IfEnd SubA、(x Mod 5) = 0 And (x Mod 2) = 0B、x Mod 10 = 0C、x Mod 5 = 0D、x Mod 2 = 012、阅读下面程序,单击窗体后,在窗体上输出的是(A )Private Sub form_Click()Dim i As IntegerDim s As Integers = 0For i = 1 To 5s = s + iNext iPrint s, iEnd SubA、15 6B、s=15 i=6C、6 5D、s=6 i=513、阅读下面程序,单击窗体后,在文本框text1中显示的内容是(A )Private Sub form_Click()Dim int1 As IntegerDim int2 As Integerint1 = 1int2 = 0Do While int1 < 20int2 = int1 + int2int1 = int1 * (int1 + 1)LoopText1.Text = int2End SubA、9B、8C、7D、614、下列程序段中,循环体执行的次数是(B )y=2do while y<=8y=y+yloopA、2B、3C、4D、515、设计一个程序,打印下面所示的图案程序:Private Sub Form_click()Dim i As Integer '定义i为整型变量Dim j As Integer '定义j为整型变量For i = -3 To 3Print Tab(Abs(i) + 5) '确定每行的起始位置For j = 1 To (4 -Abs(i)) - 1Print "*";Next jPrintNext iEnd Sub16、编写程序,求??>+-≤+=)0(1)0(122x x x x x y 的值。
VB模拟题及参考答案
VB复习题一一、判断题:(每小题1分,共20分。
请将答案涂在答题卡上,正确的涂A,错误的涂B)1.Visual Basic 6.0工作模式有3种:它们是设计、运行和调试。
()2.标签支持Dblclick事件。
(2 )3.窗体中控件的位置由Height和Top属性确定。
(3 )4.滚动条的SmallChange属性设置为5时,表示单击滚动条两端的箭头时变化为5. (4 )5.当把定时器控件的Visible属性设置为True时,运行时定时器在窗体上就可见了。
(5 )6.Vbred是Visual Basic 6.0允许的常量。
(6 )7.#25/6/2018#是Visual Basic 6.0合法的日期型常量书写。
(7 )8.逻辑运算符Not的优先级比Or高。
(8 )9.Visual Basic 6.0中可以用print做变量名。
(9 )10.表达式5 mod 4与5\4的结果相同。
(10 )11.语句if x>=60 and x<70 then print ”及格”是正确的。
(11 )12.有select case 语句必须有End select语句与之相匹配。
(12 )13.Exit for是Do循环的一个出口。
(13 )14.选择结构与循环结构可以相互嵌套,并且允许交叉嵌套。
(14 )15.Visual Basic 6.0中,Dim a(-5 to 5) as single 是正确的数组定义。
(15 )16.可以用Ubound()函数返回数组下标的下界。
(16 )17.过程体内可以再定义另外一个过程。
(17 )18.实参是变量,且过程定义时与其对应的形参用Byval关键字加以限制是地址(引用)传递。
(18 )19.用Output模式打开文件,如果指定的路径不存在,则会自动先创建指定的路径,然后再创建文件。
(19 )20.Visual Basic 6.0中,文件号最大可取的值是511。
计算机二级vb模拟考试试题及答案
计算机二级vb模拟考试试题及答案一、单选题1. 下面哪个选项是VB的内置数据类型?A. IntegerB. StringC. DoubleD. All of the above答案:D2. 在VB中,用于表示两个选项互斥关系的控件是?A. RadiobuttonB. CheckboxC. ComboboxD. Listbox答案:A3. 下面哪个事件是在窗体加载时发生?A. LoadB. ClickC. MouseHoverD. KeyPress答案:A4. 在VB中,用于将文本显示在标签控件上的属性是?A. TextB. ValueC. CaptionD. Name答案:C5. 在VB中,用于打开文件选择对话框的控件是?A. OpenFileDialogB. SaveFileDialogC. FolderBrowserDialogD. PrintDialog答案:A二、填空题1. 在VB中,用于声明一个整型变量的关键字是________________。
答案:Dim2. 在VB中,用于判断条件的关键字是________________。
答案:If3. 在VB中,用于循环执行代码块的关键字是________________。
答案:For4. 用于将字符串转换为整型的函数是________________。
答案:CInt5. 用于将字符串转换为小数类型的函数是________________。
答案:CDbl三、编程题1. 编写一个VB程序,实现计算两个数相加的功能,并在窗体上显示结果。
答案:```vbPublic Class Form1Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickDim num1 As IntegerDim num2 As IntegerDim result As Integernum1 = CInt(TextBox1.Text)num2 = CInt(TextBox2.Text)result = num1 + num2Label1.Text = "结果:" & result.ToString()End SubEnd Class```2. 编写一个VB程序,实现输入一个整数n,计算并输出1到n的所有偶数之和。
Vb十套模拟题及答案
Vb答案第一套1 在名称为FORM1 的窗体上放置一个名为TEXT1 的文本框控件和一个名为TIMER1的计时器控件,请设置计时器的适当属性并且编写适当的事件过程,使得程序运行后,文本框中显示的是当前的时间,而且每一秒文本框中所显示的时间都会随时间的变化而改变。
(如示例所示)*****注意:程序中不得使用任何变量,只能写一条语句;保存时必须存放在考生文件夹下,窗体文件名为SJT1.FRM,工程文件名为SJT1.VBP。
Private Sub Timer1_Timer()Text1.Text = TimeEnd Sub2 在窗体FORM1上画一个组合框,名称为CBO1,有“长跑”、“游泳”、“跳远”三个可供选择项。
再画一个命令按钮,名称为CMD1,标题为“确定”。
编写适当的事件过程,使得程序运行时,选择组合框中的某项,单击命令按钮后,就会弹出一个消息框,内容为“您选择了(某项)”如[示例]。
注意:1)程序中不得使用任何变量。
2)保存时必须存放在考生文件夹下,窗体文件名为SJT2.FRM,工程文件名为SJT2.VBPPrivate Sub Cmd1_Click()MsgBox "您选择了" & CBO1.TextEnd Sub3 在考生文件夹中有文件SJT3.VBP及其窗体文件SJT3.FRM,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号),但不能修改其它部分。
存盘时不得改变文件名和文件夹。
本题描述如下:在窗体上画一个名称为TEXT1的文本框,小四号字,再画两个名称分别为CH1和CH2,标题分别为"C 程序设计"和"VB程序设计"的复选框,小四号字,一个名称为C1,标题为"确定"的命令按钮。
编写适当的事件过程,要求程序运行后,如果只选中CH1,然后单击"确定"命令按钮,则在文本框中显示"学习C程序设计";如果只选中CH2,然后单击"确定"命令按钮,则在文本框中显示"学习VB程序设计";如果同时选中CH1和CH2,然后单击"确定"命令按钮,则在文本框中显示"学习C程序设计VB程序设计"。
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上机考试题库及答案86套
vb上机考试题库及答案86套VB上机考试题库及答案86套1. 选择题- 1.1 VB中,用于声明变量的关键字是()。
- A. Dim- B. Declare- C. Let- D. Set- 答案:A- 1.2 下列哪个选项是VB中合法的变量名?()- A. 123abc- B. _name- C. name$- D. name 2- 答案:B2. 填空题- 2.1 VB中,使用()函数可以将字符串转换为数值。
- 答案:Val- 2.2 在VB中,使用()关键字可以定义一个数组。
- 答案:Dim3. 简答题- 3.1 简述VB中的事件驱动编程的概念。
- 答案:事件驱动编程是一种编程范式,程序的执行流程由外部事件(如用户操作、消息、定时器等)触发,而不是按照预先定义的顺序执行。
4. 编程题- 4.1 编写一个VB程序,实现计算两个数的和并输出结果。
- 答案:```vbDim num1 As IntegerDim num2 As IntegerDim sum As Integernum1 = 5num2 = 10sum = num1 + num2Debug.Print "The sum is: " & sum```5. 判断题- 5.1 VB中,使用“=”符号可以比较两个变量的值是否相等。
() - 答案:错误。
应该使用“==”符号进行比较。
- 5.2 在VB中,可以使用“End”关键字来结束一个程序的执行。
()- 答案:正确。
6. 综合应用题- 6.1 设计一个VB程序,实现用户输入姓名和年龄,程序输出“欢迎你,[姓名],你今年[年龄]岁。
”- 答案:```vbSub Main()Dim name As StringDim age As Integername = InputBox("请输入你的姓名:")age = Val(InputBox("请输入你的年龄:"))MsgBox "欢迎你," & name & ",你今年" & age & "岁。
可视化程序设计(VB)模拟试题
可视化程序设计(VB)模拟试题第一篇:可视化程序设计(VB)模拟试题可视化程序设计(VB)一、填空题(32分,共 8 题,每小题 4 分)1.要使用通用对话框控件,必须首先在“部件”对话框中选择______,将其添加到工具箱中。
2.运行时,要使工具栏Toolbarl中索引值为4的按钮无效(变成灰色),应使用语句: ______。
3.运行时,要使工具栏控件T oolbarl中的第二个按钮的按钮菜单中的第三项无效(变成灰色),应使用语句: ______。
4.在用手工方式设计工具栏时,可以设置工具按钮的______ 属性为其添加功能提示。
5.用户自定义类型中的元素类型可以是字符串,但该字符串必须是 ______。
6.设a=sqr(2)*sqr(3),下列语句的输出结果分别是。
print format$(a,“000.00”)print format$(a,“###.#00”)print format$(a,“00.00E+00”)print format$(a,“-#.####”)7.如果需要将窗体载入内存却不显示,需要将该窗体的______ 属性设置为False,再用 ______ 语句装载。
8.随机产生一个范围是(100,300)的整数,表达式为 ______。
二、程序阅读题(24分,共 3 题,每小题 8 分)1.写出下列事件过程的执行结果。
Private Sub Command1_Click()s3(1)s3(1)End SubPrivate Sub s3(ByVal a As Integer)Dim x As Integer Static y As Integerx=x+ay=y+aPrint “x=”;x, “y=”;yEnd Sub2.下列标准模块和窗体模块的功能是给通信录文件“d:txrf1.dat”添加新记录,在横线上填上适当内容。
标准模块:Type txr num As Integer name As String * 10 tel As String * 8 addr As String * 20End Type窗体模块:Private Sub Command1_Click()D im n%, zgr As txr Open “d:txrf1.dat”For Random As #1Len = Len(zgr)zgr.num = InputBox(“输入新职工编号:”) = InputBox(“输入新职工姓名:”)zgr.tel = InputBox(“输入新职工电话号码:”)zgr.addr = InputBox(“输入新职工住址:”)n =(1)(2)Close #1End Sub3.本程序有一个标准模块和一个窗体模块。
vb 的模拟考试题
1.下面子过程语句说明合理的是()。
2.下面过程运行后显示的结果是(2,3)。
Public Sub F1(ByRef n as Integer,ByVal m as Integer)n=n mod 10m=m\10End SubSub Button1_Click(… … ) Handles Button1_ClickDim x,y as Integerx=12y=34Call F1(x,y)MessageBox.Show(x & " " & y)End Sub3. 在VB集成开发环境中,下面不存在的窗口是(常见任务)4.一个窗体中,用于识别不同的控件对象的属性是(name)5. 要求从文本框中输入密码时在文本框中只显示#号,则应用在此文本框的属性窗口中设置(password属性值改为#)6. 要求改文本框中显示的文本,应当在属性窗口中改变的属性是(Text)7. 当在文本框中输入“ABCD”时,窗体上显示的是(AABABCABCD)。
Sub TextBox1_TextChanged(……) Handles Te xtBox1.TextChangedLabel1.Text &=TextBox1.TextEnd Sub8. 有过程:Private Sub Max(ByRef x As Integer, ByRef y As Integer)If x < y ThenDim t As Integert = xx = yy = tEnd IfEnd Sub如果:Dim a, b, c As Integera = 10b = 23c = 15Max(a+b,a-b)Max (a,c)则a,b,c的值依次是:(15,23,10)9. 下面的变量定义错误的是:(dim btn1 as button)10. 以下不属于键盘事件的是( )11. 标签控件能够显示文本信息,决定其是否有可见的边框的属性是12. 有过程:Private Sub Max(ByRef x As Integer, ByRef y As Integer)If x < y ThenDim t As Integert = xx = yy = tEnd IfEnd Sub如果:Dim a, b,c As Integera = 10b = 23c = 15Max(a,b)Max (a,c)则a,b,c的值依次是:A.23,10,15B.10,23,15C.15,23,10D.23,23,1513. 文本框的( )属性用于设置或返回文本框中的文本内容A TextB 名称C captionD name14. 与数学表达式a*b/3*c*d对应,的不正确表达式是()15. 以下不能运行工程的操作是(按f5 键)A 是对的B 是对的C 按f5 键D 按ctrl+f5 键16. 有过程:Private Function Max(ByRef x As Integer, ByRef y As Integer) As Integer If x < y ThenMax=yElseMax=xEnd IfEnd Function如果:Dim a, b, c As Integera = 10b = 23c = Max(a,b)则a,b,c的值依次是:(10,23,23)17. 关于定时器的说法中正确的是()18. 下面为正确的整型常量的是( )19. 以下循环体能正常结束的是()A doi=i+1i=1B doi=i+2i=10C doi=i+1i=6D doi=i+2i=520.可以同时删除字符串前导和尾部空白的函数是( )A LtrimB RtrimC TrimD Mid21. 请编写函数f(a),其功能是:计算一个长度为5的一维整形数组a中最大值与最小值的差,并作为函数的返回值。
vb对口升学模拟试题及答案
vb对口升学模拟试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个是正确的变量声明方式?A. Dim aB. Dim b = 10C. Dim c = "Hello"D. 所有选项都是正确的答案:D2. 下列哪个是Visual Basic中的数组声明?A. Dim arr(10)B. Dim arr() As IntegerC. Dim arr(0 To 9) As IntegerD. 所有选项都是正确的答案:D3. 在Visual Basic中,以下哪个是正确的条件语句?A. If x > 10 ThenB. If x > 10 Then EndC. If x > 10 Then End IfD. If x > 10 Then Else答案:A4. 下列哪个是Visual Basic中的循环结构?A. For EachB. WhileC. Do WhileD. 所有选项都是正确的答案:D5. 在Visual Basic中,以下哪个是调用函数的正确方式?A. Call functionName()B. functionName()C. Both A and BD. None of the above答案:C6. 下列哪个是Visual Basic中的事件处理程序?A. Sub eventName()B. Function eventName()C. Property eventName()D. Sub eventName(ByVal sender As Object, ByVal e As EventArgs)答案:D7. 在Visual Basic中,以下哪个是正确的类声明?A. Class MyClassB. Dim MyClassC. Function MyClassD. None of the above答案:A8. 下列哪个是Visual Basic中的继承关键字?A. InheritsB. InheritsFromC. ExtendsD. None of the above答案:A9. 在Visual Basic中,以下哪个是正确的属性声明?A. Property MyProperty As IntegerB. Dim MyProperty As IntegerC. Function MyProperty As IntegerD. Both A and B答案:A10. 下列哪个是Visual Basic中的接口声明?A. Interface MyInterfaceB. Dim MyInterfaceC. Function MyInterfaceD. None of the above答案:A二、填空题(每空2分,共20分)1. 在Visual Basic中,使用________关键字可以定义一个类。
vb模拟试题(绝对经典)
VB操作第三套卷基本操作1、在名称为Form1,标题为“标签”的窗体上,添加一个名称为Lable1,内容为“计算机等级考试”,字型为四号字的标签。
请设置适当的属性以满足下述要求:(1)窗体不带有最大化、最小化及关闭按钮;(2)标签带有边框;(3)标签可依据标题指定的内容自动调整其大小。
运行后的窗体如图所示:注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为stj1.frm。
2、在名称为Form1的窗体上添加一个名称为Text1,内容为“程序设计”的文本框,且显示为三号字、居中;再添加两个命令按钮,标题分别是“粗体”和“斜体”,名称分别为Command1、Command2。
如图所示。
要求:编写两个命令按钮的Click事件过程,使得单击“斜体”按钮时,文本框的内容显示为斜体格式;单击“粗体”按钮时,文本框的内容显示为粗体格式。
注意:程序中不得使用变量,每个事件过程只能写一条语句。
存盘时必须存放在考生文件夹下,工程文件名保存为stj2.vbp,窗体文件名保存为stj2.frm。
简单应用题1、在考生文件夹有一个工程文件stj3.vbp,其中的窗体中有一个名为Text1的文本框,初始文本为0;一个计时器;一个标签;一个有两个元素的单选按钮数组,名称为Op1,标题依次为“1秒”、“3秒”;两个命令按钮,名称分别为C1、C2,标题分别为“开始计数”、“停止计数”,同时给出了两个事件过程,但并不完整。
在运行时要完成下面的功能;单击一个单选按钮,可以设置计时间隔为1秒或3秒;若单击“开始计数”,则Text1中的数按设定的时间间隔每次加1;若单击“停止计数”,则Text1中的数不再变化。
请按下述要求设置属性和编写程序,以便实现上述功能;(1)设置计时器的属性,使其在初始状态下不计时。
(2)去掉程序中的注释符,把程序中的?改为正确的内容。
(3)为两个命令按钮编写适当的事件过程,每个事件过程中只能有一条语句,不能使用变量。
VB模拟卷
样卷1一、判断题(正确打“√”,错误打“×”)1.窗体的Enabled属性值为False时,该窗体上的按钮、文本框等控件就不会对用户的操作做出响应。
2.当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时,组合框会自动把这一条添加到它的列表框中。
3.如果一个菜单项的Visible属性为False,则它的子菜单也不会显示。
4.VB中的函数和过程,都可以返回一个值。
5.在一个子程序中,可以用Public声明变量,使它在整个应用程序中全程有效。
6.单选按钮(OptionButton)控件和复选框(CheckBox)控件都具有Value属性,他们得作用完全相同。
7.Do … Loop while语句实现循环时,不管条件真假,至少执行一次循环体语句。
二、选择题1.由For k=35 to 0 Step 3 : Next k 循环语句控制的循环次数是。
A. 0B. 12C. –11D. –102.使命令按钮控件无效,不响应动作,则需把它的属性设置为FalseA. VisibleB. EnabledC. NameD. Checked3.语句a=a+1 的正确含义是。
A. 将变量a加1 以后得到的值放到变量a中B. 能得到一个布尔值FalseC. 变量a的值等于变量a+1的值D. 变量a的值等于无穷大4.已知a=2,b=3,c=4,d=5在一下逻辑表达式中,的值为TrueA. a>b and c<=d or 2*a>cB. 3>2*b or a=c and b<>c or c>dC. not a<=c or 4*c=b^2 and b<>a+cD. a<=c or a^2<b and b>a+c5.设窗体上有一个列表框控件List1,且其中含有若干列表项。
则以下能表示当前被选中的列表项内容的是A. List1.ListB. List1.ListIndexC. List1.IndexD. List1. Text6.程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是A. MouseDownB. MouseUpC. LoadD. Click7.设有以下循环结构Do循环体Loop While <条件>则以下叙述中错误..的是A. 若"条件"是一个为0的常数,则一次也不执行循环体B. "条件"可以是关系表达式、逻辑表达式或常数C. 循环体中可以使用Exit Do语句D. 如果"条件"总是为True,则不停地执行循环体8.结束当前程序运行,可使用语句。
VB模拟题库(全国)
一、选择题1.以下叙述中错误的是____B____。
A..vbp文件是工程文件,一个工程可以包含.bas文件B..frm文件是窗体文件,一个窗体可以包含.bas文件C..vbp文件是工程文件,一个工程可以由多个.frm文件组成D..vbg文件是工程组文件,一个工程组可以由多个工程组成2.以下合法的VB变量名是____C____。
A.Case B.t-name C.name10D.x*y3.以下描述中错误的是____B____。
A.窗体的标题通过其Caption属性设置B.窗体的名称(Name属性)可以在运行期间修改C.窗体的背景图形通过其Picture属性设置D.窗体最小化时的图标通过其Icon属性设置4.在Visual Basic集成环境中,可以列出工程中所有模块名称的窗口是____A____。
A.工程资源管理器窗口B.窗体设计窗口C.属性窗口D.代码窗口5.在Visual Basic集成环境中,要添加一个窗体,可以单击工具栏上的一个按钮,这个按钮是_____A___。
A.B.C.D.6.在Visual Basic集成环境中,要结束一个正在运行的工程,可单击工具栏上的一个按钮,这个按钮是_____D___。
A.B.C.D.7.以下变量名中合法的是__C______。
A.x2-1B.print C.str_n D.2x8.执行语句Dim X,Y As Integer后,___D_____。
A.X和Y均被定义为整型变量B.X和Y均被定义为变体类型变量C.X被定义为整型变量,Y被定义为变体类型变量D.X被定义为变体类型变量,Y被定义为整型变量9.在设计窗体时双击窗体的任何地方,可以打开的窗口是___A_____。
A.代码窗口B.属性窗口C.工程资源管理器窗口D.工具箱窗口10.以下叙述中错误的是___D_____。
A.标准模块文件的扩展名是.basB.标准模块文件是纯代码文件C.在标准模块中声明的全局变量可以在整个工程中使用D.在标准模块中不能定义过程11.以下叙述中错误的是_____C____。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
A B C D
A B C D
A B C D
A B C D
A B C D
A B C D
A B
C D
A B C D
A B C的常数,D
A B C D
A B C D
A B C D
A B C D
A B C D
A B C D
A B
C
D
A B C D
A B C D
B A
C D
A B C D
A B C D
A B C D
A B C D
A B C D
A B
C D
(2分)
4、逻辑型数据只有true和false两个值。
(2分)
5、顺序文件读操作用 input语句。
(2分)
(2分)
9、Texte1.SetFocus语句功能是把焦点移到 texte1上。
(2分)
10、Dim X As Currency 是将变量X定义为货币型。
(2分)
11、某次大奖赛,有6个评委打分,如下代码对一名参赛者,输入6个评委的打分分数,去掉一个最高分和一个最低分后,求出平均分,即为该参赛者的得分。
代码中aver变量存放平均分,max1变量存放最高分,min1变量存放最低分。
请在空线处补充使之完整。
Private Sub Command7_Click()
Dim mark!, aver!, i%, max1!, min1!
aver = 0
For i = 1 To 6
mark = InputBox("输入第" & i & "位评委的打分")
If i = 1 Then
max1 = mark: min1 = mark
Else
(9分)
12、这是一个用户名校验程序。
用户名为“user”,密码为“1234”,单击按钮:(1)如果用户名和密码均正确,即输出"欢迎user来到欢乐世界!"字样(2)若用户名错误,则要求重新输入用户名(3)如果用户名正确,密码错误,则弹出“密码错误!”警告窗口,并直接退出程序。
Option Explicit
Dim UserName As String,userpassword as string
Dim inputName As String,inputpassword as string
Private Sub form_load()
UserName="user":userpassword="1234"
end sub
private sub command1_click()
正确错误正确错误正确错误正确错误
正确错误正确错误正确错误正确错误正确错误
正确错误。