VB考试题及答案
VB考试试题及答案
一、填空题1、根据数据的编码方式，文件可分为文件和文件。
ASCII、二进制2、根据数据的存取方式和结构，文件可分为文件和文件。
顺序、随机3、工程文件的扩展名是，窗体文件的扩展名是。
Vbp、Frm4、Visual Basic应用程序通常由窗体模块、模块和模块三类组成。
标准、类5、Visual Basic中的控件分为标准控件、和。
ActiveX控件、可插入对象6、Visual Basic中的菜单有两种形式，分别是形式和形式。
直接执行、打开对话框7、一个控件在窗体上的位置由和属性决定。
Top、Left8、Visual Basic字符采用编码方式，每个字符用个字节编码。
统一、二9、控件和窗体的Name属性只能通过期间设置，不能在期间设置。
设计、运行10、在Visual Basic中，字符串常量要用括起来，日期/时间常量要用括起来。
“、#11、以下程序段的输出结果是。
9X=8.6Y=Int(X+0.5)Print Y12、要想在文本框中显示垂直滚动条，必须把属性设置为2，同时把属性设置为。
ScrollBars、MultiLine、True13、控件数组的名字由属性指定，而数组中的每个元素由属性指定。
Name、 Index14、在KeyDown和KeyUp事件过程中，当参数Shift的值为、、,分别代表、、键。
1、2、4、Shift、Ctrl、Alt15、以下语句的输出结果是。
3A%=3.14156Print A%16、为了使一个标签透明且没有边框，必须把它的BorderStyle属性设置为，并把BackStyle属性设置为。
0、117、由Array函数建立的数组名字必须是类型。
数组作过程形参时，调用方式为调用。
变体、传址18、在MouseDown和MouseUp事件过程中，当参数Button的值为、、时，分别代表鼠标的、、键。
1，2，4、左、右、中二、选择题1、语句Print 5*5\5/5的输出结果是（）BA、5B、25C、0D、12、实现字符的Unicode编码方式与ANSI编码方式相互转换的函数是( )BA、StrB、StrConvC、TrimD、Mid3、为了窗体的大小可以改变，必须把它的BorderStyle属性设置为（）BA、1B、2C、3D、44、下列不能激活属性窗口的操作是（）DA、用鼠标双击窗体的任何部件B、执行“工程”菜单中的“属性窗口”命令C、按Ctrl+F4键D、按F4键5、要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目，则应把该列表框的MultiSelect属性设置为（）BA、0B、1C、2D、其他6、为了在按下回车健时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）CA、ValueB、CancelC、DefaultD、Enabled7、使用Picture1和Text1分别作为图片框和文本框的名称，下列不正确的语句是（）CA、Print 25B、Picture1.Print 25C、Text1.Print 25D、Debug.Print 258、下列可作为Visual Basic的变量名是（）AA、FilenameB、A(A+B)C、254DD、Print9、下列不能打开代码窗口的操作是（）DA、双击窗体上的某个控件B、双击窗体C、按F7键D、单击窗体或控件10、确定一个窗体或控件大小的属性是（）BA、width或HeightB、width和HeightC、Top或LeftD、Top和Left11、在用Open语句打开文件时，如果省略“For方式”，则打开的文件的存取方式是（）CA、顺序输入方式B、顺序存取方式C、随机存取方式D、二进制方式12、假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（）AA、MenuItem.Enabled=FalseB、MenuItem.Enabled=TrueC、MenuItem.Visible=TrueD、MenuItem.Visible=False13、编写如下事件过程：Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Integer,_Y As Integer)If Shift=6 And Button=2 ThenPrint “BBBB”End ifEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作是（）DA、同时按下Shift键和鼠标左键B、同时按下Shift键和鼠标右键C、同时按下Ctrl、Alt键和鼠标左键D、同时按下Ctrl、Alt键和鼠标右键14、用下面的语句所定义的数组元素个数是（）CDim Array(3 To 5,-2 To 2) As IntegerA、20B、12C、15D、2415、为了使用列表框中的项目分为多列显示，需要设置的属性为（）AA、ColumnsB、StyleC、ListD、MultiSelect16、为了在按下ESC时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）BA、ValueB、CancelC、DefaultD、Enabled17、下列不能打开菜单编辑器的操作是（）DA、按Ctrl+E键B、单击工具栏中的“菜单编辑器”按钮C、执行“工具”菜单中的“菜单编辑器”命令D、按Shift+Alt+M键18、决定窗体有无控制菜单的属性是（）AA、ControlBoxB、MinButtonC、EnabledD、MaxButon19、编写如下事件过程：Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)If (Button And 3)=3ThenPrint “AAAA”End ifEnd Sub程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键是（）DA、右B、左C、同时按下左、右D、按什么键都不显示20、与传统的程序设计语言相比，Visual Basic最突出的特点是（）CA、结构化程序设计B、程序开发环境C、事件驱动编程机制D、程序调试技术21、为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为（）BA、1B、2C、3D、422、实现字符的Unicode编码方式与ANSI编码方式相互转换的函数是（）BA、 StrB、StrConvC、 TrimD、 Mid23、语句Print Sgn(-6^2)＋Abs(-6^2)＋Int(-6^2）的输出结果是（）CA、-36B、1C、-1D、-7224、.为了使列表框中的项目分为多列显示，需要设置的属性为（）aA、 ColumnsB、StyleC、ListD、Multiselect25、用下面的语句所定义的数组元素个数是（）DDim Array(-3 To 5) As IntegerA、6B、7C、8D、9三、分析下列程序，写出程序的运行结果。
vb考试试题及答案
vb考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的属性？A. DimB. PublicC. PrivateD. Property答案：D2. VB中的“Option Explicit”语句用于做什么？A. 声明变量类型B. 强制变量声明C. 定义过程D. 创建对象实例答案：B3. 下列哪个不是VB的控件事件？A. ClickB. LoadC. ChangeD. Hover答案：D4. 在VB中，以下哪个不是标准数据类型？A. IntegerB. StringC. BooleanD. Pointer答案：D5. VB中的“With”语句用于什么？A. 初始化对象B. 创建对象实例C. 引用对象的多个属性或方法D. 循环遍历集合答案：C6. 在VB中，如何将一个表达式的结果赋值给一个变量？A. 使用“=”运算符B. 使用“==”运算符C. 使用“:=”运算符D. 使用“->”运算符答案：A7. 下列哪个是VB中的循环结构？A. IfB. For EachC. Select CaseD. While答案：D8. 在VB中，如何表示一个空引用？A. NullB. NothingC. EmptyD. Undefined答案：B9. VB中的“Handles”关键字用于什么？A. 过程定义B. 事件处理C. 类定义D. 属性声明答案：B10. 在VB中，以下哪个不是集合的属性或方法？A. AddB. ItemC. CountD. Sort答案：D二、填空题（每题2分，共20分）11. VB中的________关键字用于定义一个方法或属性的访问级别。
答案：Private12. 当你想要在VB中创建一个新类时，你需要使用________关键字。
答案：Class13. 在VB中，________方法用于在运行时创建对象。
答案：New14. 如果你想要在VB中捕获并处理异常，你应该使用________语句。
VB期末考试考卷及答案
VB期末考试考卷及答案一、选择题（每题1分，共5分）1. 在VB中，下列哪个函数用于返回字符串的长度？A. Len()B. Length()C. Size()D. Count()A. DimB. IntegerC. IntD. Var3. 在VB中，下列哪个语句用于退出当前循环？A. Exit ForB. BreakC. Exit DoD. ContinueA. OpenB. LoadC. CreateD. Read5. 在VB中，下列哪个事件在窗体加载时发生？A. LoadB. InitializeC. FormLoadD. FormOpen二、判断题（每题1分，共5分）1. VB中的变量必须先声明后使用。
（）2. 在VB中，Sub过程可以返回值。
（）3. VB中的数组下标从1开始。
（）4. 在VB中，可以使用Select Case语句进行多条件判断。
（）5. VB中的字符串可以用单引号(')表示。
（）三、填空题（每题1分，共5分）1. 在VB中，用于声明常量的关键字是______。
2. VB中的逻辑运算符包括______、______和______。
3. 在VB中，要实现两个变量的值交换，可以使用______变量作为中间变量。
4. 在VB中，______方法用于设置文本框的字体。
5. VB中的______事件在用户单击按钮时发生。
四、简答题（每题2分，共10分）1. 简述VB中事件的执行过程。
2. 请列举三种VB中的数据类型。
3. 简述如何使用Select Case语句进行多条件判断。
4. 请说明如何使用VB中的循环结构实现1到100的累加。
5. 简述如何使用VB中的文件操作函数读取文件内容。
五、应用题（每题2分，共10分）1. 编写一个VB程序，计算并输出1到100之间所有偶数的和。
2. 编写一个VB程序，实现用户输入一个字符串，程序将其逆序输出。
3. 编写一个VB程序，使用循环结构输出九九乘法表。
vb试题及答案
VB试卷一、单项选择题(每题2分,共40分)1. 窗体的标题栏显示内容由窗体对象的属性决定。
A) BackColor B)BackStyle C)Text D)Caption2. 窗体的示意图标可用属性来设置。
A) Picture B) Image C) Icon D) MouseIcon3. 窗体的控制菜单的有无由窗体对象的属性决定。
A) ControlBox B) MinButton C) MaxButton D) BorderStyle4. 若要取消窗体的最大化功能，则可设置属性为False来实现。
A) ControlBox B) MinButton C) MaxButton D) Enabled5. 以下4个选项，不属于VB的工作模式。
A) 编译 B) 设计 C) 运行 D) 中断6. 窗体的边框样式由窗体对象的属性来设置。
A) BackStyle B) BorderStyle C) WindowState D) FillStyle7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。
A) FontName B) Font C) FontSize D) FontBold8. 命令按钮的标题文字由属性来设置。
A) Text B) Caption C) Name D) (名称)9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。
A) 变量 B) 属性 C) 事件 D) 方法10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。
A) Value B) Cancel C) Default D) Enabled11. 若要使命令按钮不可见，可设置属性为False来实现。
A) Value B) Enabled C) Visible D) Cancel12. 运行程序时，系统自动执行窗体的事件。
A) load B) click C) unload D) GotFocus13. 若要设置文本框最大可接收的字符数，可通过属性来实现。
vb试题及答案一
vb试题及答案一一、选择题1. 在Visual Basic中，以下哪个关键字用于声明一个变量？A. DimB. IfC. ForD. While答案：A2. Visual Basic中的哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B3. 在Visual Basic中，以下哪个事件用于响应按钮点击？A. ClickB. LoadC. ChangeD. DblClick答案：A4. 在Visual Basic中，以下哪个函数用于将字符串转换成数字？A. Str()B. Val()C. Int()D. CInt()答案：D5. 在Visual Basic中，以下哪个语句用于结束程序的执行？A. EndB. ExitC. StopD. Quit答案：B二、判断题1. Visual Basic是一种面向对象的编程语言。
（对）2. 在Visual Basic中，所有的变量都需要声明数据类型。
（错）3. 在Visual Basic中，可以使用If语句来实现条件判断。
（对）4. Visual Basic中的数组下标总是从0开始。
（错）5. Visual Basic中的事件驱动编程允许程序在没有用户交互的情况下运行。
（错）三、简答题1. 请简述Visual Basic中使用循环结构的目的是什么？答：循环结构在Visual Basic中用于重复执行一段代码直到满足特定条件，这使得处理大量数据或执行重复任务变得更加高效和简洁。
2. 请解释Visual Basic中类和对象的区别。
答：在Visual Basic中，类是一个模板，它定义了对象的属性和方法。
而对象是类的实例，具有类定义的属性和方法，并可以进行操作。
四、编程题1. 编写一个Visual Basic程序，该程序接受用户输入的三个数，并计算这三个数的平均值。
```vbDim num1 As DoubleDim num2 As DoubleDim num3 As DoubleDim average As Double' 接受用户输入num1 = Val(InputBox("请输入第一个数:"))num2 = Val(InputBox("请输入第二个数:"))num3 = Val(InputBox("请输入第三个数:"))' 计算平均值average = (num1 + num2 + num3) / 3' 显示结果MsgBox "这三个数的平均值是: " & average```五、论述题1. 论述Visual Basic中事件处理的重要性及其在应用程序开发中的应用。
VB期末考试试卷及答案
VB期末考试试卷及答案一·选择题1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（B ）A属性、控件和方法B属性、事件和方法C窗体、控件和过程 D控件、过程和模块2. 所有控件都有一个共同的属性，这个属性是（C ）A textB fontC nameD caption3。
下列叙述中错误的是（A )A 工程文件扩展名是.vbgB 标准模块文件的扩展名是.basC 窗体模块的扩展名是。
frmD 类模块的扩展名是.cls4。
当要编写一个新的Visual Basic程序时，所做的第一件事是（A )A 新建一个工程B 编写代码C 设置属性D 添加Active X控件5。
下面控件中，没有caption属性的是（B ）A 框架B 组合框C 命令按钮D 复选按钮6. 在文件框中输入字符时，若只显示某个字符，如(＊），应设置属性是（B ）A MultiLineB PasswordCharC TextD selText7. 若要将窗体从内存中卸载出去，其实现的方法是（D ）A ShowB HideC LoadD UnLoad8。
下列关于过程叙述不正确的是（D ）A 过程的传值调用是将实参的具体值传值传递给形参B 过程的传址调用是将实参在内存的地址传递给形参C 过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的D 无论过程传值调用还是传地址调用，参数传递都是双向的9。
某人创建1个工程，其中的窗体名为Form1,之后又添加了1个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是( C )A 在Form1的Load事件过程中加入语句Load Form2B 在Form2的Load事件过程中加入语句Form2.ShowC 在“过程属性"对话框中把“启动对象”设置为Form2D 在Form2的TabIndex属性设置为1，把Form1的TabIndex属性设置为210。
vb测试题及答案
vb测试题及答案一、单项选择题（每题2分，共10分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 下列哪个函数用于计算两个数的和？A. SumB. AvgC. CountD. Max答案：A3. 在VB中，以下哪个关键字用于声明一个变量？A. DimB. ConstC. FunctionD. Sub答案：A4. 在VB中，以下哪个选项是正确的循环结构？A. ForB. WhileC. DoD. All of the above答案：D5. 在VB中，以下哪个选项是正确的条件语句？A. IfB. SelectC. CaseD. All of the above答案：D二、填空题（每题2分，共10分）1. 在VB中，声明一个整型变量并赋值为10，可以使用语句：Dim myVar As Integer; myVar = _______。
答案：102. VB中，用于输出信息到立即窗口的函数是 _______。
答案：Debug.Print3. 在VB中，要创建一个名为“myForm”的新窗体，可以使用语句：Form1. _______ "myForm"。
答案：Load4. VB中，要结束当前程序的执行，可以使用语句：_______。
答案：End5. 在VB中，要声明一个数组，可以使用语句：Dim myArray(10) As _______。
答案：Integer三、简答题（每题5分，共20分）1. 请简述VB中的事件驱动编程是什么？答案：事件驱动编程是一种编程范式，程序的执行流程由事件（如用户操作、系统消息等）触发，而不是由程序代码顺序执行。
2. 描述VB中如何使用If...Then...Else语句进行条件判断。
答案：在VB中，可以使用If...Then...Else语句进行条件判断，如果条件为真，则执行Then后面的代码块，如果条件为假，则执行Else 后面的代码块。
vb考试试题题库及答案
vb考试试题题库及答案VB（Visual Basic）是一种由微软公司开发的编程语言，广泛用于开发Windows应用程序。
以下是一些VB考试的试题题库及答案，供参考：一、单选题1. 在VB中，以下哪个是正确的数据类型？- A. Integer- B. Real- C. String- D. All of the above答案：D2. VB中的“Sub”过程与“Function”过程的区别是什么？- A. Sub过程可以返回值，Function过程不能- B. Function过程可以返回值，Sub过程不能- C. 两者都可以返回值- D. 两者都不能返回值答案：B3. 在VB中，以下哪个是正确的变量声明方式？- A. Dim x- B. Declare x As Integer- C. Both A and B- D. None of the above答案：C二、多选题1. VB中的控件可以具有哪些属性？- A. Name- B. Caption- C. Font- D. All of the above答案：D2. VB中，以下哪些是事件驱动的编程语言的特点？- A. 事件驱动的程序在事件发生时执行代码- B. 程序的执行顺序由事件的触发顺序决定- C. 程序可以同时响应多个事件- D. 程序必须等待事件的发生才能执行答案：A, B, C三、判断题1. VB是一种编译型语言。
- 正确- 错误答案：错误2. 在VB中，可以使用“Print”方法在文本框中显示文本。
- 正确- 错误答案：正确3. VB中的“Option Explicit”语句可以强制声明所有变量。
- 正确- 错误答案：正确四、简答题1. 简述VB中的事件和方法的区别。
答案：事件是用户或系统触发的动作，如点击按钮、键盘输入等。
方法是一种过程，可以包含代码来执行特定的任务或计算。
事件通常与控件相关联，并可以触发方法的执行。
2. 解释VB中“类”的概念。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB考试题及答案1、下列关于算法的叙述不正确的是( C )。
A、算法是解决问题的有序步骤；B、算法具有确定性、可行性、有限性等基本特征；C、一个问题的算法都只有一种；D、常见的算法描述方法有自然语言、图示法、伪代码法等。
4、在Visual Basic中，InputBox函数用于产生输入对话框，其返回值类型为字符串，若要把返回值转换为数值型的数据，则可利用Val 函数进行转换。
４、在Visual Basic中，用于产生消息框的是(MsgBox)函数，该函数返回值为一个整数，表示(在对话框中按下的按钮)。
1、用InputBox函数可生成界面元素( C )。
A、消息框B、“保存”对话框C、简单输入框D、“颜色”对话框2、如果要显示Visual Basic中的预定义输入对话框,需要调用Visual Basic的函数( D )。
A、MsgBoxB、OpenC、OutputD、InputBox6、设有语句x = InputBox (" 输入数值", "0","示例")程序运行后，如果从键盘上输入数值10，并按回车键，则下列叙述中正确的是(D、A 、变量X的值是数值10B 、在InputBox 对话框标题栏中显示的是"示例"C 、0是默认值D 、变量X值是字符串"10 "6、Rnd函数不可能产生__B__的值A、0B、1C、0.1234D、0.0000522、语句If x=1 Then y=1中，下列说法正确的是__D__。
A、前后两个“=”均为赋值运算符B、前后两个“=”均为关系运算符C、前面的“=”为赋值运算符，后面的“=”为关系运算符D、前面的“=”为关系运算符，后面的“=”为赋值运算符1、下面语句书写正确的是( D )。
A、If a>max Then max=a Else max=b End IfB、If a>max Then max=aElse max=bEnd IfC、If a>max Thenmax=aElsemax=6D、If a>max Thenmax=aElsemax=6End If5、以下Case语句中错误的是CA、Case 0 To 10B、Case Is>10C、Case Is>10 And Is<50D、Case 3,5,Is>101、当x的输入值分别为2、8和15时，写出执行下列事件过程的输出结果。
Private Sub Command1_Click()Dim x%, y%x = InputBox("请输入x的值：")Select Case xCase 1, 3, 5y = x - 1Case 6 To 10y = x + 1Case 2, 4y = 2 * xCase Is > 10y = x * x + 1End SelectPrint "x="; x, "y="; yEnd Sub程序输出为：x=2 y=4x=8 y=9x=15 y=22612、在窗体上画一个文本框Text1、一个命令按钮Command1，然后编写如下事件过程：Private Sub Command1_Click() x=0Do While x<50x=(x+2)*(x+3)n=n+1LoopText1.Text=Str(x)End Sub程序运行后，单击命令按钮，在文本框中显示的值分别为( B )。
A、0B、72C、50D、1681、设有程序段Dim k%k=5Do until k=0k=k-1则下面描述正确的是(C)。
a) 循环体一次也不执行b) 循环体执行一次c) 循环体执行五次d) 循环体执行无限次3、下面程序段中循环语句的循环次数是(B)。
For x=10 To 1 Step -3Print xNext xa) 0 B、 4 C、 5 D、104、执行语句段For i=1 to 3：Print i ：Next i后变量i的值是(D)。
a) １B、 2 C、３D、４5、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()x=0n=InputBox("")For i=1 To nFor j=1 To ix=x+1Next iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是DA、3B、4C、5D、61、下面程序段执行后输出结果是(B)。
For i=1 To 2s=1For j=0 To i-1s=s+s*jNext jPrint s,Next iA、1 1B、1 2C、2 1D、2 217、写出执行下列事件过程的输出结果。
Private Sub Command1_Click()For i=1 To 4x=4For j =1 To 3x=3For k=1 To 2x=x+6Next iPrint xEnd Sub答案：1518、执行下面的三重循环后，a 的值为( C ) 。
For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext iA、3B、9C、14D、2124、下列程序段的执行结果为__C__。
X=6For K=1 To 10 Step -2X=X+KNext KPrint K;XA、-1 6B、-1 16C、1 6D、11 3126、下列程序段的执行结果为__C__。
K=0For J=1 T o 2For i=1 To 3K=i+1Next IFor I=1 To 7K=K+1Next INext JPrint KA、10B、6C、11D、1627、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i=1 To 4x=4For j =1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是( B )A、7B、15C、157D、53828、执行下面的三重循环后，a 的值为( C )For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext iA、3B、9C、14D、2123、单击Command1按钮后，Text1文本框中显示(3)。
Private Sub Command1_Click ()Dim i As Integer,n As IntegerFor i =0 To 50i=i+3n=n+1If i> 10 Then Exit ForNextText1.Text =Str (n)End Sub2、以下过程被调用时，窗体上输出(3)。
Sub sele()Dim n as Integeri=21:n=3Do While i>ni=i－nLoopPrint i6、以下程序段的输出结果是＿1112＿。
num=10Do Until num>11num=num+1Print num;Loop8、写出运行结果：以下程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果是什么？( 2 ) Private Sub Command1_Click()x=0Do Until x=-1a = InputBox("请输入A的值")a = Val(A、b = InputBox("请输入B的值")b = Val(B、x = InputBox("请输入x的值")x = Val(x)a = a+b+xLoopPrint aEnd Sub3、完成下面的求2到50以内奇数的积的过程：Sub mult()Dim ji as Integerji=1Dim I as _____integer_____For I=_____2_____ to 50if I MOD2=____1______Then ___ji=ji*I___________ Next ______End Sub4、下面事件过程的功能是求２～100以内的素数，在横线上填上适当内容。
Private Sub Command1_Click()Dim i%, j%, m%m = 0For i = 2 To 100j = 2Do While j<=sqr(i)If i Mod j = 0 Then Exit Doj = j + 1LoopIf j>sqr(i) Then Print i,: m = m + 1If m Mod 5 = 0 Then PrintNext iEnd Sub12、下面事件过程的功能是：输出100以内个位数为8且能被３整除的所有数，在横线上填上适当内容。
Private Sub Command1_Click()Dim i%, a%For i = 0 To 9a = i * 10 + 8If a Mod 3 <> 0 Then GoT o kPrint ak:Next iEnd Sub13、下面事件过程的功能是求Ｓ＝１+(１*２)+(１*２*３)+…+(１*２*…*n)的值，在横线上填上适当内容。
Private Sub Command1_Click()Dim n%, i%, j&, s&n = InputBox("n=")j = 1: s = 0For i = 1 To nj = j*is=s+jNext iPrint "s="; sEnd Sub14、写出执行下列事件过程的输出结果。
Private Sub Command1_Click()Dim a%, b%a = 2:b = 3While b < 100Print a, ba = (b - A、* 2 + bb = (a + B、* 2 + aWendPrint "a="; a, "b="; bEnd Sub答案：2 35 21a=53 b=20125、以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。
请在横线处将程序补充完整。
Private Sub Form_Click()Dim x AS Single,amax As Single,amin As Singlex = InputBox (" Enter a score ")amax = xamin = xDo While __x>=0____If x > amax Thenamax = xEnd IfIf __ x<="">amin = xEnd Ifx = InputBox (" Enter a score ")LoopPrint "Max =";amax, "Min =";aminEnd Sub11、下面事件过程的功能是：使用公式2222121116n+++≈ π求π的值，要求计算到最后一项的值大于10-6为止，在横线上填上适当内容。