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机试模拟试题(十五套)
附录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机试模拟试卷120(题后含答案及解析)
VB机试模拟试卷120(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．(1)在名称为Forml的窗体上建立一个名称为P1的图片框和两个命令按钮，名称分别为Cmdl和Cmd2，标题分别为“输出”和“清除”，如图22—1所示。
要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母“load me’’；如果单击“清除”按钮，则清除图片框中的内容。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjl．frm，工程文件名为sjl．vbp。
(2)在名为：Form1的窗体上绘制一个标签，名为Labl，标签上显示“请输入密码”；在标签的右边绘制一个文本框，名为Textl，其宽、高分别为1500和300。
设置适当的属性使得在输入密码时，文本框中显示“*”字符，此外冉把窗体的标题设置为“PassWord窗口”。
运行时的窗体如图22—2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。
正确答案：(1)本题主要考查图片框控件的基本操作。
命令按钮的标题通过Caption属性设置，单击命令按钮触发Click事件；打印信息用Print方法，清除用Cls方法。
题目要求在图片框中打印信息，所以在编写代码时应指定Print方法和C1s方法的使用对象。
在窗体上建立好控件后，先设置控件属性，再编写事件过程。
①建立界面并设置控件属性。
程序用到的控件及其属性见下表。
②命令按钮Cmdl触发Click事件，打印信息用Print方法。
题目要求在图片框中打印信息，所以在编写代码时，应指定Print方法使用对象。
Private Sub Cmdl Click( ) P1．Print”load me”End Sub ③清除用Cls方法。
题目要求清除图片框中的信息，所以在编写代码时，应指定Cls方法的使用对象。
Private Sub Cmd2_Click( ) P1．Cls End Sub ④调试并运行程序。
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丸习越一一、判断(4小题1分，共20分。
请将答案涂在答瓯卡上，正确的涂A,措误的涂B)1.Visual Basic 6.0工作模式有3种：它们是没计、运行和调试。
()2.标签支持Dblclick事件。
(2 )3.窗体中控件的位置由Height和Top,同性确定。
(3 )4.滚动条的SmallChangeW性设置为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 ifi句与之相匹配。
(12 >13.Exit for 是Do 循环的一个出口。
( 13 )14.选择结构与循环结构可以相互散套，并且允许交叉嵌套•( 14 )15.Visual Basic 6.0 中，Dim a(-5 to 5) as single 是正确的数组定义.(15 )16.可以用Ubound。
函数返回数组卜,标的卜界M 16 )17.过程体内可以再定义另外一个过程。
< 17 )18.实参是变量，旦过程定义时与其对应的形参用Byval关键字加以PU制是地址(引用)传递。
(18 )19.用Output模式打开文件.如果指定的路径不存在，则会自动先创建指定的路径，然后再创建文件。
< 19 )20.Visual Basic 6.0中，文件号最大可取的但是511. ( 20 )二、单项选择题：(每小超1分，共30分。
计算机二级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的所有偶数之和。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
程序设计==================================================题号：7137在考生文件夹中有一个工程文件sjt43.vbp，其功能是：找出矩阵元素的最大值，并求出矩阵对角线元素之和，窗体外观如图所示。
程序运行时，矩阵数据被放入二维数组a中。
当单击"找矩阵元素最大值"命令按钮时，找出矩阵中最大的数，并在标签Labe13中显示。
当单击"对角线元素之和"命令按钮时，计算矩阵主对角线元素之和，并在标签Label4中显示。
文件中已给出部分程序，请编写"找矩阵元素最大值"及"对角线元素之和"两个命令按钮的事件过程中的部分程序代码。
注意：不得修改程序的其他部分和控件属性。
最后将修改后的文件按原文件名存盘。
程序调试通过后，两个命令按钮的事件过程必须依次各执行一次。
原题代码：Option Base 1Dim a(4, 4) As IntegerPrivate Sub Command1_Click()'**********Begin**********'**********End***********'不得修改以下部分save Label3End SubPrivate Sub Command2_Click()'**********Begin**********'**********End**********'不得修改以下部分save Label4End SubPrivate Sub Form_Load()Open App.Path & "\in5.txt" For Input As #1For i = 1 To 4For j = 1 To 4Input #1, a(i, j)Next jNext iClose #1End Sub标准模块：Public Sub save(l As Control)Open App.Path & "\out5.txt" For Append As #1Print #1, l.CaptionClose #1End Sub程序填空==================================================题号：7178在考生文件夹下有一个工程文件sjt7.vbp，在程序运行时，单击"输入整数"按钮，输入一个整数，并在窗体上显示此整数的所有不同因子和因子个数。
图1是输入53后的结果，图2输入100的结果。
已经给出了全部控件和程序，但程序不完整。
要求：请把程序中的_____改为正确的内容。
不能修改程序中的其他部分，也不能修改控件的属性。
最后用原来的文件名保存工程文件和窗体文件。
原题代码：Private Sub Command1_Click()Dim n As IntegerCls'**********FILL**********________ = InputBox("请输入一个整数")Print "因子数="; fun(n)End SubFunction fun(m As Integer)Dim s As Integer'**********FILL**********s = ______For k = 1 To Abs(m) / 2If m Mod k = 0 Thens = s + 1Print kEnd IfNext k'**********FILL**********_____End Function答案：位置 1:n位置 2:位置 3:fun = s题号：7184在考生文件夹下有一个工程文件sjt16.vbp，在Form1的窗体中有一个文本框，一个计时器和两个命令按钮。
程序的功能是在运行时，单击"开始计数"按钮，就开始计数(如图所示)，每隔1秒，文本框中的数加1；单击"停止计数"按钮，则停止计数。
要求：修改适当的控件的属性，并把程序中的_____改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。
最后将修改后的文件以原来的文件名存盘。
原题代码：Private Sub C1_Click(Index As Integer)'**********FILL**********Select Case ______Case 1Timer1.Enabled = False'**********FILL**********Case _____Timer1.Enabled = TrueEnd SelectEnd SubPrivate Sub Timer1_Timer()'**********FILL**********Text1.Text = Text1.Text _____End Sub答案：位置 1:Index位置 2:位置 3:+ 1题号：7220已知出租车行驶不超过4公里时一律收费10元。
超过4公里时分段处理，具体处理方式为：15公里以内每公里加收1.2元，15公里以上每公里收1.8元。
在考生文件夹下有一个工程文件sjt33.vbp。
程序的功能是：单击"输入"按钮，将弹出一个输入对话框，接收出租车行驶的里程数；单击"计算"按钮，则可根据输入的里程数计算应付的出租车费，并将计算结果在名称为Text1的文本框内显示。
在窗体文件中已经给出了全部控件(如图所示)，但程序不完整，要求把程序中的_____改为正确的内容。
注意：不得修改已经存在的内容和控件属性，最后将修改后的文件按原文件名存盘。
原题代码：Dim s As IntegerPrivate Sub Command1_Click()s = Val(InputBox("输入里程数（单位：公里）"))End SubPrivate Sub Command2_Click()If s > 0 Then'**********FILL**********Select Case _____Case Is <= 4'**********FILL**********_____Case Is <= 15'**********FILL**********f = 10 + _____'**********FILL**********Case _____'**********FILL**********f = 10 + _____ + (s - 15) * 1.8End SelectText1.Text = fElseMsgBox "请单击“输入”按钮输入里程数！"End IfEnd Sub答案：位置 1:s位置 2:f = 10位置 3:(s - 4) * 1.2位置 4:Is > 15 【或】 Else位置 5:11 * 1.2 【或】 13.2窗体设计==================================================题号：7368在名称为Form1的窗体上画一个名称为Image1的图像框，再画一个名称为Command1、标题为"退出"的命令按钮。
通过属性窗口设置图像框的属性，将考生文件夹下的pic1.bmp文件加载到图像框，使图片的大小能够随图片框大小而改变。
设置命令按钮的属性，使得程序运行时，按回车键即可执行命令按钮的Click事件过程。
窗体外观如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt39.vbp，窗体文件名为sjt39.frm。
题号：7336在名称为Form1、标题为"考试"的窗体上添加一个名称为Combo1、初始文本为空的下拉式组合框，下拉列表中有"隶书"、"宋体"和"楷体"三个项目。
程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt62.vbp，窗体文件名保存为sjt62.frm。
题号：7276在名称为Form1的窗体上建立一个名称为"menul"、标题为"文件"的弹出式菜单，其含有三个菜单项，它们的标题分别为："打开"、"关闭"、"保存"，名称分别为"m1"、"m2"、"m3"。
再添加一个命令按钮，名称为"Command1"、标题为"弹出菜单"。
要求：编写命令按钮的Click事件过程，使程序运行时，单击"弹出菜单"按钮可弹出"文件"菜单(如图所示)。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名保存为sjt14.vbp，窗体文件名保存为sjt14.frm。