9月份vb程序设计基础月考试卷(窗体数据类型表达式)

合集下载

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程序设计试题及答案一、选择题（每题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程序设计题库(全)

程序设计第一题、题目：（事件）单击窗体（响应）求50以内所有偶数的和，并在窗体上输出来。

将结果存入变量S中。

代码：Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目：（事件）双击窗体（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码：Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。

将结果存入变量SUM中代码：Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+iEnd IfNextPrint sum第四题题目：（事件）单击窗体（响应）编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。

将结果存入变量M中。

代码：Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目：（事件）双击窗体（响应）求100以内奇数的和，并将结果输出在窗体上。

将结果存入变量SUM中。

代码：Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目：（事件）单击窗体（响应）已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码：Dim s As SingleFor i=1 To 10a=i*iSum =1/a + SumNextPrint Sum第七题题目：（事件）双击窗体（响应）求1+1*2+1*2*3+....+1*2*3*. (10)并将结果存到变量S中代码：Dim s As Longj=1For i = 1 To 10j= j*iSum = Sum + jNextPrint Sum第八题题目：（事件）单击窗体（响应）求1—1/2+1/3—1/4+….+1/99—1/100的值。

vb试题及答案基础

vb试题及答案基础一、选择题（每题2分，共20分）1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. SetD. Const答案：A2. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D3. VB中，用于实现条件判断的语句是：A. If...Then...ElseB. For...NextC. Do...LoopD. While...Wend答案：A4. 下列哪个选项是VB中的过程？A. FunctionB. SubC. Both A and BD. None of the above答案：C5. VB中，用于实现循环的语句是：A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D6. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(10)B. Dim arr(10) As IntegerC. Both A and BD. None of the above答案：C7. VB中，用于创建用户界面的控件是：A. LabelB. TextBoxC. ButtonD. All of the above答案：D8. 在VB中，下列哪个选项是正确的文件访问模式？A. Open For InputB. Open For OutputC. Open For AppendD. All of the above答案：D9. VB中，用于实现错误处理的语句是：A. On Error GoToB. On Error Resume NextC. On Error GoTo 0D. All of the above答案：D10. 在VB中，下列哪个选项是正确的事件处理？A. ClickB. DoubleClickC. MouseDownD. All of the above答案：D二、填空题（每题2分，共20分）1. VB中，声明全局变量的关键字是________。

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程序设计考试试题及答案月考上机试题一．选择题：(10*2)1由单精度浮点型的数据组成的字节数是A.2B.4C.8D.162.可以同时删除字符串前导和尾部空白的函数是A．LtrimB．RtrimC．TrimD．Mid3.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口4.在窗体上添加如下命令按钮，然后编写如下事件过程：C Private Sub Command1 _ Click()Dim a(10)As IntegerDim p(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub该过程的运行结果为:A.35B.33C.31D.295.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是A.1B. -1C. 0D. 26.若m，x，y，均为Integer型变量，则执行下面语句后m值是m=1：X=2：Y=3m=IIf(X＞Y，X+Y，X-Y)A.-1B.0C.1D. 27.设a=″Visual Basic″，下面使b=″Basic″的语句是A.b=Left(a，8，12)B.b=Mid(a，8，5)C.b=Right(a，5，5)D.b=Left(a，8,5)8.以下不能运行工程的操作是A..执行"运行"菜单中的"启动"命令B.单击工具栏中的"启动"命令D.按下F5键 C.按下Ctrl+F5键9.下列关于面向对象程序设计的叙述不正确的是A.对象具有属性、方法等特性B.对象之间的通信产生了消息C.一个对象是一个软件构造块，它包含数据与相关的操作D.对象的属性不能被改变10.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1 _ Click（）Static X As IntegerStatic Y As IntegerClsY=lY=Y+5X=5+XPrint X，YEnd Sub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为:A.15 16B.15 6C.15 15D.5 6二．填空题（3*4）1.计算1*2*3*...*3000，当积大于3000时停止计算。

vb考试题及答案

vb考试题及答案随着计算机技术的发展，程序设计语言在软件开发中扮演着重要的角色。

Visual Basic（简称VB）是一种面向对象的高级编程语言，被广泛应用于Windows平台下的软件开发。

为了帮助大家更好地掌握VB 编程知识，本文将提供一些VB考试题及答案，希望对大家的学习和复习有所帮助。

1. VB中，如何声明一个整型变量？答案：使用关键字Dim来声明变量，例如：Dim num As Integer2. VB中，如何进行条件判断？答案：可以使用关键字If...Then...Else来进行条件判断，例如：If condition Then' 条件为真时执行的代码Else' 条件为假时执行的代码End If3. VB中，如何使用循环结构？答案：可以使用关键字For、While或者Do...Loop来实现循环，例如：For i As Integer = 1 To 10' 循环体，执行10次Next4. VB中，如何定义一个函数？答案：使用关键字Function来定义函数，例如：Function AddNumbers(ByVal num1 As Integer, ByVal num2 As Integer) As IntegerReturn num1 + num2End Function5. VB中，如何处理异常？答案：可以使用关键字Try...Catch...Finally来处理异常，例如：Try' 可能会引发异常的代码块Catch ex As Exception' 处理异常的代码块Finally' 无论是否发生异常，都会执行的代码块End Try6. VB中，如何创建一个类？答案：使用关键字Class来创建一个类，例如：Public Class MyClass' 类的成员和方法End Class7. VB中，如何使用MessageBox显示消息框？答案：可以使用MessageBox.Show方法来显示消息框，例如：MessageBox.Show("Hello World!")8. VB中，如何读取和写入文件？答案：可以使用System.IO命名空间下的File类来读取和写入文件，例如：Dim content As String = File.ReadAllText("C:\example.txt")File.WriteAllText("C:\example.txt", "Hello World!")9. VB中，如何使用数据库连接？答案：可以使用System.Data命名空间下的SqlConnection和SqlCommand等类来进行数据库连接和操作，例如：Dim connectionString As String = "DataSource=myServerAddress;Initial Catalog=myDataBase;UserId=myUsername;Password=myPassword;"Using connection As New SqlConnection(connectionString)connection.Open()' 执行数据库操作End Using10. VB中，如何创建和使用数组？答案：可以使用Dim语句来创建数组，例如：Dim numbers(9) As Integer' 对数组进行赋值numbers(0) = 1...numbers(9) = 10以上是一些VB考试题及答案的示例，希望能够帮助大家更好地理解和掌握VB编程知识。

vb考试试题及答案

vb考试试题及答案VB考试试题及答案VB（Visual Basic）是一种面向对象的编程语言，广泛应用于Windows平台的应用程序开发中。

对于学习VB的人来说，参加考试是一种检验自己掌握程度的方式。

下面将为大家提供一些VB考试试题及答案，希望对大家的学习有所帮助。

一、选择题1. VB是以下哪种类型的编程语言？A. 面向过程编程语言B. 面向对象编程语言C. 函数式编程语言D. 混合编程语言答案：B. 面向对象编程语言2. VB中的变量声明关键字是？A. DimB. VarC. IntD. Public答案：A. Dim3. VB中的循环结构中，以下哪个关键字用于跳出当前循环？A. ExitB. BreakC. ContinueD. End答案：A. Exit4. VB中的条件语句中，以下哪个关键字用于多个条件的判断？A. IfB. ElseC. ElseIfD. Switch答案：C. ElseIf5. VB中的函数定义关键字是？A. SubB. FunctionC. MethodD. Procedure答案：B. Function二、填空题1. VB中的注释符是（）。

答案：'2. VB中的数组下标是从（）开始的。

答案：03. VB中的字符串连接符是（）。

答案：&4. VB中的逻辑与运算符是（）。

答案：And5. VB中的模块化编程可以通过（）来实现。

答案：函数和子程序三、简答题1. VB中的控件是什么？请举例说明。

答：VB中的控件是用于与用户进行交互的可视化组件。

例如，按钮（Button）、文本框（TextBox）、标签（Label）等都是VB中常见的控件。

通过控件，我们可以实现用户输入、数据展示、按钮点击等功能。

2. VB中的事件是什么？请举例说明。

答：VB中的事件是指在特定条件下发生的操作或响应。

例如，按钮的点击事件（Click Event）是指当用户点击按钮时触发的事件，我们可以在该事件中编写相应的代码来实现按钮的功能。

vb考试试题及答案

vb考试试题及答案一、选择题1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Option答案：A2. 在VB中，下列哪个选项不是合法的变量名？A. _myVarB. var2C. 123variableD. my$Var答案：C3. VB中，下列哪个选项是正确的条件语句？A. If condition ThenB. If condition Then ElseC. If condition Then Else IfD. If condition Then Else Else答案：A4. VB中，下列哪个函数用于计算字符串的长度？A. Len()B. Length()C. StrLen()D. Size()答案：A5. 在VB中，下列哪个选项是正确的循环结构？A. For i = 1 To 10B. Do While i < 10C. For Each i In arrD. All of the above答案：D二、填空题1. 在VB中，声明一个整型变量并赋值为100的语句是：________。

答案：Dim myVar As Integer = 1002. VB中，用于输出信息到立即窗口的函数是：________。

答案：Debug.Print3. VB中，用于暂停程序执行的函数是：________。

答案：Sleep4. VB中，用于获取当前日期的函数是：________。

答案：Date5. VB中，用于将字符串转换为整型的函数是：________。

答案：CInt三、简答题1. 简述VB中事件驱动编程的概念。

答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是由程序内部的逻辑顺序决定。

2. 描述VB中如何实现多线程编程。

答案：在VB中，可以使用Thread类或BackgroundWorker组件来实现多线程编程。

9月份vb程序设计基础月考试卷(窗体数据类型表达式)

11高辅Visual Basic程序设计9月份月考试卷班级：姓名：座号：成绩：一、选择题（共20分，每题1分）1．变量声明采用的类型说明符中，数据类型为双精度的类型说明符是( )(A) % (B) & (C) ! ·(D) #2．在VB中使用变量前，一般应该先声明变量，一条Dim语句可以定义多个变量，两个变量间应用( )分隔(A) 逗号(B) 冒号(C) 分号(D) 空隔符3．执行语句x=Int ((50* Rnd ()+11)) 后整数x的取值范围是( )(A) 10≤x≤60 (B) 11<x≤60 (C) 11≤x<61 (D) 10<x<60 4．下列各选项中，属于合法的VB的变量名的是( )(A) For (B) 3D (C) Winner (D) Name+3 5．下列各个函数中，函数值不可能为单精度型的是( )(A) Abs () (B) Sqr () (C) Int ( ) (D) Rnd ( )6．设有如下声明：Dim x As Integer如果Sgn(x)的值为-1，则表示x的值是( )(A) 整数 (B) 大于0的整数(C) 等于0的整数 (D) 小于0的数7．下列运算结果中，值最大的是( )（A）5\4 （B）5/4 （C）5 mod 3 （D）3 mod 5 8．下列运算符中运算优先级最低的是（）（A）\ （B）or （C）>= （D）mod9．如果一个变量未经定义就直接使用，则该变量的类型为（）（A) Integer （B) Byte（C) Boolean （D) Variant 10．Integer类型的变量可存的最大整数为（A）255 （B）256 （C）-32768 （D）32767 11．下列数据类型中，（）对所占的内存相同。

（A）Integer、long （B）Single、long（C）Double 、Integer （D）Single、Double12．下列逻辑运算结果为"true"的是（）（A）false or not true （B）false and not true（C）true or not true （D）true and not true13．下列表达式值为True的是（）（A）10+8 <= 20 （B）“A”>”B”（C）abs(-20)<>20 （Ｄ）Int (6.9) = 714．以下关系表达式中，其值为False的是（）(A) "XYZ" ＜"XYz" (B) "VisualBasic" = "visualbasic"(C) "the" ＜＞"there" (D) "Integer" ＞"Int"15．下列逻辑表达式中，值为True的是( )(A) "abc" > "bc" (B) Int ( Rnd () * 3 ) > 2(C) ( 1+2 <= 3 ) and ( 4+5 > 7 ) (D) 10 Mod 3 = 27．表达式5^2 Mod 25\2^2的值是（）。

(完整word版)VB程序设计试题题库及答案

VB程序设计笔试题题库一、选择题1 以下常量中，是 Integer种类常量的是（C ）。

A、123&B、-38844C、123%D、327682 下边选项中 () 是字符连结运算符 . （ A ）A、&B、AndC、%D、Mod3下边关于 VB 的集成开发环境（ IDE ）的叙述中，不正确的是（B ）。

A、IDE是设计、调试、运转 VB程序的工具。

B、用户不可以任意封闭 IDE中的窗口。

C、" 窗体设计 " 窗口是用来设计应用程序界面（窗体）的。

D、翻开 / 封闭各窗口的命令主要在 IDE的" 视图 " 菜单中。

4 len( “程vb序设计”)=( C ) 。

A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$( “123456”,3,2)履行后， A= （ A ）。

A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时 , 用来分开每条语句的符号是 ( C ).A、,B、;C、:D、、8 将逻辑型数据变换成整型数据时，变换规则是（ D ）。

A、将 True 变换为 1 ，将 False 变换为 0B、将 True 变换为 1 ，将 False 变换为 -1C、将 True 变换为 0 ，将 False 变换为 -1D、将 True 变换为 -1 ，将 False 变换为 09 表达式 2+3*4^5-SIN(X+1)/2 中最初进行的运算是 ( D ).A、SINB、4^5C、3*4D、x+110 假如 x=2 ，则表达式And 3>x+3 的值（ B ）。

A、不可以计算B、 TrueC、5D、False11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。

A、Round( Rnd*50)B、 Int(Rnd*40+10)C、Round( Rnd*51)D、 10+Int(Rnd*41)12 每成立一个窗体 , 工程管理器窗口中就会增添一个 ( C ).A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT(100*RND(1)) 产生的随机整数的闭区间是 ( B ).A、[1,100]B、[0,99]C、[0,100]D、[1,99]14以下数据种类中 , 占用内存最小的是 ( D ). A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种( B ) 程序设计语言 .A、过程式B、非过程式C、机器D、初级16函数 Int(10*Rnd) 是在 ( A ) 范围内的整数 . A、[0,9]B、[0,1]C、[1,9]D、[1,10]17 以下合法的一组 Visual Basic 用户表记符是（ C ）A、Sum 和 8abcB、a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数 Len(Str(Val("123.4"))) 的值为 ( B ).A、5B、6C、8D、1119 Int(198.555*100+0.5)/100 的值为（ B ）A、B、C、200D、19820以下各表达式中 , 计算结果为 0的是 ( A ). A、FIX(12.4)+FIX(-12.6)B、CINT(12.4)+CINT(-12.6)C、INT(12.4)+INT(-12.6)D、FIX(13.6)+FIX(-12.6)21 MsgBox() 的正确语法是（D）。

vb考试试题及答案

vb考试试题及答案# VB考试试题及答案一、选择题1. 在Visual Basic中，以下哪项不是基本数据类型？ - A. Integer- B. String- C. Object- D. Array答案：D2. 以下哪个语句用于在VB中声明一个变量？- A. Dim- B. Declare- C. Let- D. Set答案：A3. 在VB中，以下哪个函数用于将数字转换为字符串？ - A. Val- B. Str- C. CStr- D. Format答案：C4. 以下哪个控件不是Visual Basic的标准控件？- A. TextBox- B. Button- C. Chart- D. Label答案：C5. 在VB中，以下哪个事件不是由用户交互触发的？- A. Click- B. Load- C. Change- D. KeyPress答案：B二、填空题1. 在Visual Basic中，使用______关键字可以定义一个类。

- 答案：Class2. VB中，______属性用于获取或设置文本框中显示的文本。

- 答案：Text3. VB的______方法用于将数字转换为字符串。

- 答案：CStr4. 在VB中，______事件用于处理表单或控件的关闭。

- 答案：FormClosing 或 QueryClose5. VB的______方法用于结束程序的执行。

- 答案：End三、简答题1. 描述Visual Basic中的过程和函数的区别。

- 答案：过程是一个可以执行一系列操作的代码块，它可以有返回值也可以没有。

函数是一个特殊类型的过程，它必须返回一个值。

函数通常用于计算并返回值，而过程则用于执行操作。

2. 解释Visual Basic中的事件驱动编程。

- 答案：事件驱动编程是一种编程范式，其中程序的执行流程由外部事件（如用户输入、系统消息等）触发。

在Visual Basic中，事件通常与控件相关联，如按钮点击、文本框内容改变等，当这些事件发生时，相应的事件处理程序会被调用。

VB程序设计考试卷试题库题集考试专用

程序设计题1、目： ( 事件 ) 窗体 ( 响 ) 用入框入一自然数，判断是 " 正数 " 、" 数或 " 零 " ，并依据入的数用信息框示 "正数"、" 数”或 "零"。

2、目： ( 事件 ) 窗体。

( 响 ) 求 200~300 之既能被 3 整除又能被 7 整除的数。

并求出全部数之和存入量SUM中3、目：窗体。

( 响 ) 已知 S=1+1/4+1/9+1/16+1/25+⋯+1/100 ，果出在窗体上。

4、目： ( 事件 ) 窗体。

( 响 ) 在窗体上打印数列 2/1,3/2,5/3,8/5,13/8⋯的前 10 ，并求其和，将和保留在量 s 中。

5、目： ( 事件 ) 双窗体。

( 响 ) 把一元票成一分、二分和五分的硬每种起码有一枚），求出其全部的法，把果出在窗体上。

将全部的法的数量存入量N 中6、目：窗体。

) 求 1!+2!+3!+4!+5! 并将果出到窗体上。

果存入量S 中7、目： ( 事件 ) 窗体。

( 响 ) 生成一个一数 (10个数元素依此：'15 、 23、 72、 43、 96、 23、 3、65、88、17写程序求出个数中的最大、最小和均匀，并出在窗体上。

将最大，最小，均匀分存入量Max,Min,Aver 中8、目： ( 事件 ) 窗体。

( 响 ) 在窗体上出 100~200 之的全部合数。

求出全部数之和存入SUM中所合数是指自然数中能被 1和本数整除之外 , 能被其余数整除的数。

9、目： ( 事件 ) 窗体。

( 响 ) 求 10~20 之全部素数的乘并出在窗体上。

将果存入量L 中。

10、目： ( 事件 ) 窗体。

( 响 ) 求 1 - 1/2 + 1/3 - 1/4 +⋯⋯ + 1/99 - 1/100 的。

将果存入量J 中。

1入一个自然数 ")n = InputBox("If n > 0 Then正数 "result = "ElseIf n < 0 Then数 "result = "ElseIf n = 0 Then零"result = "End IfMsgBox " 入的数据 " & n & "：" & result2Dim i As IntegerFor i = 201 To 300If ((i Mod 3) = 0) And ((i Mod 7) = 0) ThenPrint (CStr(i))sum = sum + iEnd IfNextPrint sum3Dim i As Integers = 0For i = 1 To 10s = s + 1 / (i ^ i)NextPrint (s)4Dim i, j, k, m As Integers = 0 :i = 2:j = 1For k = 1 To 10s = s + i / jm = jPrint (CStr(i)) & "/" & CStr(j)j = ii = i + mNext5Dim i, j, k As IntegerFor i = 1 To 100For j = 1 To 50For k = 1 To 20If ((i + 2 * j + k * 5) = 100) ThenPrint (CStr(i))Print (CStr(j))Print (CStr(k))n = n + 1End IfNextNextNext6题Dim i, j, k As IntegerFor i = 1 To 5k = 1For j = 1 To ik = k * jNexts = s + kNextPrint (CStr(s))7题Dim a(9) As IntegerDim i, s As Integera(0) = 15：a(1) = 23： a(2) = 72 a(3) = 43：a(4) = 96： a(5) = 23 a(6) = 3： a(7) = 65：a(8) = 88a(9) = 17：max = a(0)：min = a(0) s = 0For i = 0 To 9If a(i) > max Thenmax = a(i)End IfIf a(i) < min Thenmin = a(i)End Ifs = s + a(i)Nextaver = Int(s / 10)Print (CStr(max))Print (CStr(min))Print (CStr(aver))8题Dim i, j, s As IntegerFor i = 100 To 200For j = 2 To Sqr(i)If (i Mod j) = 0 ThenPrint (CStr(i))sum = sum + iExit ForEnd IfNextNextPrint sum9题Dim i% ，j%，b As Booleanl = 1：b = FalseFor i = 10 To 20For j = 2 To i - 2If i Mod j = 0 Thenb = TrueEnd IfNextIf b = False Thenl = l * iEnd Ifb = FalseNextPrint Str(l)10题Dim i As IntegerFor i = 1 To 100If i Mod 2 = 1 Thenj = j + 1 / iElseIf i Mod 2 = 0 Thenj = j - 1 / iEnd IfNextPrint j11、题目： ( 事件 ) 单击窗体。

vb程序设计试题及答案

vb程序设计试题及答案为了帮助大家更好地理解和掌握VB程序设计，下面将为大家提供一套VB程序设计试题及答案。

通过完成这些试题，相信能够对VB程序设计有更深入的了解和应用。

请注意，以下试题中给出的是简要描写，实际编写程序时请适当完善。

试题一：计算两个数字的和与差要求：编写一个VB程序，输入两个数字，然后输出它们的和与差。

答案：```vbPrivate Sub btnCalc_Click()Dim num1, num2, sum, diff As Integernum1 = Val(txtNum1.Text)num2 = Val(txtNum2.Text)sum = num1 + num2diff = num1 - num2lblSum.Caption = "和：" & sumlblDiff.Caption = "差：" & diffEnd Sub```试题二：学生成绩统计要求：编写一个VB程序，输入3位学生的成绩，然后计算并输出平均成绩和最高成绩。

答案：```vbPrivate Sub btnCalc_Click()Dim score1, score2, score3, average, max As Integerscore1 = Val(txtScore1.Text)score2 = Val(txtScore2.Text)score3 = Val(txtScore3.Text)average = (score1 + score2 + score3) / 3max = WorksheetFunction.Max(score1, score2, score3)lblAverage.Caption = "平均成绩：" & averagelblMax.Caption = "最高成绩：" & maxEnd Sub```试题三：简单计算器要求：编写一个VB程序，实现一个简单的计算器功能，包括加减乘除四则运算。

《VB程序设计》练习题

《VB 程序设计》练习题一、选择题（本题30小题，每题1分，共30分）1．下列不属于VB 集成开发环境的是。

A ．主窗口B ．状态栏C ．工具箱D ．工具栏2．数学表达式y x xe ++53arctan ln π对应的Visual Basic 算术表达式是。

A ．Log(Abs((Exp(3.14) + Atn(x) ^ 3) / (x^(1/5) + y)))B ．ln(Abs((Exp(3.14) + Arctan(x) ^ 3) / (x ^1/5+ y)))C ．Log(Abs((Exp(π) + Atn(x) ^ 3) / x ^(1/5)+ y))D ．Log|Exp(3.14) + Atn(x) ^ 3)/ x ^1/5+ y|3．执行语句 Print Right(" ABCDEFG",3)，在窗体上输出的结果是。

A ．ABCB ．EFGC ．GFED ．CDE4．某一单选钮的标题是“&”，则该单选钮的Caption 属性值为。

A ．^&B ．%&C ．&&D ．_&5．用于除去字符串左侧空格的函数是。

A ．LeftTrimB ．LTrimC ．TRimD ．LRTrim6．下列表达式中，值为True 的是。

A ．True And FalseB ．18 \ 4 * 4 ^ 2 / 1.6C ．True Or FalseD ．-3 < -2 < -17．执行语句 Print Sgn(2.4) ，在窗体上输出的结果是。

A ．2.4B ．2C ．0D ．18．下列控件中，没有Text 属性的是。

A ．文本框B ．列表框C ．标签D ．组合框9．以下叙述中错误的是。

A ．双击鼠标可以触发dblClick 事件B ．窗体或控件的事件过程名称可以由编程人员任意确定C ．窗体Name 属性的属性值最长可达40个字符D ．控件的名称可以由编程人员设定10．在VB 中，下列关于控件的属性或方法中，搭配错误的有个。

vb程序设计试题(含答案)

第一套试题一、选择题〔每题 2 分，共 30 分〕1.在 VB环境中，工程文件的扩展名是 ( C )〔 A〕 .frm〔B〕.bas〔C〕.vbp〔D〕.frx2.下面 4 项中不属于面向对象系统三要素的是 ( A )〔 A〕变量〔B〕事件〔C〕属性〔D〕方法、/ 、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〕157 下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数，不正确的语句是 ( D )〔 A〕 If sex= “男〞 And age＜40 And InStr(duty,“教授〞)＞0 Then n=n+1B〕 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= “副教授〞 Thenn=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=0引用列表框 (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 〔 C〕 Dim a(n,n) As Integer 〔B〕Dim a(3,4)As Integer 〔D〕Dim a(3,4)As Integer14.下面子过程语句说明合法的是 (A 、D )〔 A〕 Sub f1(ByVal n%) 〔 C〕 Function f1%(f1%) 〔B〕Sub f1(n%)As Integer 〔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考试题及答案**VB考试题及答案**一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项是合法的变量名？A. 2variableB. Variable2C. variable$2D. Variable-2**答案：B**2. VB中，用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Type**答案：A**3. 以下哪个是VB中的保留字，不能用作变量名？A. NameB. IntegerC. PrintD. String**答案：B**4. 在VB中，以下哪个函数用于计算字符串的长度？A. LenB. LengthC. SizeD. Count**答案：A**5. 如果变量x的值为10，那么表达式x Mod 3的值是多少？A. 1B. 2C. 3D. 0**答案：A**6. VB中，用于循环结构的关键字是：A. ForB. WhileC. DoD. All of the above**答案：D**7. 在VB中，以下哪个控件用于显示文本，但不提供文本编辑功能？A. TextBoxC. ComboBoxD. CheckBox**答案：B**8. VB中，以下哪个事件用于响应按钮点击？A. ClickB. PressC. ActivateD. Change**答案：A**9. 在VB中，以下哪个函数用于将字符串转换为数值？A. StrB. ValC. CInt**答案：B**10. VB中，以下哪个控件用于选择一个范围的值？A. ListBoxB. ComboBoxC. OptionButtonD. Slider**答案：D**二、填空题（每题3分，共30分）1. 在VB中，声明一个整型变量i，并赋值为5，代码应为：________。

**答案：Dim i As Integer: i = 5**2. VB中，使用________函数可以获取当前日期。

3. VB中，使用________函数可以获取当前时间。

VB程序设计试题

VB程序设计试题一、题目描述编写一个VB程序，实现一个简单的计算器功能。

该计算器能够实现基本的加、减、乘、除四则运算。

二、需求分析为了实现上述功能，我们需要创建一个Windows窗体应用程序，并在窗体上添加按钮和文本框等控件用于用户输入和结果显示。

三、程序设计1. 创建一个新的Windows窗体应用程序项目。

2. 在窗体上添加一个文本框用于接收用户输入的表达式，并设置其位置和大小。

3. 添加四个按钮分别表示加、减、乘、除四种运算操作，并设置它们的位置和事件处理程序。

4. 在窗体上添加一个标签或者另一个文本框用于显示计算结果。

5. 在按钮的事件处理程序中编写相应的计算逻辑。

6. 对用户输入的表达式进行解析和计算，将结果显示在结果标签或文本框中。

四、代码实现以下是程序的主要代码实现：```vbPublic Class Form1Private Sub AddButton_Click(sender As Object, e As EventArgs) Handles AddButton.ClickDim num1 As Double = Double.Parse(Num1TextBox.Text)Dim num2 As Double = Double.Parse(Num2TextBox.Text)Dim result As Double = num1 + num2ResultLabel.Text = result.ToString()End SubPrivate Sub SubtractButton_Click(sender As Object, e As EventArgs) Handles SubtractButton.ClickDim num1 As Double = Double.Parse(Num1TextBox.Text)Dim num2 As Double = Double.Parse(Num2TextBox.Text)Dim result As Double = num1 - num2ResultLabel.Text = result.ToString()End SubPrivate Sub MultiplyButton_Click(sender As Object, e As EventArgs) Handles MultiplyButton.ClickDim num1 As Double = Double.Parse(Num1TextBox.Text)Dim num2 As Double = Double.Parse(Num2TextBox.Text)Dim result As Double = num1 * num2ResultLabel.Text = result.ToString()End SubPrivate Sub DivideButton_Click(sender As Object, e As EventArgs) Handles DivideButton.ClickDim num1 As Double = Double.Parse(Num1TextBox.Text)Dim num2 As Double = Double.Parse(Num2TextBox.Text)Dim result As Double = num1 / num2ResultLabel.Text = result.ToString()End SubEnd Class```五、运行与测试1. 编译并运行该程序。