VB程序网上作业答案
vb程序习题答案
vb程序习题答案VB程序习题答案在学习Visual Basic（VB）编程的过程中，做习题是非常重要的一部分。
通过做习题，我们可以巩固所学的知识，提高编程能力。
下面是一些常见的VB程序习题及其答案。
1. 编写一个程序，计算1到100的所有偶数的和。
答案：```vbDim sum As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNextMsgBox("1到100的所有偶数的和为：" & sum)```2. 编写一个程序，找出一个数组中的最大值和最小值。
答案：```vbDim arr() As Integer = {5, 8, 3, 9, 2}Dim max As Integer = arr(0)Dim min As Integer = arr(0)For Each num In arrIf num > max Thenmax = numEnd IfIf num < min Thenmin = numEnd IfNextMsgBox("数组中的最大值为：" & max & "，最小值为：" & min)```3. 编写一个程序，将一个字符串反转。
答案：```vbDim str As String = "Hello, World!"Dim reversedStr As String = ""For i = str.Length - 1 To 0 Step -1reversedStr = reversedStr & str(i)NextMsgBox("反转后的字符串为：" & reversedStr)```通过做这些习题，我们可以加深对VB编程语言的理解，提高编程能力。
vb程序设计教程参考答案
1、B2、A3、B4、答：属性：红色、充满氢气；事件：松手、针刺；方法：飞走、爆破。
5、答：事件是指对象能够识别并作出反映的外部刺激。
事件驱动又称消息驱动，事件驱动程序设计是指每个事件对应有相应的程序代码，仅在该事件发生时，该段代码才会被执行。
事件发生的顺序决定了代码执行的顺序，因此每次执行应用程序时，程序代码并不是按照程序编写的顺序来执行的。
6、答：VB是一个包括界面设计、程序编码、调试、编译并创建可执行程序的集成开发环境。
VB的集成开发环境的主界面中包含：标题栏、菜单栏、工具栏、控件箱、工程资源管理器、属性窗口、“窗体布局”窗口、窗体设计器、代码编辑器等元素组成。
7、答： VB菜单条通常情况下有：文件、编辑、视图、工程、格式、调试、运行、查询、图表、工具、外接程序、窗口、帮助等13项菜单项组成。
8、答：工具栏可自行定义。
标准工具栏中通常情况下有：添加标准exe工程、添加窗体、菜单编辑器、打开工程、保存工程、剪切、复制、粘贴、查找、撤消、重复、启动、中断、结束、工程资源管理器、属性窗口、窗体布局窗口、对象浏览器、工具箱、数据视图窗口、可视化元件管理器等按钮组成。
9、答：创建VB应用程序的一般步骤为：创建界面；设置窗体和控件属性；编写代码；保存工程；运行并调试程序；检查并排除错误；创建可执行文件。
10、Private Sub Command1_Click()Label1.Caption = "I love vb,I hate vb"End Sub1、2、3、S1 输入待判断自然数： N（N>=2）；S2 i=2；S3 判断i是否小于N-1，若不是转S5S4 判断N除以i的余数是否为0,如果不是则i=i+1转S3；S5 判断i是否等于N，若是输出“是素数”，否则输出“不是素数”。
4、S1 输入待判断自然数： N；S2 将N转换成字符S，计算S的长度K；S3 i=1；S4 判断i是否小于K-1，若不是转S6；S5 判断S中的第i位和第K-i+1位是否相等,如果是则i=i+1转S4，如果不是则转S6；S6 判断i是否是中间位数，若是输出“是回文数”，否则输出“不是回文数”。
东大14秋学期《可视化程序设计(VB)》在线作业1答案
可视化程序设计（VB） 14秋学期《可视化程序设计(VB)》在线作业1一,单选题1. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
当改变当前驱动器时，目录列表框应该与之同步改变。
设置两个控件同步的命令放在一个事件过程中，这个事件过程是（）。
A. Drive1_ChangeB. Drive1_ClickC. Dir1_ClickD. Dir1_Change?正确答案：A2. 下面程序段运行后，变量Value的值为（）。
x=20 IF x>=10 Then Value =5*x Else Value =4*xA. 100B. 80C. 90D. 70?正确答案：A3. 表达式Abs(-3.6)*sqr(100)的值是（）。
A. -360B. 360C. -36D. 36?正确答案：D4. 设有以下循环结构 Do 循环体 Loop While <条件> 则以下叙述中错误的是（）。
A. 若条件"是一个为0的常数，则一次也不执行循环体"B. "条件"可以是关系表达式、逻辑表达式或常数"C. 循环体中可以使用Exit Do语句D. "如果"条件"总是为True，则不停地执行循环体"?正确答案：A5. 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "沈阳") Print city(1) End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。
A. 空白B. 错误提示C. 北京D. 上海?正确答案：D6. 目录列表框的Path属性的作用是（）。
VB程序设计教程课后参考答案概要
VB程序设计教程课后参考答案习题一一、填空题1．对象、事件驱动2．窗体、控件3．属性4．属性窗口、编程设置5．事件过程6．对象名、下划线、事件名7．Form_click8．Print form1.print “我的VB”9．主窗口、属性、工具箱、代码、窗体、工程资源管理10．菜单、快捷键二、选择题1．C 2. A 3. B 4. B 5. D 6. B C 7. A 三、简答题（略）习题二一、选择题1. D2. C3. C4. B5. C6. B7. C8. B 9. A 10. B 11. B 12. C 13. D 14. B15. A 16. A 17. A 18. A 19. B 20. C 21. A22. B 23. B 24. A 25. C 26. A 27. B 28. B29. C 30. B 31. D 32. D 33. C二、填空题1．Controlbox、Maxbutton、Minbutton2．Multiline TRUE3．******4．单文档界面（SDI）多文档界面（MDI）5．窗体显示6．Passwordchar7．_change()三、编程题（略）习题三一、基础知识题（略）二、填空题1．整型、长整型、单精度、双精度2．(x mod 10)*10+x\103．Sin(3.14*15/180)+sqr(x+exp(3))/abs(x-y)-log(3*x)4．(a+b)/(1/(c+5)-c*d/2)5．X mod 5=0 or x mod 9=06．False7．-4、3、－3、3、－4、48．CDEF10．TRUE11．变量、属性12．‘_ :13．(略)14．“”＃15．Public、通用/模块、Dim、static、private16．+ 、&、+17．Now() 、time()、日期18．Inputbox()、字符串、val()19．Msgbox()三、选择题1．B 2. C 3. A 4. B D此题有误 5. B 6. A7. D 8. B 9. B 10. C 11. D 12. B13. C 14. B 15. A 16. C 17.A 18. D19. A 20. D 21. A 22. C 23. C 24. D25. A 26. D 27. D 28. B 29. C 30. B31. C 32. B 33. C D此题有误34. C 35. A36. D 37. C 38. A 39. B 40. A 41. C42. C 43. D 44. C 45. D 46. A四、编程题1.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%, delta%Dim x1#, x2#, x#a = Val(InputBox("please input data to a:", "info", 1))b = Val(InputBox("please input data to b:", "info", 1))c = Val(InputBox("please input data to c:", "info", 1))If a = 0 And b <> 0 Thenx = -c / bPrint "所构成的方程是：" & b & "x" & "+" & c & "=0"Print "该一元一次方程的根是：", xEnd IfIf a = 0 And b = 0 ThenPrint "很抱歉，不能构成合法的方程！"End IfIf a <> 0 Thendelta = b * b - 4 * a * cIf delta >= 0 Thenx1 = (-b + Sqr(delta)) / (2 * a)x2 = (-b - Sqr(delta)) / (2 * a)Print "所构成的方程是：" & a & "x2" & "+" & b & "x" & "+" & c & "=0"Print "该方程的根是："Print "第一个根是：", x1Print "第二个根是：", x2Else2Print "该方程有两个虚根："Print "第一个虚根是：" & -b / (2 * a) & "+" & Sqr(Abs(delta)) / (2 * a) & "i"Print "第二个虚根是：" & -b / (2 * a) & "－" & Sqr(Abs(delta)) / (2 * a) & "i" End IfEnd IfEnd Sub2.Option ExplicitPrivate Sub Command1_Click()Dim i%, s%s = 0For i = 1 To 99 Step 2s = s + iNextPrint sEnd Sub3.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#s = 0For i = 1 To 100s = s + 1 / i * (-1) ^ (i + 1)NextPrint sEnd Sub4.Option ExplicitPrivate Sub Command1_Click()Dim i%, n%Dim t#, s#n = Val(InputBox("please input data:", "info", 5))s = 0t = 1For i = 1 To nt = t * is = s + tNextPrint sEnd Sub5.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%Dim p#, s#a = Val(InputBox("please input data to a:", "info", 3))b = Val(InputBox("please input data to b:", "info", 4))c = Val(InputBox("please input data to c:", "info", 5))If (a + b > c And Abs(a - b) < c) Or (a + c > b And Abs(a - c) < b) Or ((b + c) > a And Abs(b - c) < a) Thenp = (a + b + c) / 2s = Sqr(p * (p - a) * (p - b) * (p - c))Print "三角形的面积是：" & sElsePrint "很抱歉，不能构成合法的△三角形！"End IfEnd Sub6.Option ExplicitPrivate Sub Command1_Click()Dim ji%, tu%For ji = 1 To 27For tu = 1 To 27If ji * 2 + tu * 4 = 78 And ji + tu = 27 ThenPrint "鸡的个数是：" & jiPrint "兔的个数是：" & tuEnd IfNextNextEnd Sub7.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#, t#s = 10t = 10For i = 1 To 7t = t * 0.4s = s + t * 2NextEnd Sub8.Option ExplicitPrivate Sub Command1_Click()Dim i%, fs%, max%, min%, s%Dim ave#fs = Val(InputBox("please input score:", "info", 90))s = fsmax = fsmin = fsFor i = 2 To 7fs = Val(InputBox("please input score:", "info", 90))If max < fs Thenmax = fsEnd IfIf min > fs Thenmin = fsEnd Ifs = s + fsNextave = (s - max - min) / 5Print "该运动员的平均成绩是：" & aveEnd Sub9. ‘同学们，这道题方法很多，主要考察你对选择结构的理解，我给出其中一种方法。
vb程序设计试题及答案(三)
vb程序设计试题及答案(三)一、单选题1. 在VB中，用于声明变量的关键字是（）。
A. DimB. SubC. FunctionD. Const答案：A2. VB中，用于结束一个程序的运行的语句是（）。
A. EndB. ExitC. StopD. Quit答案：A3. VB中，用于实现循环的关键字是（）。
A. ForB. NextC. DoD. Loop答案：A4. 在VB中，以下哪个不是合法的变量名？（）A. _nameB. name$C. 123nameD. name答案：C5. VB中，用于定义一个数组的关键字是（）。
A. DimB. ReDimC. EraseD. New答案：A二、判断题1. VB中的所有变量都必须先声明后使用。
（）答案：错误2. VB中，If语句后面必须跟Then。
（）答案：正确3. VB中，可以同时声明多个变量。
（）答案：正确4. VB中，使用Mid$函数可以返回字符串中的任意字符。
（）答案：错误5. VB中，可以创建一个没有名称的过程。
（）答案：错误三、填空题1. 在VB中，使用________关键字可以定义一个过程。
答案：Sub 或 Function2. VB中，使用________函数可以获取当前日期。
答案：Date3. VB中，使用________函数可以获取当前时间。
答案：Time4. VB中，使用________函数可以将字符串转换为数字。
答案：Val5. VB中，使用________函数可以将数字转换为字符串。
答案：Str四、简答题1. 请简述VB中事件驱动编程的概念。
答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是按照预先定义的顺序执行。
2. VB中如何实现一个简单的计算器？答案：可以通过创建一个窗体，添加两个文本框用于输入数字，添加一个按钮用于触发计算事件，再添加一个文本框用于显示结果。
在按钮的点击事件中编写代码实现加、减、乘、除等基本运算。
VB程序设计教程 习题解答
《VB程序设计教程》（第4版）习题解答单元一巩固与提高答案一、选择题1. Visual Basic 6.0分为3种版本，不属于这3种版本的是A）学习版B）专业版C）企业版D）业余版【答】D。
2. 下列方法中不能退出Visual Basic的是A）按Alt+Q组合键B）按下Alt+F组合键，然后按Esc键C）按F10键，然后按F键，再按X键D）打开“文件”菜单→“退出”命令【答】B。
3. Visual Basic集成的主窗口中不包括A）属性窗口B）标题栏C）菜单栏D）工具栏【答】A。
4. 下列操作可以打开立即窗口的是A）Ctrl+D B）Ctrl+F C）Ctrl+G D）Ctrl+E【答】C。
二、填空题1. 与传统的程序设计语言相比，Visual Basic最突出的特点是____。
【答】事件驱动编程机制。
2. 如果不使用鼠标，用键盘打开菜单和执行菜单命令，第一步应按____键。
【答】功能键F10或Alt键。
3. 建立一个新的标准模块，应该选择____菜单下的“添加模块”命令。
【答】“工程”菜单。
三、思考题1. 简述Visual Basic的特点。
【答】与一般的程序设计语言相比，VB具有以下特点：(1) 可视化的设计平台；(2) 面向对象的设计方法；(3) 事件驱动的编程机制；(4) 结构化的设计语言；(5) 充分利用Windows资源；(6) 开放的数据库功能与网络支持。
2. 简述Visual Basic集成开发环境的组成。
【答】VB 6.0集成开发环境除了具有标准Windows环境的标题栏、菜单栏、工具栏外，还有工具箱、属性窗口、工程管理器窗口、窗体设计器、立即窗口、窗体布局窗口等有用的开发工具。
(1) 标题栏和菜单栏：标题栏中显示的有窗体控制菜单图标、当前激活的工程名称、当前工作模式以及最小化、最大化∕还原、关闭按钮。
菜单栏中显示了“文件”、“编辑”、“视图”、“工程”、“格式”等菜单项，其中包含了VB编程的常用命令。
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习题答案Visual Basic（VB）是一种广泛应用于软件开发的编程语言，它简单易学、功能强大，因此备受开发者的喜爱。
然而，对于初学者来说，掌握VB的各种知识和技巧并不容易。
为了帮助大家更好地学习和理解VB，本文将提供一些常见习题的答案，希望能够对大家的学习有所帮助。
1. 请写一个VB程序，输出“Hello, World!”。
答案：```vbModule Module1Sub Main()Console.WriteLine("Hello, World!")Console.ReadLine()End SubEnd Module```2. 请写一个VB程序，计算并输出1到100之间所有偶数的和。
答案：```vbModule Module1Sub Main()Dim sum As Integer = 0For i As Integer = 1 To 100If i Mod 2 = 0 Thensum += iEnd IfNextConsole.WriteLine("1到100之间所有偶数的和为：" & sum) Console.ReadLine()End SubEnd Module```3. 请写一个VB程序，判断一个输入的整数是否为素数。
答案：```vbModule Module1Sub Main()Console.WriteLine("请输入一个整数：")Dim num As Integer = Console.ReadLine()Dim isPrime As Boolean = TrueIf num <= 1 ThenisPrime = FalseElseFor i As Integer = 2 To Math.Sqrt(num)If num Mod i = 0 ThenisPrime = FalseExit ForEnd IfNextEnd IfIf isPrime ThenConsole.WriteLine(num & "是素数。
北航14秋《VB语言程序设计》在线作业一答案
北航《VB语言程序设计》在线作业一单选题一、单选题（共25 道试题，共100 分。
只有一个选项是正确的）V 1. 条件1<x≤2或10≤x<15，在VB语言中应写成条件表达式（）A. x>1 AND x<=2 OR a>=10 AND x<15B. x>1 OR x<=2 OR a>=10 OR x<15C. x>1 OR x<=2 AND a>=10 OR x<15D. x>1 AND x<=2 AND a>=10 AND x<15-----------------选择：A2. 表达式23/5.8、23\5.8、23Mod5.8的运算结果分别是（）A. 3、3.9655、3B. 3.9655、3、5C. 4、4、5D. 3.9655、4、3-----------------选择：B3. ^、/、Mod、*等4个算术运算符中，优先级最低的是（）A. ^B. /C. ModD. *-----------------选择：C4. VB中项目文件的扩展名是什么。
A. VBPB. FRMC. VBWD. FRX-----------------选择：A5. 如果变量a=2，b=3，c=4，d=5，表达式NOT a>b AND NOT d<>c的值是（）A. TrueB. FalseC. 1D. 0-----------------选择：B6. 不管一个对象的属性如何设置，程序运行时始终都能接收焦点的方法是（）A. 用Tab键B. 用鼠标C. 用方向键D. 不能实现-----------------选择：D7. 将任意一个正的两数N的个位数与十位数对换的表达式为（）。
VB程序设计试题及答案（一）-vb程序设计答案
VB程序设计试题及答案（一）一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。
(A) Forml.Cap on=“欢迎使用VB”(B) Forml.Cap on='欢迎使用欢迎使用VB'(C) Forml.Cap on=欢迎使用VB(D) Forml.Cap on="欢迎使用VB"3. 若要使命令按钮不可操作，要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Cap on4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中，其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是D 。
2022网络考试练习及答案VB
单项选择题1、VB采用( )的编程机制。
（2 分）A．可视化B．面向图形C．事件驱动D．面向对象我的答案：C得分：2分2、Visual Basic6.0中规定窗体文件的扩展名是( )。
（2 分）A．frmB．vbpC．basD．for我的答案：B得分：0分3、Visual Basic是一种面向( )的程序设计语言。
（2 分）A．用户B．程序C．事件D．对象我的答案：D4、如何使一个标签或按钮控件在运行时不可用( )。
（2 分）A．把它的Visible属性设置成TrueB．把它的Enabled属性设置成TrueC．把它的Visible属性设置成FalseD．把它的Enabled属性设置成False我的答案：C得分：0分5、设有语句:a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是()。
（2 分）A．字符串"20"B．默认值100C．字符串"120"D．数值120我的答案：A得分：2分6、数学表达式X^2+3XY对应的VB算术表达式是( )。
（2 分）A．X*X+3XYB．X*X+3*XYC． X*2+3X*YD．X*X+3*X*Y我的答案：D7、表达式4+5 \ 6 * 7 / 8 Mod 9 的值是( )。
（2 分）A．4B．7C．6D．5我的答案：D得分：2分8、选拔身高T超过1.7米且体重W小于60公斤的人,表示该条件的布尔表达式为( )。
（2 分）A．T>=1.7 Or W<60B．T>1.7 And W<60C．T<=1.7 Or W>=60D．T>=1.7 And W<=60我的答案：B得分：2分9、Sqr(81)+Fix(3.6)的值是( )。
（2 分）A．8B．7C．12D．9我的答案：C10、语句Dim x As Single作用是:将x定义为( )变量。
VB程序设计课后习题答案(科学出版社)(1)
同步练习1二、选择题01——05 CADAB06——10 ACDAB11——15 CBDBB同步练习2二、选择题01——05 ABDCA06——10 CACBC11——15 DADAD16——20 BDBBB三、填空题1．可视2．LEFT、TOP、WIDTH、HEIGHT3．按字母顺序4．查看代码5．工具、编辑器6．FORM窗体、FONT7．MULTILINE8．在运行时设计是无效的9．工程、工程属性、通用、FORM1.SHOW 10．TABINDEX、0同步练习3二、选择题01——05 BCADB06——10 ADBBC11——15 DBCBA16——20 BAABB三、填空题1．整型、长整型、单精度型、双精度型2．SIN(30*3.14/180)+SQR(X+EXP(3))/ABS(X-Y)-LOG(3*X) 3．164、今天是：3-194．FALSE5．-4、3、-3、3、-4、46．CDEF7．(X MOD 10)*10+X\108．(35\20)*20=20( 35 \ 20 )* 20 = 209．X MOD 3=0 OR X MOD 5=010．27.6、8.2、8、1、100、397、TRUE、FALSE同步练习4一、选择题01——05 DBCAD06——10 CBBAB11——15 D25BAC16——20 CBACB21——25 DAABC二、填空题1．正确性、有穷性、可行性、有0个或多个输入、有1个或多个输出2．1 2 33．X>=74．X<AMIN5．10246．117．128．6、I、”*”;9．0、100、I+110．2*I、6、”*”;三、编程题1．编程求n！，n从键盘输入。
Private Sub Form_Click()Dim n%, s%, i%n = Val(InputBox("请输入n的值："))s = 1For i = 1 To ns = s * iNext iPrint n; "!="; sEnd Sub2．编程求100以内的全部质数。
VB程序设计练习册参考答案
参考答案第1章Visual Basic 简介一、选择题1、B2、C3、A4、D5、C6、A7、D8、C9、D 10、B11、C 12、B二、填空题1 过程对象事件驱动2 学习版专业版企业版企业版3 Alt+F4 Alt+Q4 设计运行中断5 设置在应用程序运行时，各窗体在屏幕上的显示位置6 内部（标准）7 资源管理器8 编译方式解释方式9 选择“视图/工具箱”命令10 print 或？“大家都来学用Visual Basic”11按字母序按分类序12编辑代码三、思考题略第2章Visual Basic程序设计概述一、选择题1、A2、A3、D4、D5、D6、C7、A 8、C 9、A 10、C 11、B 12、D13、C 14、C 15、B 16、B 17、D 18、B三、编程题1、（1）建立应用程序用户界面。
选择”新建”工程，进入窗体设汁器，在窗体中增加一个标签控件Labe11和两个命令按钮 Commandl 、 Comlnand2。
（2）设置对象属性，见表。
（可自由设置）3编写代码private sub command1_clicklabel1.visible=false1 窗体 控件2 Left Top Width Height3 Ctrl 或shift4 Scrollbars Multiline True Passwordchar5 事件过程6 在属性窗口设置 在代码窗口设置7 对象名 下划线 事件名8 Form_Click9 Form1.Hide10 界面设计 属性设置 代码编写 保存运行11 窗体文件 工程文件12 部件13 窗体文件 模块文件 类模块文件private sub command2_clicklabel1.visible=trueend sub2、Private Sub Command1_ClickIf Text1.Text<>””And Text2.Text<>””Then ′组合条件判断文本框是否为空Form1.Caption=Text1.Text & ″,″& Label2.Caption & ″″& Text2.Text End IfEnd Sub第3章Visual Basic程序设计基础一选择题1.B2.C3.D4.B5.B6.B7.D8.D9.C10.C11.D 12.C 13.D 14.D 15.A 16.D 17.D 18.D 19.C 20.C21.A22.D23.B24.A 25.B 26.A二、填空题1 our name is2 13 True4 字母数字下划线2555 56 07 Logx/log10/0.5+x^2或者Logx/log10/0.5+x*x8 0,1,2,3,49 x>=0 and x<10010 511 false12 6三、编程题1.提示：Ucase、Lcase的使用2.提示：属性设置中，“计算”按钮的default属性设为True.“清除”按钮的Cancel属性设为True.第4章数据输入输出一、选择题1、D2、A3、A4、B5、D6、B7、C 8、C 9、D 10、D二、填空题1. 1+1= 22+2=42. 500.00%3.将当前字体放大两倍4. 20-11-025. 11 1三、编程题1.提示：（1）流程图。
VB程序设计课后习题答案
VB课后习题解答第一、二章：1、简述VB6.0的主要特点答：方便、直观的可视化设计工具;面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境;结构化程序设计语言;完备的联机帮助功能；强大的多媒体、数据库和网络功能。
2、当正常安装VB6。
0后,误把Windows子目录删除。
当重新安装Windows后,是否需要再次安装VB6。
0？答：要重新安装的。
因为安装VB6。
0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6。
0。
3、Visual Basic 6。
0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？答：在VB6.0的启动界面上,能显示对应的版本.4、叙述建立一个完整应用程序的过程答：首先建立用户界面的控件对象（简称控件);然后对控件属性进行设置；再对控件事件过程及编程;保存应用程序；程序调试和运行。
5、Visual Basic 6。
0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？答：选择“视图"—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码"按钮。
6、当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。
试问该工程涉及多少个要保存的文件？若要保存该工程的所有文件,应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？答：涉及两个文件要保存.先保存窗体文件（.frm）,再保存工程文件（.vbp）。
若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。
7、保存文件时，若不改变目录名，则系统默认的目录是什么?答：系统默认的目录是VB988、安装Visual Basic 6。
0后，帮助系统是否也已安装？答:没有。
VB6.0的帮助系统在两张光盘上，即MSDN Library，其中还包含了VC、VFP等其他语言的帮助系统。
9、如何使用Visual Basic 6.0的帮助系统？答：最方便的方法是选定要帮助的内容，然后按F1功能键，这时系统打开MSDN Library查阅器,直接显示与选定内容有关的帮助信息。
vb程序设计课后习题答案
vb程序设计课后习题答案VB程序设计课后习题答案在学习VB程序设计课程的过程中，课后习题是巩固知识、提高能力的重要环节。
通过认真完成课后习题，我们不仅可以加深对知识点的理解，还可以提高编程能力和解决问题的能力。
下面我将为大家分享一些VB程序设计课后习题的答案，希望能够对大家的学习有所帮助。
1. 编写一个VB程序，实现输入两个数，计算它们的和并输出。
```Private Sub btnCalculate_Click()Dim num1 As IntegerDim num2 As IntegerDim sum As Integernum1 = Val(txtNum1.Text)num2 = Val(txtNum2.Text)sum = num1 + num2lblResult.Caption = "结果为：" & sumEnd Sub```2. 编写一个VB程序，实现输入一个数，判断它是奇数还是偶数并输出。
Private Sub btnJudge_Click()Dim num As Integernum = Val(txtNum.Text)If num Mod 2 = 0 ThenlblResult.Caption = "这是一个偶数"ElselblResult.Caption = "这是一个奇数"End IfEnd Sub```3. 编写一个VB程序，实现输入一个数，计算它的阶乘并输出。
```Private Sub btnFactorial_Click()Dim num As IntegerDim result As IntegerDim i As Integernum = Val(txtNum.Text)result = 1For i = 1 To numresult = result * iNextlblResult.Caption = "结果为：" & resultEnd Sub```通过以上几个例子，我们可以看到，VB程序设计课后习题涵盖了基本的输入输出、运算符的使用、条件判断和循环等知识点。
VB程序网上作业答案
VB程序⽹上作业答案客观题_0001试卷总分：100 测试时间：240单项选择题判断题⼀、单项选择题（共20 道试题，共80 分。
）1. ⽤户在组合框中输⼊或选择的数据可以通过⼀个属性获得，这个属性是（）。
A. ListB. ListindexC. TextD. Listcount2. 在设计菜单时，如果要在菜单中加⼊⼀个菜单分隔条，则菜单分隔条的标题必须设置为（）。
A. 加号（+）B. 减号（-）C. 星号（*）D. 感叹号（!）3. 保存新建的⼯程时，默认的⽂件夹是（）。
A. My DocumentB. VB98C. "\ "D. Windows4. 要清除列表框的所有内容，可⽤（）⽅法来实现。
A. RemoveTtemB. ClsC. ClearD. 以上均不可以5. ⽤标准⼯具栏中的⼯具按钮不能执⾏的操作是（）。
A. 添加⼯程B. 打印源程序C. 运⾏程序D. 打开⼯程6. 改变驱动器列表框的Drive属性值，将激活（）事件。
A. ChangeB. ScollC. KeyDownD. KeyUp7. 下列语句语法正确的是（）。
A. a=1 b=2 c=3B. a=l：b=2：c=3C. a=1，b=2，c=3D. a=1；b=2；c=38. 要在窗体Form1内显⽰“myfrm”，使⽤的语句是（）。
A. Form. print "myfrm"B. ="myfrm"C. "myfrm"9. 图象框Image没有的属性是（）。
A. PictureB. AppearanceC. AutoRedrawD. 以上属性都没有10. 可获得字符的ASCII码的函数是（）。
A. ValB. FixC. AscD. Chr11. 计时器没有的属性是（）。
A. IntervalB. EnableC. SizeD. Index12. 以下选项中，不是Visual Basic标准控件的是（）。
VB语言程序设计-4套作业参考答案
第1套您已经通过该套作业,请参看正确答案1、与传统的程序设计语言相比，Visual Basic语言最突出的特点是（）。
A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术参考答案：C您的答案：C2、Visual Basic集成环境的主窗口中不包括（）。
A．标题栏B．菜单栏C．状态栏D．工具栏参考答案：C您的答案：C3、Visual Basic窗体设计器的主要功能是（）。
A．建立用户界面B．编写源程序代码C．画图D．显示文字参考答案：A您的答案：A4、下列叙述中正确的是（）。
A．只有窗体才是VB中的对象B．只有控件才是VB中的对象C．控件和窗体都是VB中的对象D．控件和窗体都不是VB中的对象参考答案：C您的答案：C5、为了把窗体上的某个控件变为活动的，应执行的操作是（）。
A．单击窗体的边框B．单击该控件的内部C．双击该控件D．双击窗体参考答案：B您的答案：B6、确定一个控件在窗体上的位置的属性是（）。
A．Width或HeightB．Width和HeightC．Top或LeftD．Top和Left参考答案：D您的答案：D7、在窗体上面画一个名称为Text1的文本框，然后编写如下的事件过程：Private Sub Text1_KeyPress(KeyAscii As Integer)......End Sub若焦点位于文本框中，则能够触发KeyPress事件的操作是（）。
A．单击鼠标B．双击文本框C．鼠标滑过文本框D．按下键盘上的某个键参考答案：D您的答案：D8、为了装入一个VB应用程序，应当（）。
A．只装入窗体文件(.frm)B．只装入工程文件(.vbp)C．分别装入工程文件和标准模块文件(.bas) D．分别装入工程文件、窗体文件和标准模块文件9、当窗体最小化时缩小为一个图标，设置这个图标的属性是（）。
A．MouseIconB．IconC．PictureD．MousePoint参考答案：B您的答案：B10、为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
客观题_0001试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。
）1. 用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）。
A. ListB. ListindexC. TextD. Listcount2. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（）。
A. 加号（+）B. 减号（-）C. 星号（*）D. 感叹号（!）3. 保存新建的工程时，默认的文件夹是（）。
A. My DocumentB. VB98C. "\ "D. Windows4. 要清除列表框的所有容，可用（）方法来实现。
A. RemoveTtemB. ClsC. ClearD. 以上均不可以5. 用标准工具栏中的工具按钮不能执行的操作是（）。
A. 添加工程B. 打印源程序C. 运行程序D. 打开工程6. 改变驱动器列表框的Drive属性值，将激活（）事件。
A. ChangeB. ScollC. KeyDownD. KeyUp7. 下列语句语确的是（）。
A. a=1 b=2 c=3B. a=l：b=2：c=3C. a=1，b=2，c=3D. a=1；b=2；c=38. 要在窗体Form1显示“myfrm”，使用的语句是（）。
A. Form. print "myfrm"B. Form.caption="myfrm"C. Form1.print "myfrm"D. Form1.caption="myfrm"9. 图象框Image没有的属性是（）。
A. PictureB. AppearanceC. AutoRedrawD. 以上属性都没有10. 可获得字符的ASCII码的函数是（）。
A. ValB. FixC. AscD. Chr11. 计时器没有的属性是（）。
A. IntervalB. EnableC. SizeD. Index12. 以下选项中，不是Visual Basic标准控件的是（）。
A. 复选框B. 定时器C. 窗体D. 命令按钮13. 下列不能打开菜单编辑器的操作是（）。
A. 按Ctrl+EB. 单击工具栏中的“菜单编辑器”按钮C. 执行“工具”菜单中的“菜单编辑器”命令D. 按Shift + Alt + M14. 使文本框获得焦点的方法是（）。
A. SetfocusB. LostfocusC. GotfocusD. Change15. 以下语句Print Format $(32548.5,"000,000.00") 的输出结果是（）。
A. 32548.5B. 32,548.5C. 032,548.50D. 32,548.5016.为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。
A. 在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB. 在Drive1_Click事件中加入Dir1.Path=Drive1.DriveC. 在Dir1_Click事件中加入Drive1.Path=.Drive.PathD.在Dir1_Click事件中加入Drive1.Path=.Dir1.Path17. 把数值型数据转换为字符串型数据使用的函数是（）。
A. ValB. StrC. AscChrD. Chr18. 在VB的集成环境中创建应用程序时，除了工具箱窗口、窗体设计器、属性窗口外，必不可少的窗口是（）。
A. 立即窗口B. 代码窗口C. 窗口布局窗口D. 监视窗口19. 单选按钮不具有的属性是( )。
A. ValueB. CaptionTextC. TextD. Font20. 与Load Form2等效的语句是（）。
A. Form2. LoadB. Form2.ShowC. Form2. Visible =FalseD. Form2. Visible=True客观题_0001试卷总分：100 测试时间：240单项选择题判断题二、判断题（共 5 道试题，共20 分。
）1. 将焦点主动设置到指定的控件或窗体上应采用SetFocus方法。
A. 错误B. 正确2. 全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。
A. 错误B. 正确3. 4AB和AB都可以作为VB的变量名。
A. 错误B. 正确4. 一个工程的文件可以被其它工程文件共享。
A. 错误B. 正确5. 所谓属性是指对象的名字、大小、位置和颜色等特性。
A. 错误B. 正确客观题_0002试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。
）1. 当窗体最小化时缩小为一个图标，设置这个图标的属性是（）。
A. MouseiconB. IconC. PictureD. Mousepointer2. 键盘事件的执行顺序是（）。
A. KeyPress、KeyDown、KeyUpB. KeyDown、KeyPress、KeyUpC. KeyUp、KeyDown、KeyPressD. KeyUp、KeyPress、KeyDown3. 表达式 10+ 5 Mod 10 \ 9 / 3 的值等于（）。
A. 10B. 12C. 15D. 运算错误4. 用Dim A（-3 To 5）As Integer语句所定义的数组的元素个数是（）。
A. 6B. 7C. 8D. 95. Visual Basic程序调试过程中，逐语句调试的按键是（）。
A. F1B. F8C. F9D. F106. 下列可以用来存储图像供其他对象使用的控件是( )。
A. ToolBarB. StatursBarC. ImageListD. TreeView7. 要清除列表框的所有容，可用（）方法来实现。
A. RemoveTtemB. ClsC. ClearD. 以上均不可以8. 相对于UPD协议而言，TCP协议是一种（）。
A. 面向连接的协议B. 无连接的协议C. 计算机间不建立连接D. 适用于传送少量数据9. 假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应进行的操作是（）。
A. 单击窗体上没有控件的地方B. 单击任一个控件C. 不执行任何操作D. 双击窗体的标题栏10. 为了暂时关闭计时器，应把该计时器的某个属性设置为False ，这个属性是（）。
A. VisibleB. TimerC. EnabledD. Interval11. 一旦数据到达,将首先触发Winsock控件的（）。
A. DataArrival事件B. ConnectionRequest事件C. DataSend事件D. DataGet事件12. 将定时器的时间间隔设置为1秒，则定时器的Interval属性值应设为（）。
A. 1000B. 100C. 10D. 113.设ADOrs为Recordset对象，从“学生基本情况表”中获取所有记录的语句是（）。
A. ADOrs.Open "select * From 学生基本情况表"B. ADOrs.Execute "select * From 学生基本情况表"C. ADOrs.New "select * From 学生基本情况表"D. ADOrs.Select "select * From 学生基本情况表"14. 设a=6，则执行x=IIf（a>5，－1，0）后，x的值为（）。
A. 5B. 6C. 0D. -115. 可通过设置一普通窗体的何种属性，将它转变成MDI子窗体（）。
A. MDIChild=TrueB. WindowsState=NormalC. MDIChild=FalseD. WindowsState=Maximized16. 在“打开”对话框中设置Files.Pattern="*.bat"程序代码执行后，会显示（）。
A. 只包含扩展文件名为“*.bat”的文件B. 第一个bat文件C. 包含所有文件D. 会显示磁盘的路径17. 为了把窗体上的某个控件变为活动的，应执行的操作是（）。
A. 单击该控件的部B. 单击窗体的边框C. 双击该控件D. 双击窗体18.为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。
A. 在Dir1_Click事件中加入Dir1.Path=Drive1.DriveB. 在Drive1_Click事件中加入Dir1.Path=Drive1.DriveC. 在Dir1_Click事件中加入Drive1.Path=.Drive.PathD.在Dir1_Click事件中加入Drive1.Path=.Dir1.Path19. 下列可作为Visual Basic变量名的是( )。
A. A(A＋B)B. AlphaC. 4ABCD. AB#20. 在代码编辑器中，如果一条语句太长，无法在一行写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续。
A. 一个空格加一个下划线字符( _)B. 一个下划线字符(_)C. 直接回车D. 一个空格加一个连字符(-)客观题_0002试卷总分：100 测试时间：240单项选择题判断题二、判断题（共 5 道试题，共20 分。
）1. 假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，所使用的语句可写为： text1="Hello!"A. 错误B. 正确2. 要将命令按钮 Command1设置为不可见，应修改该命令按钮的Value属性。
A. 错误B. 正确3. 函数过程不能接收参数。
A. 错误B. 正确4. 将变量A、B、C都赋值为0，可以用赋值语句A = B = C = 0去完成。
A. 错误B. 正确5. 全局变量在整个应用程序中有效，其作用域是整个应用程序运行期间。
A. 错误B. 正确客观题_0003试卷总分：100 测试时间：240单项选择题判断题一、单项选择题（共20 道试题，共80 分。
）1. 表达式Abs(-5)+Len("ABCDE")的值是（）。
A. 5ABCDEB. -5ABCDEC. 10D. 02. VB6.0集成环境的主窗口中不包括（）。
A. 标题栏B. 菜单栏C. 状态栏D. 工具栏3. 对于窗体级变量，下列说法中错误的是（）。
A. 所在窗体的各子程序都可以访问B. 其它窗体的子程序不能访问C. 所在窗体的各子程序都不能访问用Private定义的窗体级变量D. 一定要在所在窗体的通用区定义4. 下列控件中可设置滚动条的是（）。