vb习题及参考答案
VB练习题(含答案)
VB简答练习题1 简述Timer控件中Interval属性和Enanbeled属性。
2 简要回答创建MDI应用程序的步骤。
3 用Visual Basic 语言编写-一个有两个整数参数m和n2的名为GetRand的Function的函数，功能是获取任意两个正整数间的随机整数(假如0<n:<m) ?4 简述selet.. .case语句执行流程。
5 引用数组元素时的注意事项有哪些?6 Visual Basic中有几种运算符?7 向文本文件中添加数据分为哪几步?8 Visual Basic 6.0中的动态数组与静态数组有何不同?9 如何创建一-个快速显示窗体?10 循环语句有几种语句?11 Shape 控件可以用来显示哪些图形?12 MDI应用程序有哪些特性?13 访问数组的常用方法有哪些?14 运行程序有哪几种方法?15 VB工程由哪几个模块组成?16 叙述VB的基本的设计机制。
17 叙述VB集成开发环境的组成。
18 叙述文件访间的类型。
19 运行程序有几种方法?20 VB 有哪些基本数据类型?21 标识符的命名规则是什么?22 访问数组的常用方法有哪些?23 VB过程参数有哪几种传递方式?有何不同?24 如何创建控件数组?25 简述For循环的语法格式。
26 通用的Sub过程有哪几种方式?27 打开属性窗口有哪几种方法?28 如何设置控件之间的对齐方式?29 简述运算符从高到低的优先顺序。
30 建立通用过程的操作步骤有哪些?31 打开代码窗口有哪几种方法?32 如何创建MDI应用程序?33 请写出随机文件的读写步骤。
34 请写出If语句的块语法格式。
35 工具箱的标准控件有哪些?36 简述创建动态数组的步骤。
37 建立事件过程有哪些方法?38 FSO对象模型包括哪些对象?答案：1．简述Timer控件中Interval属性和Enanbeled属性答：Timer控件中的Enanbeled设置或返回计时器控件的有效性，该属性值为布尔值，如果设置为True，则每经过指定的时间间隔将触发Timer事件，为False，计时器控件成为无效，停止工作。
vb练习题及答案
vb练习题及答案VB练习题及答案VB（Visual Basic）是一种广泛应用于Windows操作系统的编程语言，它以其简单易学的特点受到了许多初学者和专业开发者的青睐。
为了帮助大家更好地掌握VB编程，下面将提供一些VB练习题及其答案，希望能对大家有所帮助。
练习题一：计算器程序编写一个VB程序，实现一个简单的计算器功能。
要求用户输入两个数字和一个操作符（+、-、*、/），然后根据操作符进行相应的计算，并输出结果。
解答：```vbPrivate Sub btnCalculate_Click(sender As Object, e As EventArgs) Handles btnCalculate.ClickDim num1 As Double = CDbl(txtNum1.Text)Dim num2 As Double = CDbl(txtNum2.Text)Dim operator As String = cmbOperator.SelectedItem.ToString()Dim result As DoubleSelect Case operatorCase "+"result = num1 + num2Case "-"result = num1 - num2Case "*"result = num1 * num2Case "/"result = num1 / num2End SelectlblResult.Text = "Result: " & result.ToString()End Sub```练习题二：学生成绩管理系统编写一个VB程序，实现一个简单的学生成绩管理系统。
要求用户输入学生的姓名和成绩，然后将其保存到数组中。
用户可以通过输入姓名来查询学生的成绩。
解答：```vbPrivate Structure StudentPublic Name As StringPublic Score As DoubleEnd StructurePrivate students() As StudentPrivate Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.ClickDim newStudent As Student = txtName.TextnewStudent.Score = CDbl(txtScore.Text)ReDim Preserve students(students.Length)students(students.Length - 1) = newStudenttxtName.Text = ""txtScore.Text = ""End SubPrivate Sub btnSearch_Click(sender As Object, e As EventArgs) Handles btnSearch.ClickDim searchName As String = txtSearchName.TextDim found As Boolean = FalseFor Each student As Student In studentsIf = searchName ThenlblSearchResult.Text = "Score: " & student.Score.ToString()found = TrueExit ForEnd IfNextIf Not found ThenlblSearchResult.Text = "Student not found."End IfEnd Sub```练习题三：简单的文本编辑器编写一个VB程序，实现一个简单的文本编辑器功能。
VB程序设计习题及答案第2章VisualBasic语言基础知识
第2章 Visual Basic语言基础知识2．1 Visual Basic定义了几种数据类型，变量有哪几种数据类型，常量有哪几种数据类型。
【答】Visual Basic基本数据类型：1. 字符串型（String）：字符串分为变长字符串和定长字符串两种。
2. 数值型：数值型数据分为整型数和浮点数两类。
3. 货币型（Currency）4. 变体型（Variant）5. 字节型（Byte）6. 布尔型（Boolean）7. 日期型（Date）8. 对象型（Object）Visual Basic中包含两种常量，即文字常量和符号常量。
变量的基本数据类型：Byte（字节型），Boolean（布尔型），Integer（整型），Long （长整型），Single（单精度型），Double（双精度型），Currency（货币型），Date（日期型），Object（对象型），String（变长字符串），String（定长字符串），Variant（变体型、数字），Variant（变体型、字符）2．2 符号常量和变量有什么不同点?【答】符号常量一经定义，就不能在程序中的其他位置改变其值。
变量的值在程序中可以改变。
2．3 指出下列正确的变量名：g(1-k) 6adhs *sss kL2.1 Printx+1 ahi π .ex3 j5h【答案】正确的变量名：ahi，j5h2．4 指出下列正确的数字形式-1.25 ±0.123 89E D2585 10^(2.7) 3^5【答案】2．5 下列表达式若有错误，请改正（1） ts+cos(300) (2) (x+y)^(25÷s)（3） [(X1+X2)*(X1-3)-6]*7 (4) (X÷-2)+sin(1.2+π)【答案】(1) ts+cos(30*3.141593/180)(2) (x+y)^(25/s)(3) ((X1+X2)*(X1-3)-6)*7(4) (X/(-2))+sin(1.2+3.141593)2．6 写出下列数学式的Visual Basic表达式（1） sin(a)[cos(b)+1.5]（2） (x1+4)5(e2-a)（3） 36[(x1+π)(x1÷3.3)-b]（4） x-2π)【答案】Visual Basic表达式：(1) sin(a)*(cos(b)+1.5)(2) (x1+4)^5*(Exp(2)-a)(3) 36*((X1+3.141593)*(x1/3.3)-b)(4) x^（-2）+5.8*sin(3.5*3.141593)第3章顺序结构程序设计3．1 下列语句是否有错？若有，请改正。
VB习题及答案
一．选择题1．GBK字符集共有_____C_____个汉字。
A、6000多B、10000多C、20000多D、30000多2．美国标准信息交换码（ASCII码）中，共有128个字符，包括___B____个可打印字符和32个控制字符。
A、52B、96C、116D、1013．在计算机中，西文字符最常用的编码是__C___。
A、原码B、反码 C 、ASCII码D、补码4．下列四个选项中，按照其ASCII码值从小到大排列的是___A_____。
A、数字、英文大写字母、英文小写字母B、数字、英文小写字母、英文大写字母?C、英文大写字母、英文小写字母、数字D、英文小写字母、英文大写字母、数字5．下列字符中，其ASCII编码值最大的是__B____。
A、9B、DC、AD、空格6．中文标点符号“。
”在计算机中存储时占用___B__个字节。
A、1B、2C、3D、47．GBK是汉字内码的一种扩充规范，下面叙述中错误的是 B 。
A、它共有20000多个汉字B.、它使用双字节表示，字节的最高位均为0C.、它与GB2312保持向下兼容D、它不但有简体字，也有繁体字】8．汉字从录入到打印，至少涉及三种编码，汉字输入码，字型码和 D 。
A、BCD码B、ASCII码C、区位码D、机内码9．在下列汉字编码标准中，不支持繁体汉字的是 A 。
A、GB2312B、GBKC、BIG5D、GB1803010．在利用拼音输入汉字时，有时虽正确输入拼音码但却找不到所要的汉字，其原因不可能是 A 。
A、计算机显示器的分辨率不支持该汉字的显示B、汉字显示程序不能正常工作C、操作系统当前所支持的汉字字符集不含该汉字D、汉字输入软件出错11．将字符信息输入计算机的方法中，目前使用最普遍的是 A 。
？A、键盘输入B、笔输入．C、语音输入Ｄ、印刷体识别输入12．汉字的键盘输入方案数以百计，能被用户广泛接受的编码方案应 C 。
A、必须易学易记B、可输入字数多C.、易学易记，效率要高D、重码要少，效率要高13．MP3音乐采用______C_____编码方法。
VB程序设计 习题及答案第4章 选择结构程序设计
第4章选择结构程序设计4．1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24．2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4．3 已知 W=10 X=9 Y=8 Z=7 ，求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4．4 写出下列十进制整数逻辑运算的结果：(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04．5 已知变量X和Y的值分别为5、6，编写程序，交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示：4．6 从键盘输入一个学生的三科成绩，计算总分，并找出最高分。
【参考答案】（1）用户界面设计（2）控件属性设置（略）（3）程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
vb练习题及答案
vb练习题及答案VB练习题及答案一、选择题1. 在VB中，以下哪个是正确的数据类型？A. IntegerB. IntC. Both A and BD. None of the above答案：C2. VB中，哪个关键字用于声明变量？A. DimB. DeclareC. DefineD. Set答案：A3. 在VB中，以下哪个是正确的循环结构？A. ForB. WhileC. RepeatD. All of the above答案：D4. VB中，以下哪个是正确的条件语句？A. IfB. SwitchC. CaseD. A and B only答案：A5. 在VB中，以下哪个是正确的数组声明方式？A. Dim myArray(5) As IntegerB. Dim myArray As Integer(5)C. Both A and BD. None of the above答案：A二、填空题1. 在VB中，使用________关键字可以定义一个类。
答案：Class2. VB中，使用________方法可以为控件添加事件处理程序。
答案：AddHandler3. 在VB中，________方法用于结束程序的执行。
答案：End4. VB中，________属性用于获取或设置一个控件的文本。
答案：Text5. 在VB中，________方法用于打开一个文件。
答案：Open三、简答题1. 请简述VB中的事件和事件处理程序的概念。
答案：在VB中，事件是用户或程序触发的特定动作，如按钮点击或键盘敲击。
事件处理程序是一个过程，当特定的事件发生时，会被自动调用以响应该事件。
2. 描述VB中如何使用For循环。
答案：在VB中，For循环用于重复执行一段代码直到满足特定条件。
基本语法是：```For counter = start To end [Step increment]' 循环体Next [counter]```3. 解释VB中什么是继承，并给出一个简单的示例。
vb常用控件习题(含答案)
1.下列控件中没有Caption属性的是。
A)框架B)列表框C)复选框D)单选按钮2.复选框的Value属性为1时，表示。
A)复选框未被选中B)复选框被选中C)复选框内有灰色的勾D)复选框操作有误3．用来设置斜体字的属性是。
A)FontItalicB)FontBoldC)FontNameD)FontSize4.将数据项“China”添加到列表框Listl中成为第二项应使用语句。
A)List1.AddItem“China”,1B)List1.AddItem“China”,2C)List1.AddItem1,“China”D)List1.AddItem2,“China”5.引用列表框Listl最后一个数据项，应使用语句。
A)List1.List(List1.ListCount)B)List1.List(ListCount)C)List1.List(List1.ListCount-1)D)List1.List(ListCount-1)6.假如列表框Listl有四个数据项，那么把数据项“China”添加到列表框的最后，应使用语句。
A)List1.AddItem3,“China”B)List1.AddItem“China”,List1.ListCount-1C)List1.AddItem“China”,3D)List1.AddItem“China”，List1.ListCount7．执行了下面的程序后，列表框中的数据项有。
PrivateSubForm_Click()Fori=1to6List1.AddItemiNextiFori=1to3List1.RemoveItemiNextiEndSubA)1，5，6B)2，4，6C)4，5，6D)1，3，58.如果列表框List1中没有选定的项目，则执行List1.RemoveItemList1.ListIndex语句的结果是。
A)移去第一项B)移去最后一项C)移去最后加入列表中的一项D)以上都不对9.如果列表框List1中只有一个项目被用户选定，则执行Debug.PrintList1.Selected(List1.ListIndex)语句的结果是。
vb练习题(含答案)
___B___ 。
A ． 设计流程和编写代码
B． 设计界面和编写代码
C． 设计算法和编写代码
D． 设计程序和编写代码
44．在 VB 6.0 中， 12345& 的数据类型是（ B）
A ． 整数型
B ． 长整数型 C． 字符常数 D． 双精度常数
45．在 VB6.0 中，语句 Dim M1#,Abc,Xyz As Single 定义的 M1 、 Abc 和 Xyz 的类型分别是（ D ）
19、若要执行下列程序段后窗体上显示＂红＂字，则
x 可取的值为：
Select case int(x/10)
case2,4,6,8
print" 黄 "
case1,3,5,7,9
print" 绿 "
case else
print" 红 "
end select
(A)27
(B)38
(C)10
(D)5( 对 )
(A) 必须是字母开头，不能是数字或其他字符
(B) 不能是 VB 的保留字
(C) 可以包含字母、数字、下划线和标点符号 (对 )
(D) 不能超过 255 个字符
15、以下变量名中， ______是不符合 VisualBasic 的命名规范的。
(A)Abc901
(B)_mnu_Open_234( 对 )
A. 字符串类型
B. 日期类型
C. 逻辑类型
D. 指针类型
8、表达式 Left( “Visual ”,3)+Lcase( “AB ”)的值是？（ C）
A. visAB
B. VisAB
C. Visab
D. ualab
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
一、选择题1.2. 中，取字符串”this is a test”的第一个字符，并将其赋值给字符变量ch。
下列代码哪组正确？（假设已经定义变量ch） BA. ch = Char(Mid(“this is a test”,0,1))B. ch = CChar(Mid(“this is a test”,0,1))C. ch = Char(Mid(“this is a test”,1,1))D. ch = CChar(Mid(“this is a test”,1,1))3. Textbox控件限制用户输入字符长度的属性为:CA. CharacterCasingB. LengthC. MaxLengthD. AutoSize4. 过程changeName中执行下列代码后，字符串firstName的值是什么？ADim firstName as String = “Tom”Dim secondName as String = firstNamesecondName &= “Jerry”A. TomB. JerryC. Tom JerryD. Tom & Jerry5. 执行下列语句后，控制台输出什么结果ADim res as Integer = CType(“123.45”,Integer)Console.Writeln(res)A. 123B. 12345C. 0D. res6. 在中，无返回值的过程称为____A____过程A. SubB. FunctionC. PropertyD. Main7. 在模块MyModule中定义的过程ShowHelpInfo（如下），其访问权限为_____C____。
Public Module MyModule……Sub ShowHelpInfo(String info)MessageBox.Show(info)End Sub……End ModuleA. 仅在MyModule中可以使用B. 在本项目中可以使用C. 在本解决方案中可以使用D. 在派生模块中可以使用8. 下列程序在控制台上的输出结果为_____B____。
Public Function MyFunc(i as Integer)If i > 0 ThenReturn 100ElseReturn "hello"End IfEnd FunctionPublic Shared Sub Main()Dim x As EmployeeConsole.WriteLine(TypeName(x.MyFunc(-1)) & "," & TypeName(x.MyFunc(1)))End SubA. Integer,StringB. String,IntegerC. Object,ObjectD. String,String9. 下列主过程Main中执行完语句x.MyFunc(i)后，局部变量i的值为____C____。
Class testPublic Sub MyFunc(ByVal i As Integer)i = i * 2End SubEnd ClassSub Main()Dim x As new testDim i As Integer = 100x.MyFunc(i)End SubA. 0B. 2C. 100D. 20010. 在调试中，可以使用Visual 的下列哪种窗口查看和修改位于当前文本中的所有变量？比如过程的所有局部变量。
BA．局部变量窗口 B.监视窗口 C.快速监视窗口 D.自动窗口11. 已知数组arr进行以下定义：Dim arr() as Integer = {1,1,1,1,1}过程MySub定义如下：Sub MySub(ByVal ar() As Integer, ByRef x As Integer)Dim i As IntegerFor i = 0 To UBound(ar) ' 注：UBound(ar)求数组ar的下标上限ar(i) = xNextx = 0End Sub则执行下列语句后，数组arr和变量data中的内容是什么？ CDim data As Integer = 2MySub(arr, data)A. arr={2,2,2,2,2} data=2B. arr={1,1,1,1,1} data=2C. arr={2,2,2,2,2} data=0D. arr={1,1,1,1,1} data=012. 表达式CInt(True)的值为A. FalseB. TrueC. 1D. -113. 执行下列语句后，变量x的值为______B______Dim x as Integer = 0x = 3/2A. 0B. 1C. 2D. 314. 下列布尔表达式的值为_____A_______。
True and True Xor True and FalseA. TrueB. FalseC. OrElseD. AndAlso15. 下列表达式的值为_____A_______。
True and 100+10*3<12^2A. TrueB. FalseC. 130D. 14416. 分析下列程序，当运行结束后，在控制台上的输出是什么？APublic Function Increment(ByRef value as Integer) AS Integervalue += 1return valueEnd FunctionPublic Sub Main()Dim n1 as Integer = 1Dim n2 as Integer = 1Dim result as BooleanIf n1=0 AndAlso Increment(n2)=1 Thenresult = TrueElseresult = FalseEnd IfConsole.Writeln(“n1=”& n1 & “,n2=”&n2)End SubA. n1=1,n2=1B. n1=0,n2=2C. n1=1,n2=2D. n1=0,n2=117. 在设计循环语句时，若有以下要求：1、在执行循环之前先测试条件表达式expression ；2、让代码循环执行到该条件表达式的值取“真”。
则应使用下列哪种Do Loop循环语句？AA. Do Until expression ⋯⋯LoopB. Do ⋯⋯Loop Until expressionC. Do While expression ⋯⋯LoopD. Do ⋯⋯Loop While expression18. 在使用OpenFileDialog对话框控件时，希望通过对话框只查找C++文件的程序文件(*.CPP)文件和头文件(*.H)，则OpenFileDialog对象的Filter属性应如何设置？BA. “C++程序文件:*.CPP;C++头文件:*.H”B. “C++程序文件|*.CPP|C++头文件|*.H”C. “C++程序文件\*.CPP\C++头文件\*.H”D. “C++程序文件->*.CPP;C++头文件->*.H”19. TextBox控件的PasswordChar属性的作用是CA. 该属性是Boolean类型，表示是否使用*号隐藏输入的信息B. 该属性是String类型，表示输入的隐藏信息的实际内容C. 该属性是Char类型，表示是用哪个字符隐藏输入的信息D. 该属性在中未使用20. 为了使TextBox的ScrollBar真正起作用，应该将TextBox的“自动换行”功能取消。
取消该功能，需要将TextBox控件的_______属性设置为False? CA. ScrollBarsB. AcceptReturnsC. WordWrapD. AutoSize21. 使用Masked Edit控件输入金额数字时，对输入有以下格式要求：B1、前面必须带$符号；2、金额最多为999999元，且每3位用逗号分割,高位不保留0；3、整数部分对10元取整，即个位必须为0；4、小数部分保留2位,必须为0 。
金额数字的例子如：123,450.00。
根据该要求，则控件的Mask属性应为A. $999,99#.00B. $999,990.00C. $###,##0.00D. $###,##9.0022. 可以使用下列哪个函数来检测一个字符串的内容是不是数字格式？AA. IsNumericB. IsNothingC. IsIntegerD. IsNumber23. 类MyClass的定义如下：BPublic Class MyClass1Private data as String则关键字Private在类的定义中的作用是：A. 限定成员变量data只在本模块内部可以使用；B. 限定成员变量data仅在类MyClass的成员方法中可以访问；C. 限定成员变量data仅仅可在类以及子类的成员方法中访问D. 限定类MyClass仅在本模块中可以使用24. 在中，一般使用关键字_____A___来标示重载方法。
A. OverloadsB. OverridesC. ShadowsD. Public25. 对于语句Speed = Miles/Hours(其中Speed、Miles、Hours都是Double值)，当Hours=0时，该语句将引发 DA. 语法错误B. 编译错误C. 逻辑错误D. 运行时错误26. 当程序出现逻辑错误后，可以使用___C_____工具来隔离并改正代码中的逻辑错误？A. 命令行下的Debug.exeB. 汇编工具C. Visual 的调试工具D. 任何一种语言的调试工具27. 程序在语法上是合法的，在运行时也没有出现非法操作，但结果不合理，这种错误在中称为CA. 语法错误B. 运行时错误C. 逻辑错误D. 不明错误28. 在调试程序时，Visual 的“自动窗口”可以查看当前行语句以及其前、后各__C___语句中的变量，并可以修改其值。
A. 1行B. 2行C. 3行D. 4行29. Win窗体设计时，应该为工具栏的___B______事件编写事件处理程序，以响应用户点击工具栏的按钮？A. ClickB. ButtonClickC. KeyDownD. MouseDown30. Win窗体的工具栏对象为ToolBar1。
为了在工具栏中添加新的按钮，应该在对象ToolBar1的“属性”视图下编辑ToolBar1的____C_____属性A. AppearanceB. ImageListC. ButtonsD. ShowToolTips31. Win窗体的工具栏对象为ToolBar1。