当前位置：文档之家 › 《VB程序设计》历年全真模拟试卷四(含答案)

《VB程序设计》历年全真模拟试卷四(含答案)

  • 格式：pdf
  • 大小：199.82 KB
  • 文档页数：13

下载文档原格式

  / 13

合集下载

VB机试模拟试卷4(题后含答案及解析)

VB机试模拟试卷4(题后含答案及解析)

VB机试模拟试卷4(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．注意：下面出现的“考生文件夹”均为c:\wexam\25160001。

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上建立一个名称为Text1的文本框，一个名称为Cmd1，标题为“输出”的命令按钮，如图4-1所示。

要求程序运行后，在文本框输入几个字符，单击“输出”按钮，则在窗体上显示文本框中的文字。

注意：在程序中不能使用任何变量。

保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。

(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2，标题为“按钮一”和“按钮二”的命令按钮，如图4-2所示。

要求程序运行后，如果单击“按钮一”，则把“按钮二”移到“按钮一”上，使两个按钮重合，如图4-3所示。

注意：在程序中不得使用任何变量(必须通过属性设置来移动控件)。

保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp正确答案：(1)在窗体上建立好控件后，先设置控件属性，再编写事件过程。

通过命令按钮的Caption属性来设置其标题，单击命令按钮触发Click事件；文本框显示内容是用Text属性。

文本框中的内容通过其Text属性得到，在命令按钮的Click事件中利用Print方法将文本框中的内容输出，完成题目要求。

解题步骤：第一步：建立界面并设置控件属性。

程序中用到的控件及其属性见表4-1。

第二步：编写程序代码。

参考代码：Private Sub Cmd1_Click( ) Cls Print Text1.Text End Sub 第三步：调试并运行程序。

第四步：按题目要求存盘。

(2)在窗体上建立好控件后，先设置控件的属性，再编写事件过程。

命令按钮的Caption属性用来设置其标题，单击命令按钮触发Click 事件，本题考查的是按钮的摆放位置的设置，涉及到对象的Left和Top属性。

电大VB程序设计形成性考核4答案

电大VB程序设计形成性考核4答案

电⼤VB程序设计形成性考核4答案判断题：（共20题每题2分）1、如果⼀个菜单项的Visibal属性值为False，则该菜单及它的⼦菜单都不会显⽰。

参考答案：正确2、双精度数据类型的数据在机器内部⽤8个字节存储。

参考答案：正确3、语句Print “123”+45的输出结果是“12345”。

参考答案：错误4、当命令按钮的Style属性值为1－Graphical时，不可以⽤Caption属性设置标题的⽂字，可以⽤Picture属性给命令按钮添加图形。

参考答案：错误5、编译后形成的可执⾏应⽤程序⽂件是可以脱离开系统独⽴执⾏的。

参考答案：正确6、在盘驱动器列表框Drive1的Change事件过程中，代码Dir1.Path=Drive1.Drive的作⽤是：当Drive1的驱动器改变时，Dir1的⽬录列表随同驱动器相应变化。

参考答案：正确7、设计菜单中每⼀个菜单项分别是⼀个控件。

每⼀个控件都有⾃⼰的名字。

参考答案：正确8、通过改变属性窗⼝中的name属性，可以改变窗体上显⽰的标题。

9、⼆进制⽂件与随机⽂件的主要区别是：⼆进制⽂件与随机⽂件类似，必须限制固定长度，可⽤喜欢的⽅式来存取⽂件。

参考答案：错误10、for...next语句中的初值必须⼤于终值。

11、系统提供的诸如sqr( )等函数不属于过程。

参考答案：正确12、在vb中，可通过函数now返回计算机系统的⽇期和时间。

参考答案：正确13、vb允许设计和使⽤⽤户⾃⼰设计的控件。

参考答案：正确14、vb提供的单选按钮的value属性，true表⽰选中，false表⽰未选中。

参考答案：正确15、在表达式中，运算符两端的数据类型要求⼀致。

参考答案：错误16、在vb中，⽂件菜单的“删除⼯程”的作⽤是将当前vb⼯程在硬盘中删除。

参考答案：错误17、vb⽀持弹出菜单，所谓“弹出菜单”是指单击⿏标后打开的菜单。

18、事件过程与sub过程，它们相同点都是事件的驱动，⽽不同的只是事件过程由控件属性决定，⽽sub过程是由户⾃定义。

vb程序设计试题及答案

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的函数，返回值为整数，应该使用语句________。

期末模拟试题4及参考答案

期末模拟试题4及参考答案

VB期末模拟试题4一、单项选择题（每题2分，共30分）1．定义符号常量所使用的命令为（）。

A．Dim B．Public C．Static D．Const2．在Visual Basic中表达式x=8的类型是（）。

A．错误的表达式B．关系表达式C．算术表达式D．逻辑表达式3．在下列四个表达式中，非法的Visual Basic表达式是（）。

A．x=x+y B．x+y>z C．x=(x=y) D．以上均为合法表达式4．数学式子Sin300写成V isual Basic表达式是（）。

A．Sin30B．Sin(30)C．SIN(300)D．Sin(30*3.14/180)5．用于获得字符串S最右边4个字符函数是（）。

A．Right(S,4) B．Left(S,4)C．RightStr(S) D．RightStr()6．用于获得字符串S从第6个字符开始的4个字符的函数是（）。

A．Mid(S, 6, 4) B．Mid (S, 4, 6)C．MidStr(S, 6, 4) D．MidStr(S, 4, 6)7．用于获得字符串长度的函数是（）。

A．Len() B．Length()C．StrLen() D．StrLength()8．用于获得字符串S最左边4个字符的函数是（）。

A．Left (S,4) B．Left(1,4)C．LeftStr (S) D．LeftStr (S,4)9．表达式4 + 5 \\ 6 * 7 Mod 8 / 9的值是（）。

A．4 B．5C．6 D．710．以下多窗体操作中工程文件的扩展名是（）。

A．.frm B．.vbp C．.bas D．.cls11. 下面选项中，能绘制椭圆的语句是（）A．Circle (1000, 1000),500,RGB(255,0,0),0.5B．Circle (1000, 1000),500,RGB(255,0,0),,0.5C．Circle (1000, 1000),500,RGB(255,0,0),,,0.5D．Circle (1000, 1000),500,RGB(255,0,0),,,,0.512.图像框（Image）和图片框（Picture）在使用时有所不同，以下叙述中正确的是（）A．图片框比图像框占内存少B．图像框内还可包括其它控件C．图片框有Stretch属性而图像框没有D．图像框有Stretch属性而图片框没有13.ADOrs为Recordset对象，从Tabel中获取所有记录的语句是（）A．ADOrs.New "Select * From Tabel"B．ADOrs.Open "Select * From Tabel"C．ADOrs.Execute "Select * From Tabel"D．ADOrs. Select "Select * From Tabel"14.要发送数据，通常使用Winsock控件的（）A．SendData方法B．Listen方法C．Accept方法D．GetData方法15. VB程序中通常不会产生错误提示的（）。

VB程序设计期末模拟试题及答案

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考试试题及答案

vb考试试题及答案VB考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中的哪个函数可以用来获取当前系统时间？A. Now()B. Date()C. Time()D. All of the above答案：D3. 在VB中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D4. VB中，以下哪个选项是正确的条件判断语句？A. If...ThenB. Select...CaseC. Both A and BD. None of the above答案：C5. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arr(10) As IntegerB. Dim arr() As Integer = New Integer(10)C. Both A and BD. None of the above答案：C6. VB中，以下哪个选项是正确的窗体属性？A. CaptionB. TextC. Both A and BD. None of the above答案：C7. 在VB中，以下哪个选项是正确的事件处理程序？A. Sub Form_Load()B. Sub Form_Click()C. Both A and BD. None of the above答案：C8. VB中，以下哪个选项是正确的控件？A. LabelB. TextBoxC. Both A and BD. None of the above答案：C9. 在VB中，以下哪个选项是正确的文件访问模式？A. Open For InputB. Open For OutputC. Both A and BD. None of the above答案：C10. VB中，以下哪个选项是正确的错误处理语句？A. On Error GoToB. On Error Resume NextC. Both A and BD. None of the above答案：C二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量i，可以使用语句_________。

全国计算机等级考试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中，______用于定义一个过程。

2011年全国计算机等级考试二级VB模拟试卷（四）参考答案

2011年全国计算机等级考试二级VB模拟试卷（四）参考答案2011年全国计算机等级考试二级VB模拟试卷(四)参考答案一、选择题：35题，2分/题，共70分下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。

1.执行以下程序段后,变量c的值为( )a = " Visual Basic Programing"b = "Quick"c =b & UCase (Mid(a,7,6) & Right(a,11)A)Visual BASIC ProgramingB)Quick Basic ProgramingC)QUICK Basic ProgramingD)Quick BASIC Programing分析:2.不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式是（）A)A*B=0 and A+B<>0B)(A=0 or B=0)and (A<>0 OrB<>0)C)not(A=0 And B=0) and (A=0 or B=0)D)A*B=0 and (A=0 or B=0)分析:3. 下面子过程语句说明合法的是（）A)Function fl(ByVal n%)B)Sub fl (n%)As IntegerC)Function fl%(fl%)D)Sub fl(ByVal n%())分析:4.对窗体编写如下代码：Option Base 1Private Sub Form _KeyPress(KeyAscii As Integer) a=Array (237,126,587,48,498)ml=a(1)m2=1If KeyAscii=13ThenFor i=2 To 5If a (i)>ml Thenml=a (i)m2=iEnd IfNext iEnd IfPrint ml;print m2End Sub程序运行后，按回车键，输出结果为（）A)48 4B)237 1C)587 3D)498 4分析:5.Visual Basic 中没有提供下列（）事件A)MouseDownB)MouseUpC)MouseMoveD)MouseExit分析:6.执行下面对面的程序后，X的值为（）x=50Fox i=1 To 20 Step 2Next iA)66B)67C)68D)69分析:7.为了防止用户随意将光标置于控件之上，需做的工作是（）A)将控件的Enabled属性设置为FalseB)将控件的TabStop属性设置为FalseC)将控件的TabStop属性设置为TrueD)将控件的TabIndex属性设置为0分析:8.表达式String(2,"Shanghai")的值是（）A) ShB) ShanghaiC) ShanghaiShanghaiD) SS分析:9.为了在按回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True,这个属性是（）A) valueB) DefaulC) CancelD) Enabed分析:10.visual Basic 提供的缺省窗体包含（）A) 标题栏B)菜单栏C)工具条分析:11.假定有一个菜单项，名为MenuItem,为了在运行时该菜单项失效（变灰），应使用的语句为（）A)MenuItem.Enabled=FalseB)MenuItem.Enabled=TrueC)MenuItem.Visible=TrueD)MenuItem.Visible=False分析:12.下列不能打开菜单编辑器的操作是（）A)按Ctrl+EB)单击工具栏中的“菜单编辑器”按钮C)执行“工具”菜单中的“菜单编辑器”命令D)按Shift+Alt+M分析:13.列表框（如图2-6所示）经过下列操作后，剩余的项目是（）Listl.RemoveItem lListl.RemoveItem 2Listl.RemoveItem lA)aaB)bbC)ccD)dd分析:14.要暂时关闭计时器，应把计时器的某个属性设置为False，这个属性是（）A)VisibleB)TimerC)EnabledD)Interval分析:15.InputBox函数返回值的类型为（）A)数值B)字符串C)变体D)数值或字符串（视输入的数据而定）分析:16.当窗体的AutoRedraw属性采用默认值时，若在窗体装入时使用绘图方法绘制图形，则应将程序放在（）A)Paint事件B)Load事件C)Initilize事件D)Click事件分析:17.下列可以打开立即窗口的操作是（）A)Ctrl+DB)Ctrl+EC)Ctrl+FD)Ctrl+G分析:18.如是要向工具箱中加入控件和部件，可以利用“工程”的菜单中的（）命令A)引用B)部件C)工程属性D)添加窗体分析:19.若要清除列表框的所有内容，可用来实现的方法是（）A)RemoveitemB)ClsC)ClearD)以上均不可以分析:20.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer, i As Integerm = 0i = 2i = i + m +1m = i + a + bFunc = mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim k As Integer, m As IntegerDim p As Integerk=4m=1p=Func(k,m)Print p;p=Func(k,m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为（）。

vb程序设计编程考试题及答案

vb程序设计编程考试题及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. 以下哪个函数用于将字符串转换为数值？A. ValB. StrC. ChrD. Asc答案：A3. 在Visual Basic中，下列哪个关键字用于定义一个过程？A. FunctionB. SubC. ClassD. Property答案：B4. 如果变量x的值是5，那么表达式"x > 3 And x < 7"的值是什么？A. TrueB. FalseC. NullD. Empty答案：A5. 在Visual Basic中，下列哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. Visual Basic中的哪个事件会在窗体加载时触发？A. ClickB. LoadC. MouseDownD. KeyDown答案：B7. 在Visual Basic中，下列哪个选项是正确的数组声明方式？A. Dim arr(5)B. Dim arr As Integer(5)C. Dim arr(5) As IntegerD. Dim arr As Integer答案：C8. 下列哪个关键字用于在Visual Basic中创建一个类？A. FunctionB. SubC. ClassD. Module答案：C9. 在Visual Basic中，下列哪个控件允许用户从预定义的列表中选择一个项目？A. TextBoxB. ListBoxC. ComboBoxD. CheckBox答案：C10. 如果变量x的值是10，那么表达式"x Mod 3"的结果是什么？A. 1B. 2C. 3D. 0答案：B二、填空题（每题3分，共30分）1. 在Visual Basic中，使用________关键字可以声明一个变量。

vb考试题及答案解析

vb考试题及答案解析VB考试题及答案解析1. 以下哪个选项是Visual Basic的简称？A. VBAB. VBSC. VBD. VBScript答案：C解析： Visual Basic的简称是VB，而VBA是Visual Basic for Applications的缩写，VBS是Visual Basic Script的缩写，VBScript是一种脚本语言。

2. 在Visual Basic中，以下哪个关键字用于声明一个变量？A. DimB. SubC. FunctionD. Const答案：A解析： Dim关键字用于声明变量，Sub关键字用于声明一个过程，Function用于声明一个函数，而Const用于声明一个常量。

3. 如果要在一个窗体上显示文本“Hello, World!”，以下哪个代码段是正确的？A. Label1.Text = "Hello, World!"B. Form1.Caption = "Hello, World!"C. TextBox1.Text = "Hello, World!"D. Button1.Text = "Hello, World!"答案：B解析： Form1.Caption属性用于设置窗体的标题栏文本，因此选项B是正确的。

Label1是标签控件，TextBox1是文本框控件，Button1是按钮控件，它们用于显示文本，但不是设置窗体标题。

4. 如何在Visual Basic中创建一个数组？A. Dim numbers(5) As IntegerB. Dim numbers As Integer(5)C. Dim numbers = New Integer(5)D. Dim numbers(5) As Integer()答案：D解析：在Visual Basic中，创建数组的正确方式是声明一个数组变量，并指定数组的类型和大小。

  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

25、 假定Pic1和Tex1分别为图片框和文本框的名称,下列不正确的语句 是 。 A) Print 25 B) Pic1.Print 25 C) Tex1.Print 25 D) Debug.Print 25 26、 以下语句的输出结果是(□表示空格)C x=“VB” y=“程序设计” Print x；y A) VB□程序设计 B) □VB□程序设计 C) VB程序设计 D) □VB□程序设计□ 27、执行以下程序段后,变量z的值是 x=“Visual Basic Programming” y=“Quick” z=y & Ucase(Mid(x,7,6)) & Right(x,12)D A) Visual BASIC Programming B)Quick Basic Programming C) QUICK Basic Programming D) Quick BASIC Programming 28、在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a%, b% a = InputBox("输入第一个数") b = InputBox("输入第二个数") Print b + a End Sub 程序运行后,单击命令按钮,先后在两个输入对话框中分别输入234和 432,则输出结果是B A) 579 B) 666 C) 456 D) 123456 29、 执行下面的语句后,所产生的对话框的标题是 a=InputBox(“ABC”，“DEF”) (C) A) BBBB B) 空 C) DEF D) 出错，不能产生信息框 30、决定窗体上显示内容的方法是 (D) A) Text B) Name C) Caption D) Print 31、为了文本框具有垂直滚动条,应先把MuItiLine属性设为True,然后 再把ScrollBars属性设置为 C A) 0 B) 1 C) 2 D) 3 3otFocus C) SetFocus D) LostFocus 33、表示复选框的状态的属性是 D A) Align B) Alignment C) Sorted D) Value ****34、设置单选框被选中的属性是 A A) True B) Alignment C) False D) Value 35、删除列表框中指定的项目所使用的方法为 D A) Move B) Remove C) Clear D) RemoveItem 36、当拖动滚动条中的滚动块时,将触发滚动条的事件是C A) Move B) Change C) Scoll D) SetFocus 37、以下正确的语句是 B A) If a>b Then t=a ; a=b ; b=t B) If a>b Then t=a : a=b : b=t C) If a>b Then t=a a=b b=t D) If a>b Then t=a , a=b , b=t 38、写出程序运行的结果 1 1 1 Private Sub Form＿Click Dim x as Integer X=1 If x<=1 Then Print x, If x<=2 Then Print x; If x<=3 Then Print x; Print End Sub 39、在窗体上添加一文本框和一命令按钮，并编写如下程序： Private Sub Command1_Click() Dim x1 As String, x2 As String x1 = InputBox("请输入x1的值：") x2 = InputBox("请输入x2的值：") Text1.Text = x1 + x2 End Sub 在程序运行过程中，单击命令按钮后，在两次出现的输入对话框中的文 本框中分别输入23和32并按回车键，则文本框text1中显示的数据是多 少？2332 40、写出程序运行的结果 20 。 Private Sub Form＿Click Dim a as single,b as single, c as single,,m as single a=-10
C. 画图 D. 显示文字 17、为了删除窗体上的一个控件，下列正确的操作是：B A按回车键 B选择要清除的控件，然后按Del键 C按Esc键 D选择要清除的控件，然后按回车键。 18、InputBox函数中有5个参数，其中必须写明的参数是( A) A、指定对话框中显示按钮的数目 B、设置对话框标题 C、提示信息 D、所有参数都是可选的 19、执行下列语句后，列表框中各表项顺序为 （ 2 4 6 8 10 ）。 List1.Clear For i = 2 To 10 step 2 List1.AddItem i Next i 20、程序运行时可以激活其（B ）事件。 A.Change B.Load C.Dblclick D.Click 21、设组合框Combo1中有5个项目，则以下能删除最后一项的语句是（ D） bo1.RemoveItem Text bo1.RemoveItem 2 bo1.RemoveItem 3 bo1.RemoveItem Combo1.ListCount-1 22、确定一个控件大小的属性是（ D ） A、Width或Height B、Top和Left C、Top或left D、Width和Height 23、假定命令按钮的名称（Name属性）为Command1，则把命令按钮的标 题设置为“确定”的语句为（ B ） mand1.Caption=确定 B.Form1.Caption=“确定” mand1=“确定” mand1.Caption=“确定” 24、组合框有三种不同风格的形式:下拉组合框、简单组合框和下拉列 表框，通过（A ） 属性设置。 A.Style B.BoderStyle C.FillStyle D.Draw
《VB程序设计》历年全真模拟试卷四（含答案）
一、选择题 1、 VB6.0分为3种版本，这3种版本是 企业 、 专业 、 学习 。 2、与传统的程序设计语言相比,Visual Basic 最突出的特点是 C 。 A) 结构化程序设计 B) 程序开发环境 C) 事件驱动编程机制 D) 程序调试技术 3、构成对象的三要素是 属性 、 方法 、 事件 。 4、假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性 窗口中设置窗体的属性,预先应执行的操作是 A 。 A) 单击窗体上没有控件的地方 B) 单击任一个控件 C) 不执行任何操作 D) 双击窗体的标题栏 5、产生一个100～200（包括100和200）范围内的正整数 INT(RND*101+100) 。 6、表示x是5或7的倍数 X MOD 5=0 OR X MOD 7=0 。 7、取字符变量S中第五个字符起的6个字符 MID(S,5,6) 。 8、X、Y都大于Z X>Z AND Y>Z OR X<Z AND Y>Z 。 9、X、Y中有一个小于Z X>Z AND Y<Z AND X<Z AND Y>Z 。 10、 计算下列表达式的值: (1) 123+23 mod 10\7+Asc("A") 188 (2) 100+"100"&100 200100 (3) int(68.555*100+0.5)/100 68.56 (4)已知A$="87654321",求表达式Val(Left(A$,4)+Mid$(A$,4,2))的值 876554 （5）Len("VB程序设计") 6 11、填空 (1)可以删除字符串左边空格的函数是（ C ） 。 A Ltrim B Rtrim C Trim D Mid (2)以下语句的输出结果是（D ） 。 Print Format$(12345.5,"###,000.00") A 12345.5 B 12,345.5 C 012,345.50 D 12,345.50
b=20 c= -30 m=a If b>m Then m=b If c>m Then m=c Print m End Sub 41、 以下程序段的输出结果为 D 。 x = 1 y = 4 Do Until y > 6 x = x * y y = y + 1 Loop Print x A) 1 B) 4 C) 8 D) 120 42、执行下面的程序段后，s的值为 B s =2 For i = 1 To 10 Step 2 s = s + i \ 4 Next i A) 21 B) 6 C) 8 D) 24 43、阅读下面的程序段： For i = 1 To 2 For j = 1 To 2 s = s + 1 Next j Next i 执行上面的2重循环后，s的值为：B A) 3 B) 4 C) 14 D) 21 44、事件过程如下： Private Sub Command1_Click() Dim a%,b%,c% x = 0 Do Until x = -1 a = InputBox("请输入a的值") b = InputBox("请输入b的值")
(3)设A= “abcdefghijklm”，下面（B ）的函数值为“jklm”。 A Mid(A,9,14) B Right(A, 4) C Mid(A,9,4) D Left(A,10,4) (4) 设a=2,b=3,c=4,d=5下列表达式的值是（ D ）。 4*c=b^2 And b <> a+c A -1 B 1 C True D False (5) 下列可作为VB的变量名的是(D ) A、end B、abc.1 C、4ABC D、a_1 (6) 表达式 （B ）可以计算字符串变量x 的长度。 A、Str(x) B、Len(x) C、Len(x)-1 D、Val(x) 12、 下列不能打开代码窗口的操作是D A) 双击窗体上的某个控件 B) 双击窗体 C) 按F7键 D) 单击窗体或控件 13、下列说法中正确的是 为了装入一个Visual Basic应用程序,应当D A) 只装入窗体文件(.frm) B) 只装入工程文件(.vbp) C) 分别装入工程文件和标准模块文件 D) 分别装入工程文件、窗体文件和标准模块文件 14、 下列可作为Visual Basic的变量名的是D A) 4-Delta B) Integer C) xm.frm D) Gzff 15、保存VB应用程序，以下正确的操作是( B ) A、 只保存窗体文件(.frm) B、 分别保存窗体和工程文件(.vbp) C、 只保存窗体文件，不保存工程文件。 D、 只保存工程文件。 16、Visual Basic窗体设计器的主要功能是 A. 建立用户界面 B. 编写源程序代码 (A )