(完整word版)vb期末模拟题(答案)
vb期末考试和答案
vb期末考试和答案一、选择题(每题2分,共20分)1. 在VB中,以下哪个是正确的变量声明方式?A. Dim a$B. Dim a IntegerC. Dim a As StringD. Dim a 123答案:C2. VB中,以下哪个是正确的条件语句?A. If x > 0 Then Print "Positive"B. If x > 0 ThenPrint "Positive"End IfC. If x > 0 ThenPrint "Positive"End IfD. If x > 0 ThenPrint "Positive"ElsePrint "Negative"End If答案:D3. 在VB中,以下哪个是正确的循环结构?A. For i = 1 To 10Print iNext iB. For i = 1 To 10Print iEnd ForC. For i = 1 To 10Print iLoopD. For i = 1 To 10Print iEnd Loop答案:A4. VB中,以下哪个是正确的数组声明方式?A. Dim arr(10)B. Dim arr(10) As IntegerC. Dim arr As Integer(10)D. Dim arr(10) Integer答案:B5. 在VB中,以下哪个是正确的函数声明方式?A. Function Add(x As Integer, y As Integer) As IntegerB. Function Add(x, y) As IntegerC. Function Add(x As Integer, y As Integer)D. Function Add(x, y)答案:A6. VB中,以下哪个是正确的事件处理程序?A. Private Sub Form_Click()B. Private Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Me.ClickC. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Me.ClickD. Private Sub Form_Click(ByVal sender As Object, ByVal e As MouseEventArgs)答案:B7. 在VB中,以下哪个是正确的窗体属性?A. Me.Width = 800B. Me.Height = 600C. Me.Caption = "My Form"D. All of the above答案:D8. VB中,以下哪个是正确的控件属性?A. Label1.Text = "Hello"B. Label1.Caption = "Hello"C. Label1.Value = "Hello"D. = "Hello"答案:A9. 在VB中,以下哪个是正确的文件操作语句?A. Open "C:\test.txt" For Input As #1B. Open "C:\test.txt" For Output As #1C. Open "C:\test.txt" For Append As #1D. All of the above答案:D10. VB中,以下哪个是正确的错误处理语句?A. On Error Resume NextB. On Error GoTo 0C. On Error GoTo -1D. All of the above答案:A二、填空题(每题2分,共20分)1. 在VB中,声明一个整型变量的关键字是______。
vb期末试题及答案
vb期末试题及答案一、选择题(每题2分,共20分)1. 在VB中,以下哪个不是基本数据类型?A. IntegerB. StringC. ObjectD. Array答案:D2. 以下哪个选项是正确的VB变量声明方式?A. Dim varNameB. varName As IntegerC. Integer varNameD. Both A and B答案:D3. VB中的For循环结构不包括以下哪个部分?A. 初始化表达式B. 循环条件C. 迭代表达式D. 循环体答案:D4. 在VB中,以下哪个是正确的数组声明方式?A. Dim arr(0 To 10) As IntegerB. Dim arr As Integer(0 To 10)C. Dim arr(10)D. Both A and C答案:A5. VB中,以下哪个是正确的函数定义?A. Function myFunction() As IntegerB. Sub myFunction() As IntegerC. Function myFunction() IntegerD. Both A and C答案:A6. 以下哪个是VB中的事件处理程序的正确声明方式?A. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickB. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)C. Private Sub Button1_Click()D. Both A and C答案:A7. 在VB中,以下哪个不是控件的属性?A. TextB. FontC. ClickD. Size答案:C8. VB中,以下哪个是正确的类定义?A. Class MyClassB. Type MyClassC. Structure MyClassD. Both A and B答案:A9. VB中,以下哪个是正确的方法调用?A. myMethod(10)B. myMethod = 10C. myMethod += 10D. Both A and C答案:A10. 在VB中,以下哪个是正确的条件语句?A. If x > 0 ThenB. If x > 0C. If (x > 0)D. All of the above答案:D二、填空题(每空2分,共20分)1. 在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分,共20分)1. 在VB中,以下哪个关键字用于声明变量?A. DimB. ConstC. SubD. Function答案:A2. VB中,哪个函数用于计算字符串的长度?A. LenB. UBoundC. LBoundD. Mid答案:A3. 在VB中,以下哪个选项是正确的数据类型?A. IntegerB. StringC. BooleanD. All of the above答案:D4. VB中,哪个关键字用于定义一个过程?A. FunctionB. SubC. ClassD. Module答案:B5. VB中,哪个函数用于将字符串转换为小写?A. LCaseB. UCaseC. StrConvD. Trim答案:A6. 在VB中,以下哪个选项是正确的循环结构?A. For EachB. Do WhileC. For NextD. All of the above答案:D7. VB中,哪个关键字用于创建一个数组?A. DimB. ReDimC. EraseD. Option Base答案:A8. VB中,哪个函数用于获取当前日期?A. NowB. DateC. TimeD. Timer答案:B9. 在VB中,以下哪个选项是正确的文件访问模式?A. Open For InputB. Open For OutputC. Open For RandomD. All of the above答案:D10. VB中,哪个关键字用于退出一个循环?A. ExitB. BreakC. ContinueD. Return答案:A二、填空题(每题3分,共30分)1. VB中,声明一个整型变量并赋值为100的语句是________。
答案:Dim myVar As Integer = 1002. 要将一个变量的值增加10,可以使用________运算符。
答案:+=3. 在VB中,________函数用于输出信息到即时窗口。
vb期末试题及答案
vb期末试题及答案一、选择题(每题2分,共20分)1. VB中,用于声明变量的关键字是:A. DimB. SetC. CallD. Sub答案:A2. 下列哪个选项不是VB中的控件?A. TextBoxB. LabelC. ButtonD. Excel答案:D3. VB中,用于执行循环操作的关键字是:A. ForB. IfC. ElseD. While答案:A4. VB中,用于打开文件的函数是:A. OpenB. CloseC. PrintD. Write答案:A5. VB中,用于定义过程的关键字是:A. FunctionB. SubC. DimD. Const答案:B6. VB中,用于定义函数的关键字是:A. FunctionB. SubC. DimD. Const答案:A7. VB中,用于定义常量的关键字是:A. DimB. ConstC. FunctionD. Sub答案:B8. VB中,用于定义数组的关键字是:A. DimB. FunctionC. ConstD. Sub答案:A9. VB中,用于判断条件的关键字是:A. IfB. ForC. WhileD. Dim答案:A10. VB中,用于退出循环的关键字是:A. ExitB. EndC. StopD. Loop答案:A二、填空题(每题2分,共20分)1. VB中,声明一个整型变量a,可以使用关键字________。
答案:Dim2. VB中,声明一个字符串变量str,可以使用关键字________。
答案:Dim3. VB中,声明一个布尔型变量flag,可以使用关键字________。
答案:Dim4. VB中,声明一个数组变量arr,可以使用关键字________。
答案:Dim5. VB中,声明一个常量PI,可以使用关键字________。
答案:Const6. VB中,声明一个函数sum,可以使用关键字________。
答案:Function7. VB中,声明一个过程printData,可以使用关键字________。
vb期末考试试题及详细答案
vb期末考试试题及详细答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个不是合法的变量名?A. MyVariable123B. 123MyVariableC. VariableNameD. Variable_Name2. 下列哪个语句可以正确地将字符串"Hello"赋值给变量str?A. str = "Hello"B. Dim str As String = "Hello"C. str = 'HelloD. str = "Hello"3. 在Visual Basic中,以下哪个是正确的条件语句?A. If x > 10 ThenB. If x > 10C. If x > 10 ElseD. If x > 10 End If4. 下列哪个是Visual Basic中的数组声明?A. Dim myArray(1 To 10) As IntegerB. Dim myArray(10) As IntegerC. Dim myArray As Integer(1 To 10)D. Dim myArray As Integer = New Integer(10)5. 在Visual Basic中,以下哪个是正确的循环结构?A. For i = 1 To 10B. For i = 10 To 1 Step -1C. For i = 10 To 1D. All of the above6. 在Visual Basic中,以下哪个是正确的函数调用?A. Call PrintName("John")B. PrintName("John")C. Function PrintName("John")D. PrintName Call "John"7. 在Visual Basic中,以下哪个是正确的事件处理程序的声明?A. Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)B. Sub Button1_Click()C. Function Button1_Click()D. Sub Button1_Click(sender, e)8. 在Visual Basic中,以下哪个是正确的类定义?A. Class MyClassPrivate x As IntegerEnd ClassB. Class MyClassDim x As IntegerEnd ClassC. Class MyClassPublic x As IntegerEnd ClassD. All of the above9. 在Visual Basic中,以下哪个是正确的继承声明?A. Inherits MyBaseClassB. Inherits MyBaseClass()C. Inherits MyBaseClass MyBase()D. Inherits MyBaseClass MyBase10. 在Visual Basic中,以下哪个是正确的异常处理结构?A. TryCatch ex As ExceptionEnd TryB. TryCatch ex As ExceptionFinallyEnd TryC. TryCatch ex As ExceptionD. All of the above二、简答题(每题5分,共10分)1. 解释Visual Basic中的事件和委托的区别。
VB期末试题(含答案)
VB期末试题(含答案)一、单选题(每题1.5分,共30分)1.在VB中,假定有以下程序段, 则执行结束后k的值是:( A )For i =1 To 3k = i+2Next iA. 5 B.4 C. 3 D.62. 以下控件中可以作为容器控件的是( B )A.Image图像框控件 B.PictureBox图片框控件C.TextBox文本框控件 D.ListBox列表框控件3.关于Image控件和PictureBox控件的说明,其中错误的是( B )A.Image控件和PictureBox控件都有Picture属性B.Image控件和PictureBox控件都支持Print方法C.Image控件和PietureBox控件都可以用LoadPicture函数把图形文件装入控件中D.Image控件和PictureBox控件都能在属性窗口装入图形文件,也都能在运行期间装入图形文件4.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为( D )A.5 B.500 C.10 D.5000 5.能显示窗体的方法是( B )。
A.Visible B.Show C.New D.Open6.MsgBox函数中有4个参数,其中必须写明的参数是( C )A.指定显示按钮的个数 B.对话框的标题 C. 提示信息 D. 所有参数都是可选的7.你若在代码窗口中编写:msgbox(“AAAA”,vbokonly,”BBBB”)语句后,所产生的信息框的标题是( C )A.AAAA B.空 C.BBBB D.出错,不能产生信息8.要使文本框获得输入焦点,则应采用文本框控件的(D )方法。
A.GotFocus B.LostFocus C.KeyPress D.SetFocus9.为了把焦点移到某个指定的控件,所使用的方法是( A )A.SetFoeus B.Visible C.Refresh D.GetFocus10.语句if 3*4>=10 thena=1elsea=2end if执行后,a的值为( D )。
vb期末考试编程试题及答案
vb期末考试编程试题及答案VB期末考试编程试题一、选择题(每题2分,共20分)1. 在VB中,以下哪个是正确的变量声明方式?A. Dim xB. Dim x As IntegerC. Dim x = 10D. 以上都是答案:B2. VB中,用于循环遍历数组的关键字是:A. ForB. WhileC. DoD. Repeat答案:A3. 下列哪个是VB中的条件语句?A. If...Then...ElseB. Switch...CaseC. Both A and BD. None of the above答案:C4. 在VB中,以下哪个不是内置数据类型?A. IntegerB. StringC. ObjectD. Array答案:D5. VB中,以下哪个是正确的函数调用方式?A. Call MyFunction()B. MyFunction()C. Both A and BD. None of the above答案:C二、简答题(每题10分,共30分)1. 解释VB中的类和对象的区别。
答案:类是对象的蓝图,它定义了对象的结构和行为。
对象是类的实例,是类的具体实现。
一个类可以创建多个对象,每个对象具有自己的状态和行为。
2. 描述如何使用VB中的事件。
答案:在VB中,事件是一种由对象引发的通知,用于通知其他对象发生了某些事情。
事件通常与事件处理器(也称为事件处理程序)一起使用。
事件处理器是响应事件的代码块。
要使用事件,首先需要定义一个事件,然后在对象上引发该事件,并编写事件处理器来处理该事件。
3. 解释VB中的继承和多态性。
答案:继承允许一个类(子类)继承另一个类(父类)的属性和方法。
这使得代码重用成为可能。
多态性是指允许不同类的对象对同一消息做出响应,但具体的行为会根据对象的实际类型而有所不同。
在VB中,多态性可以通过重载(方法名相同,参数不同)和重写(子类重写父类的方法)来实现。
三、编程题(每题25分,共50分)1. 编写一个VB程序,该程序可以接收用户输入的三个整数,并计算它们的平均值,然后输出结果。
vb期末测试题及答案
vb期末测试题及答案一、单选题(每题2分,共20分)1. VB中,以下哪个是合法的变量名?A. 2variableB. Variable2C. Variable-2D. Variable 2答案:B2. 在VB中,以下哪个是正确的字符串连接运算符?A. +B. &&C. &D. ||答案:C3. VB中,以下哪个函数用于计算字符串的长度?A. LenB. LengthC. SizeD. Count答案:A4. 在VB中,以下哪个循环结构用于重复执行代码块,直到满足某个条件?A. For...NextB. Do...LoopC. While...WendD. If...Then答案:B5. VB中,以下哪个关键字用于声明常量?A. DimB. ConstC. StaticD. Public答案:B6. 在VB中,以下哪个是正确的数据类型用于存储日期?A. DateB. DateTimeC. StringD. Integer答案:B7. VB中,以下哪个是正确的子程序声明?A. Sub MySub()B. Function MySub()C. Procedure MySub()D. Method MySub()答案:A8. 在VB中,以下哪个是正确的数组声明?A. Dim arr(10)B. Dim arr() As IntegerC. Dim arr(10) As IntegerD. Dim arr As Integer(10)答案:C9. VB中,以下哪个是正确的条件语句?A. If...Then...ElseB. When...Then...ElseC. If...Then...End IfD. If...Then...Else...End答案:C10. 在VB中,以下哪个是正确的事件处理程序声明?A. Private Sub Form_Load()B. Public Sub Form_Load()C. Private Function Form_Load()D. Public Function Form_Load()答案:A二、填空题(每题2分,共20分)1. VB中,用于声明变量的关键字是________。
vb期末考试试题和答案
vb期末考试试题和答案**VB期末考试试题和答案**一、单选题(每题2分,共20分)1. 在Visual Basic中,以下哪个不是基本数据类型?A. IntegerB. DoubleC. StringD. Object答案:D2. 下列哪个选项是Visual Basic的事件驱动编程模型?A. 用户操作B. 程序流程C. 函数调用D. 循环执行答案:A3. 在Visual Basic中,以下哪个关键字用于声明变量?A. DimB. SubC. FunctionD. Const答案:A4. 如果要声明一个变量用于存储字符串,应该使用以下哪个数据类型?A. IntegerB. StringC. DoubleD. Boolean答案:B5. 在Visual Basic中,哪个函数用于将字符串转换为小写?A. UCaseB. LCaseC. StrCompD. Trim答案:B6. Visual Basic中,以下哪个控件用于显示文本,但不允许用户编辑?A. TextBoxB. LabelC. ComboBoxD. CheckBox答案:B7. 在Visual Basic中,以下哪个语句用于结束程序的执行?A. EndB. ExitC. StopD. Return答案:A8. Visual Basic中,以下哪个控件用于创建下拉选择列表?A. ListBoxB. ComboBoxC. CheckBoxD. RadioButton答案:B9. 在Visual Basic中,以下哪个关键字用于声明一个过程?A. SubB. FunctionC. PropertyD. Event答案:A10. Visual Basic中,以下哪个函数用于获取当前系统日期?A. NowB. DateC. TimeD. Timer答案:B二、填空题(每题2分,共20分)1. 在Visual Basic中,使用________关键字可以声明一个数组。
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考试期末试题及答案[正文]第一部分:选择题1. VB的全称是什么?A. Visual BasisB. Visual BasicC. Viewer BasicD. Virtual Basic答案:B2. VB是哪个公司开发的?A. MicrosoftB. AppleC. GoogleD. IBM答案:A3. VB是一种什么类型的语言?A. 编译型语言B. 解释型语言C. 面向对象语言D. 脚本语言答案:A4. 下面哪个不是VB的数据类型?A. IntegerB. StringC. BooleanD. Float答案:D5. VB中,用于显示消息框的函数是什么?A. MsgBoxB. AlertC. PrintD. Display答案:A6. VB中,用于定义变量的关键字是什么?A. VarB. DimD. Define答案:B7. VB中,用于循环执行一段代码的结构是什么?A. For LoopB. While LoopC. Do While LoopD. If-Else答案:C8. VB中的事件是指什么?A. 用户的操作或系统的消息B. 变量的赋值C. 函数的调用D. 数据的排序答案:A9. VB中,用于创建函数的关键字是什么?A. FunctionB. SubD. Define答案:A10. VB中,用于调试代码的工具是什么?A. DebuggerB. CompilerC. InterpreterD. Editor答案:A第二部分:编程题(请在空白处编写代码)1. 编写一个VB程序,实现输入两个数字并将它们相加的功能。
Dim num1 As IntegerDim num2 As IntegerDim sum As Integernum1 = InputBox("请输入第一个数字:")num2 = InputBox("请输入第二个数字:")sum = num1 + num2MsgBox "两个数字的和是:" & sum2. 编写一个VB程序,实现计算一个数组中所有元素之和的功能。
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期末测试题及答案一、选择题1. 下列哪个是VB的关键字?A. FunctionB. PrintC. OutputD. Process答案:A. Function2. VB中用于循环执行一段代码的语句是?A. If...ThenB. While...LoopC. For...NextD. Select...Case答案:C. For...Next3. VB中用于声明一个变量的关键字是?A. SetB. DimC. LetD. New答案:B. Dim4. 下列哪个不是VB中的数据类型?A. IntegerB. StringC. FloatD. DoubleFloat答案:D. DoubleFloat5. VB中的数组索引是从几开始的?A. 0B. 1C. -1D. 2答案:A. 0二、判断题1. VB是一种面向过程的编程语言。
答案:错误2. VB可以用于开发桌面应用程序。
答案:正确3. VB中的If语句只能进行简单的条件判断。
答案:错误4. VB中的控件可以通过拖拽方式添加到窗体上。
答案:正确5. VB中的事件处理程序可以在代码编辑器中直接编写。
答案:正确三、简答题1. 请简要介绍VB的历史及应用领域。
答案:VB(Visual Basic)是一种基于BASIC语言的高级编程语言,由微软公司开发。
VB于1991年发布,随后成为流行的Windows平台应用程序开发工具之一。
VB的应用领域主要包括开发桌面应用程序、数据库应用程序以及快速原型开发等。
2. 请简述VB中的函数和子过程的区别。
答案:VB中的函数和子过程都是一段用于完成特定任务的代码,但二者在使用和返回值方面有所不同。
函数可以接受参数并返回一个值,可以在程序中的任何地方调用并使用其返回值。
而子过程可以接受参数但不返回值,只会执行一系列的操作。
3. 请解释VB中的控件和容器的概念,并举例说明。
答案:在VB中,控件是指用于与用户进行交互的界面元素,如按钮、文本框、标签等。
VB期末标准试题4套及标准答案(格式绝对符合标准)
VB试卷(4)一、单项选择题(每题1分,总共20分)1、用一个对象来表示:“一只白色的足球被踢进球门”,那么,白色、足球、踢、进球门分别是()。
(A)属性、对象、方法、事件(B)属性、对象、事件、方法(C)对象、属性、方法、事件(D)对象、属性、事件、方法2、要设置标签控件字体的大小,应设置其()属性。
(A)Height(B)Width (C)Caption (D)Font3、使文本框获得“焦点”的方法是()。
(A)LinkSend(B)Move (C)SetFocus (D)Refresh4、当设置文本框的ScrollBars=Both 而文本框确没有显示出滚动条,原因是()。
(A)文本框中没有内容(B)文本框的MultiLine=False(C)文本框的Locked=True (D)文本框的MultiLine=True5、表达式16/4-2^5*8/4 Mod 5\2 = ( )。
(A)14(B)4 (C)20 (D)26、随机产生[10,50] 之间整数的正确表达式是()。
(A)Round( Rnd*51) (B)Int(Rnd*40+10)(C)Round( Rnd*50) (D)10+Int(Rnd*41)7、赋值语句A=123 + Mid$( “123456”,3,2) 执行后,A=()。
(A)”12334”(B)123 (C)12334 (D)1578、Val (“123ab”)=()。
(A)0(B)123 (C)1230 ( D ) 不能转换9、在VB中,要想在一行写多条语句,那么语句之间要用()号分隔。
(A),(B):(C)、(D);10、下面哪个程序不能正确显示1!,2!,3!,4!的值_______________。
(A)for i=1 to 4 (B)for i=1 to 4n=1 for j=1 to ifor j=1 to I n=1n=n*j n=n*jnext j next jprint n print nnext i next i(C)n=1 (D)n=1 : j=1for j=1 to 4 do while j<5n=n*j n=n*jprint n print n : j=j+1next j loop11、数组的下标取值类型为()。
vb期末考试试题及答案百度文库
vb期末考试试题及答案百度文库一、单项选择题(每题2分,共20分)1. VB中,哪个关键字用于声明变量?A. DimB. SetC. CallD. Function答案:A2. 下列哪个选项不是VB的数据类型?A. IntegerB. StringC. BooleanD. Array答案:D3. VB中,哪个函数用于计算字符串的长度?A. LenB. UBoundC. LBoundD. Sqr答案:A4. 在VB中,如何表示“不等于”?A. =B. ==C. <>D. !=答案:C5. VB中,哪个关键字用于循环结构?A. ForB. NextC. ToD. Loop答案:A6. VB中,哪个函数用于将字符串转换为大写?A. StrConvB. LCaseC. UCaseD. Trim答案:C7. VB中,哪个语句用于退出子程序?A. Exit SubB. End SubC. ReturnD. Exit Function答案:A8. VB中,哪个关键字用于声明函数?A. FunctionB. SubC. DimD. Const答案:A9. VB中,哪个关键字用于声明常量?A. DimB. ConstC. PrivateD. Public答案:B10. VB中,哪个函数用于获取当前日期?A. NowB. DateC. TimeD. Today答案:D二、填空题(每题3分,共15分)1. 在VB中,使用________关键字可以定义一个类。
答案:Class2. VB中,________函数用于获取当前时间。
答案:Time3. VB中,________关键字用于定义一个接口。
答案:Interface4. VB中,________关键字用于定义一个事件。
答案:Event5. VB中,________关键字用于定义一个属性。
答案:Property三、简答题(每题5分,共20分)1. 请简述VB中的事件驱动编程是什么?答案:事件驱动编程是一种编程范式,其中程序的执行流程由外部事件(如用户操作、消息、定时器等)触发,而不是按照预先定义的顺序执行。
VB期末考试试题及答案
VB期末考试试题及答案一、填空题1、VB程序设计的主要特点是可视化设计和事件编程。
2、在VB中,最主要的两种对象是窗体〔form〕和控件。
3、工程是构成应用程序文件的集合。
4、方法是VB提供的一种特殊子程序,用来完成一定的操作。
5、浮点类型数据包括单精度型和___双精度__数据。
6、事件是窗体或控件对象识别的__动作____。
7、可用窗体的__print_方法在窗体中显示文字。
8、复选框控件Value属性指示复选框处于____选中___或制止状态(暗淡的) 中的某一种。
9、在VB中,修改窗体的高度〔height〕和宽度〔width〕属性值,可改变窗体的大小。
10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。
11、在MsgBox函数中,如果缺省title参数,那么使用工程1作为消息框的标题。
12、设x=34.58,语句PrintFormat(x,“000.0〞)的输出结果是34.6。
13、在VB中,数值型变量的初值为0,Varant型变量的初值为空,布尔型变量的初值为FALSE。
14、设置窗体的picture属性,可在窗体上显示图片。
15、程序运行工程中,去除MP图片框中的图片应使用语句cls。
二、选择题1、菜单控件只包括一个事件,即C,当用鼠标单击或键盘选中后按“回车〞键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocusB、LoadC、ClickD、KeyDown2、滚动条控件(如下图)的Max属性所设置的是A。
A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL语句Select * Form student中的*表示B。
A、所有记录B、所有字段C、所有表D、都不对4、以下选项中,不属于标签的属性是C。
vb期末试题及答案
vb期末试题及答案# VB期末试题及答案一、选择题(每题2分,共20分)1. 在VB中,以下哪个关键字用于定义类?- A. Class- B. Sub- C. Function- D. Dim答案:A2. VB中,哪个函数用于获取当前日期?- A. Now()- B. Date()- C. Today()- D. GetDate()答案:B3. 下列哪个控件不是Visual Basic的内置控件?- A. TextBox- B. Label- C. Button- D. ScrollBar答案:D4. 在VB中,以下哪个属性用于设置文本框的只读状态? - A. ReadOnly- B. Enabled- C. Visible- D. BackColor答案:A5. VB中,以下哪个事件是当表单被加载时触发的? - A. Click- B. Load- C. Change- D. DblClick答案:B6. 以下哪个语句用于在VB中结束程序?- A. End- B. Exit- C. Stop- D. Quit答案:A7. 在VB中,以下哪个属性用于设置控件的可见性? - A. Visible- B. Enabled- C. Caption- D. Text答案:A8. VB中,哪个函数用于将字符串转换为数字?- A. Val()- B. Str()- C. CInt()- D. CDbl()答案:A9. 在VB中,以下哪个关键字用于定义过程?- A. Function- B. Sub- C. Class- D. Property答案:B10. VB中,以下哪个事件是当按钮被点击时触发的?- A. Click- B. Load- C. Change- D. DblClick答案:A二、填空题(每题2分,共10分)1. 在VB中,使用 __________ 语句可以创建数组。
答案:Dim2. VB中,使用 __________ 方法可以清除文本框中的内容。
大一的vb期末考试题和答案文库
大一的vb期末考试题和答案文库# 大一的VB期末考试题和答案## 一、选择题(每题2分,共20分)1. VB中,以下哪个选项是正确的数据类型?A. IntegerB. DoubleC. StringD. All of the above**答案:D**2. 在VB中,以下哪个关键字用于声明变量?A. DimB. LetC. ConstD. All of the above**答案:A**3. 下列哪个函数用于计算两个数之间的绝对差值?A. AbsB. SgnC. RoundD. Int**答案:A**4. 在VB中,以下哪个选项是正确的循环结构?A. ForB. WhileC. DoD. All of the above**答案:D**5. VB中,以下哪个选项用于定义过程?A. FunctionB. SubC. PropertyD. Both A and B**答案:D**6. 在VB中,以下哪个选项用于数组的声明?A. Dim arr(10) As IntegerB. Dim arr As Integer(10)C. Dim arr(10)D. Both A and C**答案:D**7. 下列哪个选项是VB中的逻辑运算符?A. AndB. OrC. NotD. All of the above**答案:D**8. 在VB中,以下哪个选项用于打开文件?A. OpenB. CloseC. WriteD. Both A and C**答案:A**9. VB中,以下哪个选项用于声明常量?A. DimB. ConstC. LetD. Both A and B**答案:B**10. 在VB中,以下哪个选项用于声明对象变量?A. Dim obj As ObjectB. Set obj = New ObjectC. Both A and BD. None of the above**答案:C**## 二、填空题(每题2分,共20分)1. VB中的`_____`函数用于将字符串转换为大写。
vb期末考试试题及答案6
vb期末考试试题及答案6试题一:VB编程基础题目:编写一个VB程序,实现用户输入一个整数,程序输出该整数的平方值。
答案:```vbPrivate Sub Command1_Click()Dim num As Integernum = InputBox("请输入一个整数:")If IsNumeric(num) ThenMsgBox num * numElseMsgBox "输入错误,请输入一个整数!"End IfEnd Sub```试题二:VB循环结构题目:使用VB编写一个程序,输出1到100之间的所有奇数。
答案:```vbPrivate Sub Command2_Click()Dim i As IntegerFor i = 1 To 100 Step 2Print i;If i Mod 10 = 0 Then PrintNext iEnd Sub```试题三:VB条件语句题目:编写一个VB程序,根据用户输入的分数,判断并输出成绩等级。
答案:```vbPrivate Sub Command3_Click()Dim score As Integerscore = InputBox("请输入你的分数:", "成绩输入")Select Case scoreCase Is >= 90MsgBox "优秀"Case Is >= 80MsgBox "良好"Case Is >= 70MsgBox "中等"Case Is >= 60MsgBox "及格"Case ElseMsgBox "不及格"End SelectEnd Sub```试题四:VB数组应用题目:创建一个VB程序,实现数组的输入、排序和输出。
答案:```vbPrivate Sub Command4_Click()Dim arr(1 To 5) As IntegerDim i As Integer' 输入数组元素For i = 1 To 5arr(i) = InputBox("请输入第" & i & "个元素:")Next i' 冒泡排序For i = 1 To 4For j = i + 1 To 5If arr(i) > arr(j) ThenDim temp As Integertemp = arr(i)arr(i) = arr(j)arr(j) = tempEnd IfNext jNext i' 输出排序后的数组For i = 1 To 5Print arr(i);If i Mod 2 = 0 Then PrintNext iEnd Sub```试题五:VB过程题目:编写一个VB程序,定义一个过程,用于计算两个数的和,并输出结果。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
《程序设计课程》模拟题(A卷答案)一、选择题1.下列叙述中正确的是_____________。
A.数组是用户自定义的数据类型B.数组元素在内存中的存放形式是连续的C.数组在使用时可以采用隐式声明D.数组的下界可以任意答案 B2.复选框的CheckState属性为__________时,表示复选框内有灰色的勾即不可选。
A.UncheckedB.IndeterminateC.CheckedD.None答案 B3.删除列表框中第2项的项目,所使用的方法为______ 。
A.Items.RemoveAtB.MoveC.Items.ClearD.Items.Remove答案 A4.要想从子过程调用后返回两个结果,下面子过程语句说明合法的是 __________。
A.Sub f1(ByVal n%,ByVal m%)B.Sub f1( ByRef n%,ByVal m%)C.Sub f1( ByRef n%, ByRef m%)D.Sub f1(ByVal n%, ByRef m%)答案 C5.下列各赋值语句,语法不正确的是()A.iNumber = 15B.sLength = x + yC.x+y = 5bel1.Text = TimeOfDay答案 C6.在用通用对话框控件建立打开文件对话框时,在文件列表框只允许显示文本文件类型的文件,则Filter属性的正确设置是_________。
A.Text(.txt)||*.txtB.Text(.txt)(*.txt)C.文本文件|(.txt)D.Text(.txt)|*.txt答案 D7.以下程序输出的结果是___________ 。
Dim a() As Integer={1, 2, 3, 4, 5, 6, 7}For i =0 To Ubound (a)a(i) = a(i) * a(i)Next iMsgBox(a(i))A.49B.0C.不确定D.程序出错答案 D8.下列_____________方式声明的变量在每次调用该过程时其值不能保留。
A.在过程体中用Dim语句声明的变量B.在标准模块中声明的变量C.在过程外声明的变量D.在过程体中用Static语句声明的变量答案 A9.在下列关于定时器的说法中,正确的是( )。
A.当Enabled属性为False时,不产生Tick事件B.在程序运行时不可见的,这是因为Visible属性为FalseC.当Interval属性为0,则Tick事件不会发生D.通过适当的设置可以将Interval属性的单位改为秒答案 A10.下面是用户界面控件的是()A.GroupBox控件B.Timer控件C.OpenFileDialog控件D.MenuStrip控件答案 A二、程序填充1. 程序的功能是读取a.txt文件,统计以","逗号间隔的每个字符串中汉字的个数,并以下右图的形式显示在Label1中。
Private Sub Button1_Click(......) Handles Button1.ClickDim str$, k%, i%Label1.Text = ""______(1)_____(1, "c:\a.txt",OpenMode.Input )Do While Not EOF(1)Input(1, str)______(2)_____For i = 1 To Len(Str)If Asc(Mid(str, i, 1)) < 0 Then k = k + 1NextLabel1.Text &= str & ______(3)______ '以如图所示的形式显示LoopEnd Sub答案(1)FileOpen (2)k = 0 (3)"," & k & vbCrLf2.下列程序随机产生n个互不重复的三位数,存放在数组a中。
子过程s( )的功能是统计数组x中百位数与个位数相同的个数。
单击按钮从键盘输入要随机产生的互不重复的三位数的个数,数据以每行5个的形式输出,同时调用子过程s( ),将统计的结果输出。
Private Sub Button1_Click(......) Handles Button1.ClickDim a%(), c%, k%, n%, j%, i%, count%Dim Flag As Booleank = Val(InputBox("输入产生数的个数:"))______(1)_____ a(k-1)a(0) = Int(Rnd() * 900 + 100)n = 1Do While n < kc = Int(Rnd() * 900 + 100)Flag = TrueFor j = 0 To n - 1 'If a(j) = c Then _____(2)_____Next jIf Flag Then ' 没有找到,产生的字母非重复,存放到数组中a(n) = c : n = n + 1End IfLoopFor i = 0 To k - 1Label1.Text &= a(i) & " "If ______(3)_______ Then Label1.Text &= vbCrLf '每行5个数据 Next iCall s(a, count)Label1.Text &= vbCrLf & "满足条件的个数:" & countEnd SubSub s(_____(4)_____) '要求严格区分是传值还是传地址Dim i, k As Integer, f As BooleanFor i = 0 To ______(5)_______k = x(i)If k \ 100 = k Mod 10 Then count = count + 1NextEnd Sub答案(1)ReDim (2)Flag = False (3) (i + 1) Mod 5 = 0(4) ByRef x%(), ByRef count% (5) UBound(x)三、设计操作1. 释放考试结果文件夹(C:\KS)中的error1.exe文件,打开文件夹error1中的应用程序,请修改调试该程序,并按原文件名和位置保存。
正确的运行结果如图所示。
注意:不能修改变量或重新定义变量,不允许增加和删除语句,但可以改变语句次序。
改错题1:(4处错误)功能是通过调用函数过程sum(),将文本框Textbox1中输入的数字字符串的各位数字和在Label1中输出。
改错题2:(3处错误)功能是将文本框Textbox2中输入的字符串大小写字母互换(即原来大写转换为小写、小写转换为大写),其它字符不作转换,并将结果显示在标签Label2中。
2.参见样例,编一个完整的程序,要求:1.界面设计要求(1) 在Form1窗体上放置一个列表框、一个标签,一个字体对话框,并建立一个菜单系统。
窗体的标题为考生的学号;各菜单标题如样例所示。
(2) 在Form2窗体上放置一个简单组合框和一个命令按钮。
2.保存要求必须将项目保存在C:\KS目录下,项目名为"NET"。
3.Form1窗体编程要求"产生10个数"菜单项:在列表框中随机产生10个长度为1~20之间的大写字母字符串;"最长串"菜单项,将列表框中最长的字符串作"☆"标记,并在标签中输出最长的字符串及长度;"字体"菜单项,打开字体对话框,设置列表框中的字体和颜色;"保存"菜单项,将列表框中的数据写到"c:\"文件夹的"a.txt"文件中;"窗体2"菜单项:打开Form2窗体;"结束"菜单项:结束程序的运行。
4.Form2窗体编程要求在简单组合框的文本框中输入一个正整数,回车后若该数为素数,则将其添加到列表框中,当输入非数字字符时,通过信息框给出"输入错误!"的提示。
"返回"按钮:隐藏Form2窗体,返回Form1窗体。
Public Class Form1Private Sub 产生10个串ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 产生10个串ToolStripMenuItem.ClickDim st As StringDim i%, n%, j%ListBox1.Items.Clear()For i = 1 To 10n = Int(Rnd() * 20 + 1)st = ""For j = 1 To nst = st & Chr(Int(Rnd() * 26 + 65))NextListBox1.Items.Add(st)NextEnd SubPrivate Sub 最长串ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 最长串ToolStripMenuItem.ClickDim maxlen%, maxstr$, i%Label1.Visible = Truemaxstr = ""maxlen = 0For i = 0 To ListBox1.Items.Count - 1If Len(ListBox1.Items(i)) > maxlen Thenmaxlen = Len(ListBox1.Items(i))maxstr = ListBox1.Items(i)End IfNextFor i = 0 To ListBox1.Items.Count - 1If Len(ListBox1.Items(i)) = maxlen ThenListBox1.Items(i) = ListBox1.Items(i) & " ★"End IfNextLabel1.Text = "最长字符串为: " & maxstr & vbCrLfLabel1.Text &= "字符数为:" & maxlenEnd SubPrivate Sub 字体ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 字体ToolStripMenuItem.ClickFontDialog1.ShowDialog()ListBox1.Font = FontDialog1.FontListBox1.ForeColor = FontDialog1.ColorEnd SubPrivate Sub 保存ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 保存ToolStripMenuItem.ClickDim i%FileOpen(1, "C:\a.txt", OpenMode.Output)For i = 0 To ListBox1.Items.Count - 1PrintLine(1, ListBox1.Items.Item(i))NextMsgBox("文件成功保存")FileClose(1)End SubPrivate Sub 结束ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 结束ToolStripMenuItem.ClickEndEnd SubPrivate Sub 菜单2ToolStripMenuItem_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs) Handles 菜单2ToolStripMenuItem.ClickForm2.ShowDialog()End SubEnd ClassPublic Class Form2Const PI = 3.1415926Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickMe.Close()End SubPrivate Sub ComboBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles ComboBox1.KeyPressIf Asc(e.KeyChar) = 13 ThenIf Not IsNumeric(ComboBox1.Text) ThenMsgBox("输入错误!")ComboBox1.Text = ""ElseDim f As Boolean, x%, i%x = ComboBox1.Textf = TrueFor i = 2 To x - 1If x Mod i = 0 Then f = False : Exit ForNextIf f ThenComboBox1.Items.Add(ComboBox1.Text)End IfComboBox1.Text = ""End IfEnd IfEnd SubEnd Class。