VB程序设计 试题与答案-1
vb程序设计试题(含答案)
第一套试题一、选择题（每题2分，共30分）1.在VB环境中，工程文件的扩展名是( C )（A）.frm （B）.bas （C）.vbp （D）.frx2.下面4项中不属于面向对象系统三要素的是( A )（A）变量（B）事件（C）属性（D）方法3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C )（A）\ （B）/ （C）Mod （D）*4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor（C）AutoRedraw （D）Caption5.不论何控件，共同具有的属性是( B )（A）Text （B）Name（C）ForeColor （D）Caption6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D )（A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构（C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D )（A）“12334”（B）123 （C）12334 （D）1579.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D )（A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1（C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+110.若要清除列表框的所有内容，可用来实现的方法是( C )（A）RemoveItem （B）Cls（C）Clear （D）以上均不可以11.要使时钟控件Timer1的Timer事件不起作用，以下正确的语句是( B ) （A）Timer1.Visible=False （B）Timer1.Enabled=False（A） Timer1.Interval=1000 （D）Timer1.Index=012.引用列表框(List1)最后一个数据项应使用的语( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount) (D)List1.List(ListCount-1)13.如下数组声明语句，正确的是( B )（A）Dim a[3,4]As Integer （B）Dim a(3,4)As Integer（C）Dim a(n,n) As Integer （D）Dim a(3,4)As Integer14.下面子过程语句说明合法的是(A、D )（A）Sub f1(ByVal n%) （B）Sub f1(n%)As Integer（C）Function f1%(f1%) （D）Function f1(ByVal n%)15.假定有如下的命令按钮(名称为Command1)事件过程：Private Sub Command1_Click()x=InputBox("输入："，"输入整数")MsgBox"输入的数据是：”，，”输入数据："+xEnd Sub16.程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是( A )（A）x的值是数值10 （B）输入对话框的标题是“输入整数”（C）信息框的标题是“输入数据：10”（D）信息框中显示的是“输入的数据是：”二、填空题（每题2分，共20分）1、当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择视图菜单的工具箱选项，使“工具箱”窗口显示。
专升本vb程序设计试题及答案
专升本vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的方法？A. FunctionB. SubC. PropertyD. Class答案：B2. VB中的单精度浮点数类型是什么？A. IntegerB. SingleC. DoubleD. Long答案：B3. 如果想要在VB中实现多态，可以使用哪种机制？A. 继承B. 接口C. 重载D. 封装答案：B4. 在VB中，以下哪个控件可以用于显示图像？A. LabelB. PictureBoxC. TextBoxD. ComboBox答案：B5. VB中的“Option Explicit”语句的作用是什么？A. 声明变量类型B. 强制变量声明C. 定义常量D. 创建对象实例答案：B6. 在VB中，如何实现一个事件处理程序？A. 使用Sub过程B. 使用Function过程C. 使用Property过程D. 使用Handles关键字答案：D7. 如果要使一个变量在多个窗体之间共享，应该使用哪种变量作用域？A. PublicB. PrivateC. FriendD. Protected答案：A8. 在VB中，以下哪个不是标准的控件属性？A. NameB. TextC. VisibleD. Color答案：D9. VB中的“With”语句用于什么目的？A. 初始化对象B. 创建对象实例C. 链式调用同一对象的多个属性或方法D. 定义对象的生命周期答案：C10. 在VB中，以下哪个不是Visual Basic Power Packs控件？A. LineB. OvalC. ShapeD. DataGrid答案：D二、填空题（每空2分，共20分）11. VB中的“_____”关键字用于定义一个类。
答案：Class12. 当需要在VB中捕获并处理异常时，可以使用“_____”语句。
答案：Try...Catch13. 在VB中，一个窗体的标题可以通过“_____”属性来设置。
vb试题及答案(共10篇)
vb试题及答案（共10篇）篇1：计算机vb试题及答案计算机vb试题及答案(1)下面叙述正确的是(C)A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上三种描述都不对(2)以下数据结构中不属于线性数据结构的是(C)A.队列B.线性表C.二叉树D.栈(3)在一棵二叉树上第5层的结点数最多是(B)注：由公式2k-1得A.8B.16C.32D.15(4)下面描述中，符合结构化程序设计风格的是(A)A.使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑B.模块只有一个入口，可以有多个出口C.注重提高程序的执行效率D.不使用goto语句(5)下面概念中，不属于面向对象方法的是(D)A.对象B.继承C.类D.过程调用(6)在结构化方法中，用数据流程图(DFD)作为描述工具的软件开发阶段是(B)A.可行性分析B.需求分析C.详细设计D.程序编码(7)在软件开发中，下面任务不属于设计阶段的是(D)A.数据结构设计B.给出系统模块结构C.定义模块算法D.定义需求并建立系统模型(8)数据库系统的核心是(B)A.数据模型B.数据库管理系统C.软件工具D.数据库(9)下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10)下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式B.外模式C.概念模式D.逻辑模式(11)算法的时间复杂度是指(C)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数(12)算法的空间复杂度是指(D)A.算法程序的长度B.算法程序中的指令条数C.算法程序所占的存储空间D.算法执行过程中所需要的存储空间(13)设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B)注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A.349B.350C.255D.351(14)结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15)在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)注：即第一个阶段A.概要设计B.详细设计C.可行性分析D.需求分析(16)数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。
vb程序设计试题及答案
vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。
答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。
专升本vb程序设计试题及答案
专升本vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项是Visual Basic中的单行注释符号？A. //B. /* */C. 'D. ' '答案：C3. 在Visual Basic中，下列哪个函数用于计算数组中元素的个数？A. UBoundB. LBoundC. CountD. Len答案：A4. 如果要创建一个名为“Form1”的窗体，应该使用哪个关键字？A. FormB. SubC. FunctionD. Class5. 在Visual Basic中，下列哪个选项是正确的事件处理程序的声明方式？A. Sub Form1_Click()B. Sub Form1_Click(ByVal sender As Object, ByVal e As EventArgs)C. Function Form1_Click()D. Function Form1_Click(ByVal sender As Object, ByVal e As EventArgs)答案：B6. 下列哪个选项是Visual Basic中的逻辑运算符？A. AndB. OrC. NotD. All of the above答案：D7. 在Visual Basic中，哪个关键字用于退出当前的Sub过程？A. ExitB. EndC. ReturnD. Stop答案：A8. 在Visual Basic中，下列哪个选项是正确的条件语句？A. If...ThenB. Do...LoopC. For...NextD. Switch...Case9. 在Visual Basic中，下列哪个选项用于创建一个标签控件？A. LabelB. TextBoxC. ButtonD. ComboBox答案：A10. 在Visual Basic中，下列哪个选项用于创建一个文本框控件？A. LabelB. TextBoxC. ButtonD. ComboBox答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以声明一个常量。
VB程序设计练习题附加答案
《VB程序设计》综合复习资料第一章Visual Basic程序设计概述一、填空题1、Visual Basic是一种面向__对象________的可视化程序设计语言，采取了事件驱动________的编程机制。
2、在VB中工程文件的扩展名是vbp__________，窗体文件的扩展名是___frm_________，标准模块文件的扩展名是__bas_________。
3、执行“工程”菜单下的_部件_________命令，可选择并添加ActiveX控件。
4、Visual Basic 6.0用于开发__ WINDOWS ________环境下的应用程序。
二、选择题1、下面不是VB工作模式的是（C）A．设计模式B．运行模式C．汇编模式D．中断模式2、可视化编程的最大优点是（C）A．具有标准工具箱B．一个工程文件由若干个窗体文件组成C．不需要编写大量代码来描述图形对象D．所见即所得3、下列不能打开属性窗口的操作是（C ）A．执行“视图”菜单中的“属性窗口”命令B．按F4键C．按Ctrl+TD．单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是（D）A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G5、Visual Basic的编程机制是（D）A．可视化B．面向对象C．面向图形D．事件驱动三、简答题1、代码窗口主要包括哪几部分？2、在工程资源管理器窗口中，主要列出了哪三类文件？3、窗体布局窗口的主要用途是什么？4、VB的基本特点是什么？5、怎样理解可视化设计？6、怎要理解事件驱动编程？第二章简单的VB程序设计一、填空题1、设置是否可以用Tab键来选取命令按钮，应该用__ Tabstop ____________属性。
2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。
3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点。
VB程序设计考试(1)
VB程序设计考试（1）一、单选题（每题1分，共50题）1.Visual Basic 6．0集成环境的主窗口中不包括（ C ）。
正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是（）模式。
正确答案：AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False，则运行时（）。
正确答案：AA.文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容C.文本框中的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容4.控制名称都是系统的默认控件名，下列语句错误是（）。
正确答案：Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。
5.以下叙述中正确的是（）。
正确答案：A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%，abc!，abc$，abc#分别声明abc是（）。
正确答案：AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占（ A ）字节内存。
正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真，与它所连接的两个条件必须是（ C ）。
正确A.前一个为真，后一个为假B.前一个为假，后一个也为假C.前一个为真，后一个也为真D.前一个为假，后一个为真9.设a=6，则执行 x=iif(a>5,-1,0)后，x 的值为（ D ）。
VB程序设计试题及参考答案
VB程序设计试题及参考答案VB程序设计及参考答案⼀、单选题（共20分，每⼩题1分）1、要改变控件的宽度，应修改该控件的（）属性。
（A）TOP （B）width （C）Left （D）Height2、将命令按钮Command1设置为不可见，应修改该命令按钮的（）属性。
（A）Visible （B）Value （C）Caption（D）Enabled3、（）对象具有clear⽅法。
（A）图⽚框（B）窗体（C）复选框（D）列表框4、启动VB后，就意味着要建⽴⼀个新（）。
（A）窗体（B）⽂件（C）⼯程（D）程序5、下列（）对象不具有Clear⽅法。
（A）列表框（B）组合框（C）剪贴框（D）图⽚框6、组合框有三种风格，它们由Style属性所决定，其中为简单组合框时，Style 属性值应为（）（A）0 （B）1 （C）2 （D）37、下列可调整图⽚框的⼤⼩以适合图⽚的属性是（）（A）Stretch （B）autosize （C）picture （D）oledropmode 8、要想清除⽂本框中的内容则可利⽤（）进⾏。
（A）Caption （B）Text （C）Clear （D）Cls9、在⽂本框控件中将Text的内容全部显⽰为所定义的字符的属性是（）。
（A）Password （B）PasswordChar（C）需要编程来实现（D）以上都不是10、Visual Basic是⼀种⾯向对象的程序设计语⾔，所采⽤的编程机制是（）。
（A）从主程序开始执⾏（B）按过程顺序执⾏（C）事件驱动（D）按模块顺序执⾏11、下列四项中合法的变量名是（）。
（A）a-bc （B）a_bc （C）4abc （D）integer12、⽆论何种控件，共同具有的属性是（）（A）Text （B）Name （C）Caption （D）ForeColor13、有程序代码如下：Text1.Text = "Visual Basic程序设计"则Text1、Text ，和"Visual Basic程序设计"分别代表（）。
VB程序设计试题及答案(一)
VB程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。
(A) Forml.Caption=“欢迎使用VB”(B) Forml.Caption='欢迎使用VB'(C) Forml.Caption=欢迎使用VB(D) Forml.Caption="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中，其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。
东师《VB程序设计》2022年秋学期在线作业1
VB程序设计2022年秋学期在线作业1一、单选题1：执行语句Open "C:StuData.dat" For Input As #2 后，系统()。
A将C盘当前文件夹下名为StuData.dat的文件的内容读入内存B在C盘当前文件夹下建立名为StuData.dat的顺序文件C将内存数据存放在C盘当前文件夹下名为StuData.dat的文件中D将某个磁盘文件的内容写入C盘当前文件夹下名为StuData.dat的文件中正确答案：A2：语句Dim AA(9,9)所定义数组AA的元素个数为A 18B 81C 100D 90正确答案：C3：表达式Int(Rnd(O)+1)+Int(Rnd(1)-1)的值是()。
A 1B 0C -1D 2正确答案：B4：在窗体模块的通用声明段中声明变量时，不能使用()关键字。
A DimB PublicC PrivateD Static正确答案：D5：新建一工程，将其窗体的(名称)属性设置为MyFirst，则默认的窗体文件名为()。
A Forml.frmB工程1.frmC MyFirst.frmD Form1.vbp正确答案：C6：通过设置ADO数据控件的()属性可以建立该控件到数据源的连接信息。
A RecordSourceB RecordSetC ConnectionStringD Database正确答案：C7：下列控件中，没有Caption属性的是()。
A框架B列表框C复选框D单选按钮正确答案：B8：模拟方形骰子投掷的表达式是()。
A Int(6 * Rnd(1))B Int( 1+6 * Rnd(1))C Int(6 * Rnd(1) -l)D Int(6 * Rnd(1)-1)正确答案：B9：引用列表框(List1 )最后一个数据项应使用()。
A List1.List(Listl1. ListCount)B List1. List(Listl. ListCount - 1)C List1. List(ListCount)D List l. List( ListCounr-1)正确答案：B10：以下可以作为Visual Basic变量名的是()。
VB程序设计编程考试题及答案
VB程序设计编程考试题及答案1。
输入3个数，输出最大的数2。
有一元二次方程:aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根3。
输入一个百分制的成绩，若大于等于60，则用消息框弹出,显示“恭喜！成绩通过！”，若小于60，则弹出消息框，显示“抱歉！成绩没有通过！4。
输入学生的百分制成绩,转换输出为五级制成绩，90～100分转换为优秀，80～89转换为良好,70~79转换为中等，60~69转换为及格,0～60转换为不及格。
5。
随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。
例如，产生246，输出是642。
6。
输入两个整数，求它们的最大公约数。
7.分别统计1—100中,满足3的倍数、7的倍数的数各有多少。
8。
输入一串字符，统计其中字母A（不区分大小写)出现的次数。
9.我国目前有13亿人口，按人口年增长率0.8%计算，多少年后我国人口将超过26亿。
10。
小猴有桃若干，第一天吃掉一半多一个;第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个,到第7天只剩一个，问小猴原有桃多少？11.百元买百鸡问题。
假定小鸡每只5角，公鸡每只2元,母鸡每只3元，编程求解购鸡方案。
12。
编程求斐波那契数列前11项。
(斐波那契数列:F(0）=f（1)=1, F（n)=F（n—1）+F(n —2) n〉=2 ）13。
已知有序数组a（)，编程插入x（x的值为14）。
数组a中的元素分别为{12，6,4，89，75,63，100,20,31}。
14。
找出被3、5、7除,余数均为1的最小的5个正整数。
15利用随机函数产生50～100范围内的20个随机数，显示其中的最大值、最小值和平均值. 16。
编一函数，统计字符串中汉字的个数。
1.输入3个数,输出最大的数Private Sub command1_click（）Dim maxFor i = 1 To 3n = Val（InputBox（"输入第" ＆i ＆"个数")）If n > max Thenmax = nEnd IfNextPrint "三个数中最大的数是”; maxEnd Sub2.有一元二次方程：aX2+bX+c=0，依次输入a，b,c，判断此方程是否有实根Private Sub Command1_Click(）Dim a，b, c，nb = Text2c = Text3n = b * b — 4 * a ＊cIf n >= 0 ThenLabel4 = ”方程有根”ElseLabel4 = ”方程无根”End IfEnd Sub3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过!”，若小于60,则弹出消息框,显示“抱歉！成绩没有通过！Private Sub Form_Load(）Text1 = ""End SubPrivate Sub Command1_Click（）Dim nn = Text1If n 〉60 ThenVal （MsgBox（"恭喜！成绩通过!"）)ElseVal （MsgBox（”抱歉!成绩没有通过！"））End IfEnd Sub4.输入学生的百分制成绩，转换输出为五级制成绩，90～100分转换为优秀,80～89转换为良好,70~79转换为中等，60～69转换为及格，0～60转换为不及格。
VB程序设计 模拟试题
VB程序设计(专升本)阶段性作业1总分: 100分考试时间:分钟单选题1. 运算符“\”两边的操作数若类型不同，则先_________再运算。
(5分)(A) 取整为Byte类型(B) 取整为Integer类型(C) 四舍五入为整型(D) 四舍五入为Byte类型参考答案：C2. 将Visual Basic编制的程序保存在磁盘上，至少会产生何种文件_________。
(5分)(A) doc与.txt(B) com与.exe(C) bat与.frm(D) vbp与.frm参考答案：D3. Print语句的一个输出表达式为_________，则输出包括日期．时间信息。
(5分)(A) Date(B) Month(C) Time(D) Now参考答案：D4. 在设计模式双击窗体中的对象后，Visual Basic将显示的窗口是_________。
(5分)(A) 项目（工程）窗口(B) 工具箱(C) 代码窗口(D) 属性窗口参考答案：C5. 语句Print "5*5" 的显示结果是__________。
(5分)(A) 25(B) "5*5"(C) 5*5(D) 出现错误提示参考答案：C6. 语句“Form1.Print Tab(10);"#"”的作用是在窗体当前输出行_________。
(5分)(A) 第10列输出字符“#”(B) 第9列输出字符“#”(C) 第11列输出字符“#”(D) 输出10个字符“#”参考答案：A判断题7. 在Visual Basic中，有一些通用的过程和函数作为方法供用户直接调用。
(5分)正确错误参考答案：正确解题思路：8. 在面向对象的程序设计中，对象是指可以访问的实体。
(5分)正确错误参考答案：正确解题思路：9. 事件是由Visual Basic预先定义的对象能够识别的动作。
(5分)正确错误参考答案：正确解题思路：10. 由Visual Basic语言编写的应用程序有解释和编译两种执行方式。
VisualBasic6.0程序设计试题一与答案
VisualBasic6.0程序设计试题一与答案一、判断题：1、移动框架时框架内控件也跟随移动，所以框架内各控件的Left、Top属性值也将随之改变。
（错）2、VB提供的几种标准坐标系的原点都是在绘图区域的左上角，如果要把坐标原点放在其它位置，则需要使用自定义坐标系统。
（对）3、若窗体的坐标刻度为“缇”、窗体上的图片框控件的坐标刻度为“磅”，则图片框的Left属性值的单位为“缇”。
（对）4、用Scale方法改变了窗体坐标系后，窗体的Left、Top属性值不变。
（对）5、将容器的FillStyle属性设置为0后，容器中已绘制的图形的填充样式都为实心。
（错）6、语句“Shape1.FillStyle = vbSolid”和“Shape1.FillStyle = 0”作用相同。
（对）7、用Cls方法能够清除窗体或图片框中用Picture属性设置的图形。
（错）8、用Cls方法可以清除组合框中的所有表项。
（错）9、Picture图片框既可用来显示图片和绘制图形，也可以用Print方法来显示文字。
（对）10、在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。
（错）11、框架控件和形状控件都不能响应用户的鼠标的单击事件。
（错）12、图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框控件的有关属性值。
（错）13、执行语句Pic1.Picture = ”c:\temp\a.bmp”，可以为图片框控件Pic1加载文件名为c:\temp\a.bmp的图形文件。
（错）14、Picture对象的AutoSize属性值为True时，表示该对象不管原来图片的大小，一律都自动调整为控件的大小尺寸，以便能够完整地显示该图片。
（错）15、图片框控件与影像框控件加载图形文件的方法相同。
（对）二、选择题：1、改变控件在窗体中的左右位置应该修改控件的（）属性？（B）A. TopB. LeftC. WidthD. Right2、要改变控件的宽度，应该修改控件的（）属性？（C）A. TopB. LeftC. WidthD. Right3、重新定义图片框控件的坐标系统，可采用该图片框的（）方法？（A）A. ScaleB. ScaleXC. ScaleYD. SetFocus4、容器的ScaleMode属性值为（）时，容器坐标系的每一个单位为一磅？（A）A. 2B. 1C. 4D. 65、改变了容器的坐标系后，该容器的（）属性值不会改变？（A）A. LeftB. ScaleLeftC. ScaleTopD. ScaleWidth6、无论怎样改变图片框控件P1的坐标系，其中心点的x，y坐标分别为（）？（B）A.(P1.ScaleLeft+P1.ScaleWidth)/2、(P1.ScaleTop+P1.ScaleHeight)/2B.P1.ScaleLeft+P1.ScaleWidth/2、P1.ScaleTop+P1.ScaleHeight/2C.P1.Left+P1.Width/2、P1.Top+P1.Height/2D.P1.Width/2、P1.Height/27、设置图片框控件PIC1的背景色为红色，可以执行语句（）？（B）A.PIC1.BackColor = QBcolor(1)B.PIC1.BackColor = 255C.PIC1.BackColor = RGB(0,0,255)PIC1.BackColor = RGB(0,255,0)8、要使Shape控件以实心方式填充，应该设置其（）属性？（B）A. FillColorB. FillStyleC. BackStyleD. Shape9、下列表达式中，（）不是蓝颜色的值？（C）A.vbBlueB. Rgb(0,0,255)C. QBColor(12)D. &HFF000010、下列表达式中，（）不是红颜色的值？（C）A.vbRedB. Rgb(255,0,0)C. QBColor(1)D. &HFF11、（）对象不能作为控件的容器？（C）A. FormB. PictureBoxC. ShapeD. Frame12、若在图片框上用绘图方法绘制一个圆，则图片框的（）属性不会对该圆的外观产生影响。
vb程序设计试题（含答案）
vb程序设计试题（含答案）第一套试题一、选择题（每题2分，共30分）1.在VB环境中，工程文件的扩展名是( C )（A）.frm （B）.bas （C）.vbp （D）.frx2.下面4项中不属于面向对象系统三要素的是( A )（A）变量（B）事件（C）属性（D）方法3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C )（A）\ （B）/ （C）Mod （D）*4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor（C）AutoRedraw （D）Caption5.不论何控件，共同具有的属性是( B )（A）Text （B）Name（C）ForeColor （D）Caption6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D )（A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构（C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D )（A）“12334”（B）123 （C）12334 （D）1579.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D )（A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1（C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And d uty=“教授”And duty=“副教授” Then n=n+110.若要清除列表框的所有内容，可用来实现的方法是( C )（A）RemoveItem （B）Cls（C）Clear （D）以上均不可以11.要使时钟控件Timer1的Timer事件不起作用，以下正确的语句是( B ) （A）Timer1.Visible=False （B）Timer1.Enabled=False （A） Timer1.Interval=1000 （D）Timer1.Index=012.引用列表框(List1)最后一个数据项应使用的语( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount) (D)List1.List(ListCount-1)13.如下数组声明语句，正确的是( B )（A）Dim a[3,4]As Integer （B）Dim a(3,4)As Integer（C）Dim a(n,n) As Integer （D）Dim a(3,4)As Integer14.下面子过程语句说明合法的是(A、D )（A）Sub f1(ByVal n%) （B）Sub f1(n%)As Integer（C）Function f1%(f1%) （D）Function f1(ByVal n%)15.假定有如下的命令按钮(名称为Command1)事件过程：Private Sub Command1_Click()x=InputBox("输入："，"输入整数")MsgBox"输入的数据是：”，，”输入数据："+xEnd Sub16.程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是( A )（A）x的值是数值10 （B）输入对话框的标题是“输入整数”（C）信息框的标题是“输入数据：10”（D）信息框中显示的是“输入的数据是：”二、填空题（每题2分，共20分）1、当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择视图菜单的工具箱选项，使“工具箱”窗口显示。
VB语言程序设计试题库
VB 程序设计一、判断题1. 同一Form 窗体中的各控件可以相互重叠，其显示的上下层次的次序不可以调整。
（ X ）2. 一个对象的若能识别多个事件，我们只能对其中一个事件编程（）3. 单选按钮与复选框对象的 Value 属性类型不同，且只能取值 True 和False。
（√）4. 事件过程由某个用户事件或系统事件触发执行，它不能被其他过程调用。
（）5. 图片框的Move 方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框有关属性的值。
（√）6. “A=B=C”是一个合法的 Visual Basic 语句。
（）7. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时，组合框会自动把这一条目添加到它的列表框中。
（）8. Visual Basic 程序的运行可以从 Main （）过程启动，也可以从某个窗体启动。
（√）9. 在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。
（）10. 对于文件系统控件，当驱动器控件 Drivel 中的驱动器符改变时，文件夹列表控件 Dir1 中显示的文件夹也作相应的改变，可以在Drive1 中的Change 事件中使用如下命令。
Dir1. Path＝ Drive1. Drive（√）11. 滚动条控件可作为用户输入数据的一种方法。
（√）12. 单选按钮控件和复选框控件都具有 Value 属性，它们的作用完全相同。
（）13. 静态变量是一种局部变量，当原过程再次被执行时，静态变量的初值是上一次过程调用后的值。
（√）14. Visual Basic 提供的几种标准坐标系统的原点都是在绘图区域的左上角，如果要把坐标原点放在其他位置，则需使用自定义坐标系统。
（√）15．注释语句 REM 可自成一语句。
（√）16. 用鼠标选中某菜单控件时，触发Click事件；而用键盘选中该菜单控件时，触发 KeyPress （）17. 组合框兼有文本框和列表框两者的功能，用户可以通过键人文本或选择列表中的项目来进行选择。
VB程序设计试题及答案一
V B程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。
(A) Forml.Caption=“欢迎使用VB”(B) Forml.Caption='欢迎使用VB'(C) Forml.Caption=欢迎使用VB(D) Forml.Caption="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中，其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是D 。
VB程序设计复习模拟试题一及答案
VB程序设计复习模拟试题一及答案一、选择题(1)执行语句Dim X,Y As Integer 后,（）A)X和Y均被定义为整型变量B)X和Y均被定义为变体类型变量C)X被定义为整型变量,Y被定义为变体变量D)X被定义为变体类型变量,Y被定义为整型变量(2)以下关系表达式中，其值为True的是A)"XYZ">"XYz" B)"VisualBasic"<>"visualbasic"C)"the"="there" D)"Integer"<"Int"(3)执行以下程序段a$="Visual Basic Programming"b$="C++"C$=UCase(Left$(a$,7)) & b$ & Right$(a$,12)后,变量C$的值为A)Visual BASIC Programming B)VISUAL C++ ProgrammingC)Visual C++ Programming D)VISUAL BASIC Programming(4)下列叙述中正确的是A)MsgBox语句的返回值是一个整数B)执行MsgBox语句并出现信息框后,不用关闭信息框即可执行其他操作C)MsgBox语句的第一个参数不能省略D)如果省略MsgBox语句的第三个参数(Title),则信息框的标题为空(5)在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数,以下可以实现上述操作的事件过程是A)Private Sub Text1_Change()Label1.Caption=str(Len(Text1.Text))End SubB)Private Sub Text1_Click()Label1.Caption=str(Len(Text1.Text))End SubC)Private Sub Text1_Change()Label1.Caption=Text1.TextEnd SubD)Private Sub Label1_Change()Label1.Caption=str(Len(Text1.Text))End Sub(6)在窗体上画两个单选按钮(名称分别为Option1,Option2,标题分别为"宋体"和"黑体"),1个复选框(名称为Check1,标题为粗体)和1个文本框(名称为Text1,Text属性为"改变文字字体")，窗体外观如图所示。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
《VB程序设计基础》试题一、选择题：（每空 2 分，共 20 分）1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。
A. 结构化程序设计B. 程序开发环境C. 事件驱动编程机制D. 程序调试技术2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。
A. 属性、事件、方法B. 控件、属性、事件C. 窗体、控件、过程D. 窗体、控件、模块3. 窗体模块保存在一个扩展名为__________的文件中。
A. basB. vbpC. vbgD. frm4. 下面正确的赋值语句是_________。
A. x+y=30B. y=π*r*rC. y=x+30D. 3y=x5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。
A.“492”B.“249”C.“294”D.“429”6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。
A. a<=b<=cB. a<=b Or b<=cC. a<=b And b<=cD. a<=b Not b<=c7.为了把焦点移到文本框，所使用的方法是___________。
A. SetFocusB.VisibleC.RefreshD.GetFocus8. INT（100*RND）产生的随机整数的闭区间是_____________。
A.[0，100]B.[1，100]C.[1，99]D.[0，99]9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个元素。
A. 5B. 36C. 30D. 不确定10. 下面过程定义语句合法的是____________。
A. Function P1（P1）B. Function P1（By Val x As Integer ） As IntegerC. Sub P1（x As Integer ）As SingleD.Sub P1（ByVal x （））1．找出100以内能同时被3、5、7整除的最小5个数据。
Private Sub Command1_Click()Dim countn%, n%n = 1: countn = 0Don = n + 1If ___________________________________________ ThenPrint ncountn = countn + 1End IfLoop _______________________End Sub2. 输出杨辉三角前五行。
Option Base 1Private Sub Command1_Click()Dim a(5, 5) As Integer, i As Integer, j As IntegerFor i = 1 To 5a(i, 1) = 1二、填空题：（每空 3 分，共 18 分）_____________________________Next iFor i = 1 To 5For j = 2 To i - 1________________________________Next jNext iFor i = 1 To 5For j = 1 To iPrint a(i, j),Next jPrintNext iEnd Sub3. 求水仙花数。
Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integer, x As IntegerFor a = 1 To 9For b = 0 To 9For c = 0 To 9x =_____________________If ____________________________ Then Print x Next cNext bNext aEnd Sub1. 点击窗体时，分析程序的执行结果。
Private Sub Form_Click()For i = 1 To 5For j = 1 To iPrint "* ";Next jPrintNext iEnd Sub程序功能结构分析：程序执行结果：2. 单击命令按钮时，分析程序的执行结果。
Private Function P(N As Integer)dim sum%For I = 1 To Nsum = sum + 1Next I三、程序分析题：（每题 6 分，共 12 分）P = sumEnd FunctionPrivate Sub Command1_Click()S = P(1) + P(2) + P(3) + P(4)Print S;End Sub程序功能结构分析：程序执行结果：1. 编制如下图所示的程序。
本程序根据如下公式，由输入的身高计算标准体重。
男：标准体重（kg ）= 身高（cm ）-100女：标准体重（kg ）= 身高（cm ）-105得分 评卷人 四、基本操作题：（每题 10 分，共 20 分）2. 编写一个窗体，窗体上有一个标签，并且标签上字的颜色可以不停的变化，标签从 窗体的上部向下部滚动出现。
1． 求：1+2！+3！+4！+……+ n!（n 为任意输入的一个正整数）。
得分 评卷人五、综合应用程序设计题：（每题 15 分，共 30 分）2. 输入若干个学生的成绩（以-1为结束标志），存入一维数组中，统计输入的成绩个数、最高分、最低分、平均分和及格率。
参考答案一、选择题：（每空 2 分，共 20 分）1. C2. A3. D4. C5. B6. C7. A8. D9.C 10.B二、填空题：（每空 3 分，共 18 分）1. n mod 3=0 And n mod 5=0 And n mod 7=0 until countn=52. a(i,i)=1 a(i,j)=a(i-1,j)+a(i-1,j-1)3. x=100*a+10*b+c x=a^3+b^3+c^3三、程序分析题：（每题 6 分，共 12 分）1. 程序功能结构分析：单击窗体，在窗体上输出五行星号，第1行输出一个*号，第2行输出两个*号，以此类推，第5行输出五个星号。
该程序结构为双重循环结构，循环体中Print "* "语句一共执行15次。
程序执行结果：2.程序功能结构分析：程序中定义了一个函数过程P，含一个形参N，其功能是求N个1之和。
当点击命令按钮时，分别四次调用函数过程P，并分别将实参1、2、3、4传递给形参N。
然后，将P返回的值求和，并输出。
程序执行结果：四、基本操作题：（每题 10 分，共 20 分）1.参考答案：Private Sub Command1_Click()If Option1.Value ThenText2.Text = Val(Text1.Text) - 100ElseText2.Text = Val(Text1.Text) - 105End IfEnd Sub2.参考答案：Private Sub Form_Click()Label1.Caption = "欢迎学习VB程序设计" & vbNewLine & NowTimer1.Interval = 500End SubPrivate Sub Timer1_Timer()Label1.ForeColor = RGB(Int(Rnd * 256), Int(Rnd * 256), Int(Rnd * 256))If Label1.Top < Form1.Height ThenLabel1.Top = Label1.Top + 50ElseLabel1.Top = 0End IfEnd Sub五、综合应用程序设计题：（每题 15 分，共 30 分）1.参考答案：Private Sub Command1_Click()Dim n As Integer, sum As Double, f As Double, i As Integersum = 1f = 1n = Val(Text1.Text)For i = 2 To n Step 1f = f * isum = sum + fNext iText2.Text = Str(sum)End Sub2.参考答案：Option Base 1Private Sub Command1_Click()Dim s(100) As Single, n As Integer, max As Integer, min As Integer, sum As Single, f As Single, i As Integer, count As Integer n = 0: count = 0sum = 0For i = 1 To 1000s(i) = InputBox("请输入第" & i & "个学生的成绩：", "成绩录入") If s(i) = -1 Then Exit Forn = n + 1Print "第" & i & "个学生的成绩：" & s(i)Next iText1.Text = nmax = 0min = 100For i = 1 To nsum = sum + s(i)If s(i) > max Then max = s(i)If s(i) < min Then min = s(i)If s(i) > 60 Then count = count + 1Next iText2.Text = maxText3.Text = minText4.Text = sum / nText5.Text = (count / n) * 100 & "%"End Sub《VB程序设计基础》试卷第11 页共11 页。