VB第三章课后习题答案

合集下载

vb第三章课后习题答案

vb第三章课后习题答案

习题一、单项选择题1、设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是()A.PrintA=x+yB. Print"A=";x+yC. Print"A="+Str(x+y)D. Print"A="&x+y2、假定有如下的命令按钮(名称为Command1)事件过程:PrivateSubCommand1_Click()x=InputBox("输入:","输入整数")MsgBox"输入的数据是:”,,”输入数据:"+xEndSub程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误的是()A. x的值是数值10B. 输入对话框的标题是“输入整数”C. 信息框的标题是“输入数据:10”D. 信息框中显示的是“输入的数据是:”3、有如下程序a=3;b=4PRINT b<aEND运行后,输出的结果是( )A.4>3B.-1C.0D.显示出错信息4、在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。

程序运行以后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。

以下能实现上述操作的事件过程是()A. Private Sub Text1_Change()B. Private Sub Command1_Click()Command1.Caption=”计算机等级考试”Caption=”计算机等级考试”End Sub End SubC. Private Sub Form1_Click()D. Private Sub Command1_Click()Text1.Caption=”计算机等级考试”Text1.Text=”计算机等级考试”End Sub End Sub5、假定有如下的窗体事件过程:Private Sub Form_Click()a$ = "Microsoft Visual Basic"b$ = Right(a$, 5)c = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后单击窗体,则在弹出的信息框中的标题栏中显示的信息是()A. Microsoft VisualB. MicrosoftC. BasicD. 56、窗体上放置了三个文本框,若在Text1中输入456,在Text2中输入78,在程序中执行了语句Text3=Text1+Text2后,则在Text3中显示()A. 434B. 45678C. 溢出D. 语法错误7、执行下面的程序,单击窗体,则在窗体上显示的是()。

VB课后练习答案.doc

VB课后练习答案.doc

VB课后练习答案P12第一章课后练习答案:一、选择题二、填空题第二章(P39)选择题答案:填空题答案:1.Cmdl, Click2.Text 1.Text二"Hello"P64第三章课后练习答案一、选择题二、填空题1.(Y Mod 4=0 And Y Mod 10000) Or Y Mod 400=0 2.a<>0 And b*2-4*a*c>=0 3.X Mod 5=0 And X Mod 2=0 或 Tnt(x/5)=X/5 And Int(X/2)=X/2 4. 注意:返回的均是字符型。

第四章课后答案:P79一、选择题答案为:$$41.50010二、填空题三、程序设计题(提示)1、鸡的头数为x,兔的头数为y,则可列方程式:\x-\- y = h (兀 * 2 + y * 4 =于求得x, y 的值再在窗体上输出结果。

2、 利用Format 格式函数,再通过窗体的Print 将格式化后的信息输出到窗体上。

3、 厶员I 的周长=2加" $岡的面积=加25、通过Inputbox 函数或用文本框输入三边和圆的半径a,b,c, r,利用公式:. a + b + cn 二 ---------2 S 三角形面积=Jh (h - - b )(h - c )P97第五章课后练习答案:第9题| D一、选择题答案D 改为:30二、填空题第]题Y Mod 4二0 And Y Mod 100二0 Or Y Mod 400二0 第2题笫3题笫4题Private Sub Command l_Click()X=Val(Textl.Text)Select Case XCase Is>200. Isv-10()Print “xv 100 Or x>200"Case ls<=0Y=l()()-XCase Isv二100Y=100+XCase Is<=200Y=400End SelectText2.Text=yEnd Sub三、程序设计题(提示)1、判断条件:假设一个整数为xX Mod 3=0 Or x Mod 5=0 或x/3=x\3 Or x/5=x\52、选项按钮的知识点在P182,利用该控件的Wlue属性判断是否选中该项。

vb课后思考题答案

vb课后思考题答案

第三章思考题答案及相关内容 1.Visual Basic 提供了哪些标准数据类型?声明类型时,其类型关键字分别是什么?其类型符又是什么? 表 1.3.1 Visual Basic 的数据类型 数据类型 字节型 逻辑型 整型 长整型 单精度型 关键字 Byte Boolean Integer Long Single 类型符 无 无 % & ! 前缀 byt bin int lng sng 占字节数 1 2 2 4 4 0~255 True 与 False -32768 到 32767 -2,147,483,648~2,147,483,647 负数:-3.402823E38~-1.401298E-45 正数: 1.401298E-45~3.402823E38 双精度型 Double # dbl 8 负数:-1.79769313486232D308~ -4.94065645841247D-324 正数:4.94065645841247D-324~ 1.79769313486232D308 货币型 Currency @ cur 8 -922,337,203,685,477.5808~922,337, 203,685,477.5807 日期型 字符型 对象型 变体型 Date(time) String Object Variant 无 $ 无 无 dtm str obj vnt 8 字符串长有关 4 根据需要分配 01,01,100~12,31,9999 0~65535 个字符 任何对象引用 范 围2.哪种数据类型需要的内存容量最少,且可存储诸如 3.2345 这样的值? 答:单精度数据类型。

3.在 Form1 窗体通用声明部分声明的变量,可否在 Form2 窗体中的过程被访问? 4.为了使某变量在所有的窗体中都能使用,应在何处声明该变量? 5.在同一模块、不同过程中声明的相同变量名,两者是否表示同一个变量?有没有联系? 表 1.3.22 作用范围 不同作用范围的 2 种过程定义及调用规则 模 窗体 过程名前加 Private 例:Private Sub Mysubl(形参表) 能 能 块 级 标准模块 窗体 过程名前加 Public 或缺省 例:[Public] Sub My2(形参表) 能 能,但必须在过程 不能 不能 Call 窗 体 能 能,但过程名必须唯一, 例 :Call 标 准 模 块 全 局 级 标准模块定义方式 能否被本模块 其他过程调用 能否被本应用 程序其他模块 调用名前加窗体名, 例: 否 则 要 加 标 准 模 块 名 , 名.My2(实参表) 名.My2(实参表)局部变量:指在过程内用 dim 语句声明的变量(或不加声明直接使用的变量),只能在本过程中使用的变量,别的过程不可访问。

VB第3章习题答案

VB第3章习题答案

三、编程题--5
MsgBox "显示重试和取消按钮", 5 + 64 + 256, "消息框“ 或者 MsgBox "显示重试和取消按钮", 325, "消息框“ 或者 MsgBox "显示重试和取消按钮", vbRetryCancel + vbInformation + vbDefaultButton2, "消息框"
第三章习题答案
一. 选择题 • 1—5: C • 6—10: A • 11—13:A
A A D B C B A C C D
二. 填空题
• • • • • • • • • 1. 工程 2. 设计 运行 3. 系统 用户 4. True 5. Text 6. True 7. Command1.Enabled=True 8. Default 9. Prompt 10. 先后顺序 11. 紧凑格式
三、编程题--4
• • • • • • • Private Sub Command1_Click() Dim n1!, n2!, n3! n1 = Val(InputBox("输入n1:")) n2 = Val(InputBox("输入n2:")) n3 = Val(InputBox("输入n3:")) Label1.Caption = (n1 + n2 + n3) / 3 End Sub
三、编程题--1
Private Sub Command1_Click() • Print "Visual Basic容易学吗?" • End Sub
• Private Sub Command2_Click() • Print "用心学就容易!&• • • • • • • • • • Private Sub Command1_Click() Dim yw!, sx!, yy! pj!, fc! yw = Val(InputBox("输入语文成绩")) sx = Val(InputBox("输入数学成绩")) yy = Val(InputBox("输入英语成绩")) pj = (yw+ sx+yy) / 3 fc = (yw-pj)^2 + (sx-pj)^2 + (yy-pj)^2 Print "平均成绩:", pj Print "方差:", fc End Sub

VB程序设计课后习题答案

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教程课后习题的答案及解析

=第二章标准控件和属性1.下列可以激活属性窗口的操作是( D )A)用鼠标双击窗体的任何部位 B)执行‘工程’菜单中的‘属性窗口’命令 C)按Ctrl+F4键 D)按F4键2.确定一个控件在窗体上的位置的属性是( D )A)Width或Height B)Width和Height C)Top或Left D)Top和Left3.确定一个窗体或控件的大小的属性是( B )A)Width或Height B)Width和Height C)Top或Left D)Top和Left4.在Visual Basic中,所有标准控件都具有的属性是( B )。

【2013年9月考试真题】A) Caption B) Name C) Text D) Value参考答案:B【解析】VB标准控件中不同控件具有不同属性,有的相同有的不同,但都具有Name属性。

故选B。

5.为了让计时器控件每隔10秒产生了一个Timer事件,应把Interval属性设置为( B )A) 1000 B) 10000 C) 10 D) 1006.下面关于单选按钮和复选框的叙述中正确的是( D )A) 单选按钮被选中则它的Value属性为True;复选框被选中则它的Value属性为2B) 单选按钮被选中则它的Value属性为True;复选框被选中则它的Value属性为TrueC) 单选按钮被选中则它的Value属性为1;复选框被选中则它的Value属性为1D) 单选按钮被选中则它的Value属性为True;复选框被选中则它的Value属性为17.将文本框的ScrollBar设置为2,文本框中却没有垂直滚动条,其原因为( B )A) 文本框的Locked属性值为True B) 文本框的MultiLine属性值为FalseC) 文本框的MultiLine属性值为True D) 文本框中没有内容第三章简单程序设计语句1.在面向对象的程序设计中,可被对象识别的动作称为( B )。

VB-课本标准答案

VB-课本标准答案

VB-课本答案————————————————————————————————作者:————————————————————————————————日期:第三部分习题与解答第1章程序设计语言与程序设计1.1填空题1.VB是以(事件驱动)作为运行机制的新一代可视化程序设计语言。

2.程序设计语言是(人)与(计算机)交流的工具。

3.若从机器执行的角度来对程序设计语言进行分类,则可以分为(低级语言)和(高级语言)两种。

4.计算机系统中,对高级语言的翻译工具称为(编译)程序或(解释)程序。

5.源程序中的错误一般分为(编译)错误、(运行)错误和(逻辑)错误等三种。

6.VB把一个应用程序称为一个(工程),它包含各种文件。

1.2 选择题1.把a和b的乘积写成ab的错误属于(c )错误。

a) 编译b) 运行c) 逻辑d) 编译和运行2.用户在什么时候都可以按(b )键来查看与当前进行的工作相关的帮助。

a) Held b) F1 c) ESC d) F104 窗体文件的扩展名为(d )。

a) .vbp b) .bas c) .exe d) .frm4.指示一个窗体位置的值是窗体的(c )。

a) 对象b) 事件c) 属性d) 方法5.下面选项中不能运行VB程序的操作是(a )。

a) 双击窗体b) 单击“启动”按钮图标c) 从菜单栏运行菜单中选“全编译执行”菜单命令d) 按F5键1.3 问答题1.低级语言和高级语言的各自特点是什么?答:参见教材1.1。

2.什么是数据描述和数据处理?答:参见教材1.2。

3.源程序的翻译方式有哪两种,简述它们的工作过程。

答:参见教材1.1。

4.一个好程序的基本要求是什么?答:参见教材1.2。

5.Visual BASIC 集成开发环境的主窗口由哪些部分构成?各自的主要功能是什么?答:参见教材1.3。

6.简述在VB的环境下,对象、属性、方法、事件和事件驱动程序的概念,并用例子进行说明。

答:在VB的环境下,对象是系统中的基本运行实体,它封装了数据和操作。

vb课后习题答案

vb课后习题答案
第一章: 一:选择题 1-5 CCCCA 6-10 CBACA 11 A 二:填空题 1: 视图 工具箱 2: 对象 事件驱动 3: 代码 窗体设计器 4: 属性 方法 事件 5: 对象的特征 6: 一个对象可执行的动作 7: 属性窗口 赋值语句 三:简答题 1:略 2:略 四:编程题 【属性窗口设置】 Caption 这是我的第一个练习 【代码窗口设置】 Private Sub Form_Click() Print "我可以用Visual Basic语言编写程序了!" End Sub 第二章: 一:选择题 1-5: BDDCA 6-10: CBADD 11-15: DDBDB 16-20: DBCDC 21-23: CCD 二:填空题 1: Value 2: 下拉列表框 3: Scroll 4: LargeChange 5: ASCII码 6: Enabled 7: ListCount 8: PopupMenu 9: Alt 10:复选 11:CommonDialog1.ShowColor 或者: ShowColor 12:Flags 13: 1 14:- 15:GFED 第三章 一:选择题 1-5: ADADC 6-10: BCBDB 11-15:BBCBB 16-20:DCADA 21-25:ABCBB 26-30:DBBCB 31-34:BBDD 二:填空题 1: Right(CStr(x),1) & Left(CStr(x),1) 2: x Mod 5=0 Or x Mod 9=0 3: False 4: CDEF 5: s>="A" And s<="Z" Or s>="a" And s<="z" 6: x>=0 And x<100 7: Int(Rnd*(X-

vb书本习题参考答案

vb书本习题参考答案

参考答案第1章概述二.选择题:1.C2. B.3.C.4.C.5.A6.C7.D8.B9.B 10.B11.A12.C 13.D 14.C 15.D16.A17.C 18.A19.A20.D 21.B三.填空题:1.面向对象,事件驱动2.编译,解释3.设计,运行,中断4.F55.调试6.切换文件夹四.编程及上机调试:1.略2.Sub Form_Click( )Label1.Caption = “你单击了窗体”End SubSub Form_DblClick( )Label1.Caption = “你双击了窗体”End Sub第2章面向对象编程基础二.选择题:1.C2. C.3.B.4.B.5.D6.D7.B8.B9.C 10.D11.B 12.B 13.B 14.C 15.A16.B 17.B 18.B 19.C 20.B三.填空题:1.窗体,控件2.属性,事件,方法mand2_click4.picture5.中部,代码四.编程及上机调试:1.Private Sub Command1_Click()Form1.WindowState = 2End SubPrivate Sub Command2_Click()Form1.WindowState = 0End SubPrivate Sub Command3_Click()Form1.WindowState = 1End Sub2.Private Sub Command1_Click()Form1.Picture = LoadPicture("d:\picture\flower.wmf")Command1.V isible = FalseCommand2.V isible = FalseEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_DblClick()Form1.Picture = LoadPicture("")Command1.V isible = TrueCommand2.V isible = TrueEnd Sub第3章常用标准控件二.选择题:1.C2. B3.C.4.D5.B6.B7.A8.C9.B 10.C11.C 12.A13.C 14.B 15.D16.D 17.C 18.A19.D 20.A21.B三.编程及上机调试:1.Private Sub Check1_Click()If Check1.V alue = 1 ThenText1.FontBold = TrueElseText1.FontBold = FalseEnd IfEnd SubPrivate Sub Check2_Click()If Check2.V alue = 1 ThenText1.FontItalic = TrueElseText1.FontItalic = FalseEnd IfEnd SubPrivate Sub Check3_Click()If Check1.V alue = 1 ThenText1.FontUnderline = TrueElseText1.FontUnderline = FalseEnd IfEnd SubPrivate Sub Command1_Click()Text1.Text = " "End Sub2.Private Sub Command1_Click()Text2.Text = List1.ListCountEnd SubPrivate Sub Command2_Click()List1.AddItem Text1.TextText1.Text = " "End SubPrivate Sub Command3_Click()Dim i As Integeri = List1.ListIndexList1.RemoveItem iCommand3.Enabled = FalseText1.SetFocusText2.Text = List1.ListCountEnd SubPrivate Sub Form_Load()Command3.Enabled = FalseEnd SubPrivate Sub List1_Click()Command3.Enabled = TrueEnd Sub第4章VB语言基础二.选择题:1.A2. D3.D.4.A5.A6.A7.C8.D9.C 10.B11.A 12.D 13.C 14.A15.A16.C 17.D 18.A19.B 20.D21.C 22.A23.B 24.C 25.C三.编程及上机调试:1.Private Sub Form_Load()Dim x As Integer, s As String, d As IntegerRandomizex = Int(Rnd * 9000 + 1000)s = Trim(CStr(x))d = V al(Right(s, 1) + Mid(s, 3, 1) + Mid(s, 2, 1) + Left(s, 1))ShowPrint "产生的数;"; x; "倒序数"; dEnd Sub2.Private Sub Form_KeyPress(KeyAscii As Integer)Print "输入字符:"; Chr(KeyAscii), "ASCII码为:"; KeyAsciiEnd SubPrivate Sub Form_DblClick()ClsEnd Sub3.Private Sub Form_Click()MsgBox "在这里显示提示" & vbCrLf & "提示信息", 2 + 16, "请确认"End Sub或Private Sub Form_Click()MsgBox "在这里显示提示" + Chr(13) + "提示信息", vbAbortRetryIgnore _ + vbCritical, "请确认"End Sub第5章程序控制结构二.单选题1.D2. C3.C.4.D.5.B6.C7.A8.A9.D 10.C11.C 12.C 13.B 14.B四.编程及上机调试1. Private Sub Form_Click()Dim x As Integer, y As Integerx = InputBox("请输入一个数值")If x > 20 Theny = x ^ 2 + 3 * x + 2ElseIf x >= 10 Theny = Sqr(3 * x) - 2ElseIf x > 0 Theny = 1 / x + Abs(x)End IfPrint "x="; x, "y="; yEnd Sub(2)Select Case实现:Private Sub Form_Click()Dim x As Integer, y As Integerx = InputBox("请输入一个数值")Select Case xCase Is > 20y = x ^ 2 + 3 * x + 2Case Is >=10y = Sqr(3 * x) - 2Case Is > 0y = 1 / x + Abs(x)End SelectPrint "x="; x, "y="; yEnd Sub2.Private Sub Form_Click()Dim a As Integer, b As Integer, c As IntegerFor i = 100 To 999a = i \ 100b = (i - a * 100) \ 10c = i Mod 10If a ^ 3 + b ^ 3 + c ^ 3 = i ThenPrint i;k = k + 1If k Mod 2 = 0 Then PrintEnd IfNext iEnd Sub3.Private Sub Command1_Click()p = 60: r = 0.014Dop = p * (1 + r)n = n + 1Loop Until p >= 70Print n; "年后世界人口达到"; p; "亿"End Sub4.Private Sub Command1_Click()Dim s As Single, x As Integer, t As Single, n As Integer x = V al(InputBox("请输入x的值", , 2))s = 1n = 1m = 1Don = n + 1m = -mt = m * n / x ^ (n - 1)If Abs(t) < 0.00001 Then Exit Dos = s + tLoop Print s End Sub。

VB第三章课后习题答案(20210110133743)

VB第三章课后习题答案(20210110133743)

、单项选择题1、设x=4,y=6,则以下不能在窗体上显示出“ A=10得语句就是()A、PrintA=x+yB、Print"A=";x+yC、Prin t"A="+Str(x+y)D、Prin t"A=" &x+y2、假定有如下得命令按钮(名称为mand1)事件过程:PrivateSubma nd1_Click()x=lnputBox("输入:","输入整数")MsgBox"输入得数据就是:”,输入数据:"+xEndSub程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误得就是()A、x得值就是数值10B、输入对话框得标题就是输入整数”C、信息框得标题就是输入数据:10 ”D、信息框中显示得就是输入得数据就是:”3、有如下程序a=3;b=4PRINT b v aEND运行后,输出得结果就是A、4> 3( )B、-1C、0D、显示出错信息4、在窗体(名称为Form1)上画一个名称为Text1得文本框与一个名称为mand1得命令按钮,然后编写一个事件过程。

程序运行以后,如果在文本框中输入一个字符,则把命令按钮得标题设置为“计算机等级考试”。

以下能实现上述操作得事件过程就是A、Private Sub Text1_Cha nge()B、Private Sub man d1_Click()mand1、Caption= ”计算机等级考试”Capti on= ”计算机等级考试”End Sub End SubC、Private Sub Form1_Click() D 、Private Sub mand1_Click()Text1 、Caption= ”计算机等级考试”Text1 、Text= ”计算机等级考试”End Sub End Sub5、假定有如下得窗体事件过程:Private Sub Form_Click()a$ = "Microsoft Visual Basic"b$ = Right(a$, 5)c = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后单击窗体,则在弹出得信息框中得标题栏中显示得信息就是( )A、Microsoft Visual B 、Microsoft C、Basic D 、56、窗体上放置了三个文本框,若在Text1 中输入456,在Text2 中输入78,在程序中执行了语句Text3=Text1+Text2 后,则在Text3 中显示( )A、434 B 、45678 C、溢出D、语法错误7、执行下面得程序,单击窗体,则在窗体上显示得就是( )。

VB教材课后习题答案

VB教材课后习题答案

VB教材课后习题答案教材课后习题答案第1章一、选择题1 B 第2章一、选择题1 B 11 A二、填空题1. rem或’_ :2. “” # #3. 5x2-3x-2sinA/34. 3214565. 300 三、操作题1、程序段:Private Sub Command1_Click() Dim x As Integer, y As Integer Dim s As Long, c As Long x = Text1.Text y = Text2.Texts = x * yc = (x + y) * 2Label3.Caption = \长方形的面积为\+ Str(s) Label4.Caption = \长方形的周长为\+ Str(c) End Sub3、程序段:Private Sub Command1_Click() Text1.Text = \第一\End SubPrivate Sub Command2_Click() Text1.Text = \第二\End Sub4、程序代码:Private Sub Text1_Change() Text1.MaxLength = 10 End Sub 5、程序代码:12 D3 B4 C5 B6 B7 D 2 C 12 B 3 B 13 A 4 C 14 A 5 B 6 C 7 A8 A9 A 10A Private Sub Text1_Click()Text1.SelStart = 0Text1.SelLength = Len(Text1.Text) End Sub第3章一、选择题1 2 D A 二、填空题1. False2. B -4*a*c else 三、操作题1.从键盘输入三个值,判断它们能否构成三角形的三个边。

如果能构成一个三角形,则计算三角形的面积。

Dim a As Integer, b As Long, c As Long, s As Single, p As Single a = Val(InputBox(\请输入一个值:\b = Val(InputBox(\请输入一个值:\c = Val(InputBox(\请输入一个值:\ If (a + b > c And a + c > b And b + c > a) Then p = (a + b + c) / 2s = Sqr(p * (p - a) * (p - b) * (p - c))Print a k = k + 1s = s + iIf k Mod 10 = 0 Then Print End If NextPrintPrint \~300间总共有\个素数,\和值为\运行结果:58.我国现有人口为13亿。

VB 课后习题参考答案

VB 课后习题参考答案

第1章 习题参考答案一、思考题 略二、选择题1. C2. B第2章 习题参考答案一、判断题二、填空题1. 窗体font2. 不能在代码中设置 3. selstart 4. Locked5. TabIndex 、 0 6. vbModal 或 17. Activate 、 Deactivate 8.PictureBox 和 Frame -三、选择题第3章 习题参考答案一、思考题1、double2、 xyC@abc , 15eyd , Is , #END X8[P]3、变量有 (1) (4) (6) (8),常量有 (2)字符串型 (3)逻辑型 (5)字符串型 (7)字符串型 (9)日期型 (10)实型 4、 fe d cb a++5、 (1) 26 (2) 3.75 (3) 36、写出下列Visual Basic 表达式的值:(1) False (2) True (3) True (4) False (5) True(6) True (7) False (8) False7、将下列命题用Visual Basic布尔表达式表示:(1) z>x and z>y (2) abs(a)<=abs(b+2) or a > b+2(3) p mod q=0 (4) x<-5 or x>-2 and x<2 or x>5(5) x<z and y>z or x>z and y<z (6) a<b and a mod 2=08、写出下列函数的值:(1) -4 (2) 换行符(3) –3 (4) -1 (5) hello(6) ello (7) 16 (8) “-459.65” (9) 5二、填空题1.整型、长整型、双精度型、双精度型2.(X mod 10)*10+X\103.sin(1/4*3.14)+sqr(x+2*exp(y))/abs(x-y)4.(a+b)/(c*d-sqr(1-a^2))5.x mod 5=0 or x mod 9=06.False7.-3 、 2 、-2 、 28.CDEF9.x>0 and y>0 or x<0 and y<0 或x*y>010.s>=”A” and s<=”Z” or s>=”a” and s<=”z”三、选择题四、编程题1、Private Sub Form_Click()Dim x%, Ten%, hundred%x = Val(Text1.Text)Ten = (x \ 10) Mod 10hundred = x \ 100Print "百位数是: " & hundredPrint "十位数是: " & TenEnd Sub2Private Sub Form_Click()Dim char As String * 1Form1.CurrentX = Rnd * Form1.ScaleWidthForm1.CurrentY = Rnd * Form1.ScaleHeightchar = Chr(Int(Rnd * 16) + 65)Print charEnd Sub第4章习题参考答案一、判断题二、选择题三、程序阅读写出下列各段程序执行后的输出结果。

VB1-3章_习题答案(课本习题)

VB1-3章_习题答案(课本习题)

VB习题答案(1-3章)习题一一、选择题1.C 2.C 3.A 4.C 5.C 6.C 7.B二、填空题1.学习版、专业版、企业版2.窗体界面3.Alt+F4三、简答题1.简述Visual Basic语言的特点。

Visual Basic是Windows操作平台下的可视化编程语言,它继承和发展了BASIC语言的基本功能,具有简单易学、功能强大等特点。

Visual Basic提供了可视化设计工具,以图形用户界面(GUI)为PC机用户提供了一个直观的工作环境。

支持面向对象的程序设计(OOP),采用事件驱动方式,提供对象的链接与嵌入(OLE)和访问数据库等功能。

2. Visual Basic 6.0的集成开发环境由哪些部分组成,各部分的主要功能是什么?1. 标题栏:用来显示打开的工程名称和系统的工作状态。

2. 菜单栏:菜单栏中包括“文件”、“编辑”、“视图”、“工程”、“格式”、“调试”、“运行”、“查询”、“图表”、“工具”、“外接程序”、“窗口”和“帮助”共有13个菜单项。

这是一组下拉式菜单,提供了设计、编辑、编译和调试应用程序所需要的绝大部分功能和命令。

3. 工具栏: Visual Basic 6.0提供了“编辑”、“标准”、“窗体编辑器”和“调试”4种工具栏。

工具栏上形象直观的排列着一些最常用的命令按钮,对应特定的常用操作命令。

4. 控件箱:控件箱提供了一组控件。

设计界面时,用户可以用鼠标双击控件箱中的控件,在窗体中画出该控件,或用鼠标单击控件箱中的控件,然后在窗体中拖动鼠标画出所需的控件。

5. 窗体设计器:窗体设计器是应用程序最终面向用户的窗口。

各种控件、图形、数据以及程序的运行结果都在窗体设计器窗体中显示出来。

6. 工程资源管理器:在工程资源管理器窗口中(图1-2),列出了应用程序的工程以及工程中的窗体和模块。

7. 属性窗口:属性窗口主要用来设置Visual Basic窗体及各控件的属性特征,属性窗口的主体部分分为左右两列,左边是控件的属性名列表,右边是控件的属性值列表。

VB作业第三章习题答案

VB作业第三章习题答案

本文由goodlak贡献 亲亲资料网第3章程序流程控制3.1 填空题 1.设变量r 表示圆的半径,则计算圆的面积并赋给变量s使用的赋值语句为( s=3.14159*r*r )。

2 .给命令按钮Command2 的 Caption 属性赋予字符串“退出”使用的赋值语句为( Command2.Caption="退出")。

3.为了求n 的阶乘,要求用户输入n的值。

程序使用InputBox函数输入,要求对话框提示信息为“请输入一个求阶乘的数:”,标题为“求数的阶乘”,并且正确地把输入的信息转换为数值存放到变量n中,则使用的赋值语句为( n=val(InputBox("请输入一个求阶乘的数:","求数的阶乘"))。

4.如果使用MsgBox对话框显示提示信息“退出本系统?”,并显示“是(Yes)”和“否(No)”两个按钮,显示图标“?”号,指定第一个按钮为默认值以及标题为“提示信息”,则调用MsgBox 函数的形式为( MsgBox("退出本系统? ",4+32+0,"提示信息"))。

5.如果使用MsgBox对话框显示提示信息“文件未找到!”,并显示“确定”按钮、图标“!”号和标题“文件查找”,则使用的MsgBox语句为( MsgBox"文件未找到",0+48+0,"文件查找")。

6.要在当前窗体Form和立即窗口输出字符串“Visual BASIC 6.0”使用的Print方法分别是( Print “Visual BASIC 6.0” )和( Debug.Print “Visual BASIC 6.0” )。

7.使用Print方法时,若用逗号分隔,则按( 标准 )格式输出各表达式的值,若用分号分隔,则按( 紧凑 )格式输出各表达式的值。

8.注释语句是一个(非执行)语句,VB不对它们进行编译,对程序的执行结果没有任何影响。

9.判别变量i是否为偶数,若为偶数就把它显示出来。

使用单行结构条件语句为( If i Mod 2=0 Then print x )。

VB课本习题答案第三章

VB课本习题答案第三章

第3章程序流程控制3.1 填空题1.设变量r 表示圆的半径,则计算圆的面积并赋给变量s使用的赋值语句为( s=3。

14159*r*r )。

2.给命令按钮Command2的Caption属性赋予字符串“退出"使用的赋值语句为( Command2.Caption="退出").3.为了求n的阶乘,要求用户输入n的值。

程序使用InputBox函数输入,要求对话框提示信息为“请输入一个求阶乘的数:”,标题为“求数的阶乘”,并且正确地把输入的信息转换为数值存放到变量n中,则使用的赋值语句为( n=val(InputBox("请输入一个求阶乘的数:","求数的阶乘"))。

4.如果使用MsgBox对话框显示提示信息“退出本系统?",并显示“是(Yes)”和“否(No)”两个按钮,显示图标“?”号,指定第一个按钮为默认值以及标题为“提示信息”,则调用MsgBox 函数的形式为( MsgBox("退出本系统?",4+32+0,"提示信息") )。

5.如果使用MsgBox对话框显示提示信息“文件未找到!",并显示“确定”按钮、图标“!”号和标题“文件查找”,则使用的MsgBox语句为( MsgBox"文件未找到",0+48+0,"文件查找" )。

6.要在当前窗体Form和立即窗口输出字符串“Visual BASIC 6.0"使用的Print方法分别是( Print “Visual BASIC 6.0” )和( Debug.Print “Visual BASIC 6.0”)。

7.使用Print方法时,若用逗号分隔, 则按(标准)格式输出各表达式的值,若用分号分隔,则按(紧凑)格式输出各表达式的值。

8.注释语句是一个(非执行 )语句,VB不对它们进行编译,对程序的执行结果没有任何影响。

9.判别变量i是否为偶数,若为偶数就把它显示出来。

使用单行结构条件语句为( If i Mod 2=0 Then print x )。

VB第三章课后习题答案

VB第三章课后习题答案

习题一、单项选择题1、设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句就是( )A、PrintA=x+yB、Print"A=";x+yC、Print"A="+Str(x+y)D、Print"A="&x+y2、假定有如下的命令按钮(名称为Command1)事件过程:PrivateSubCommand1_Click()x=InputBox("输入:","输入整数")MsgBox"输入的数据就是:”,,”输入数据:"+xEndSub程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误的就是( )A、x的值就是数值10B、输入对话框的标题就是“输入整数”C、信息框的标题就是“输入数据:10”D、信息框中显示的就是“输入的数据就是:”3、有如下程序a=3;b=4PRINT b<aEND运行后,输出的结果就是( )A、4>3B、-1C、0D、显示出错信息4、在窗体(名称为Form1)上画一个名称为Text1的文本框与一个名称为Command1的命令按钮,然后编写一个事件过程。

程序运行以后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。

以下能实现上述操作的事件过程就是( )A、Private Sub Text1_Change()B、Private Sub Command1_Click()Command1、Caption=”计算机等级考试”Caption=”计算机等级考试”End Sub End SubC、Private Sub Form1_Click()D、Private Sub Command1_Click()Text1、Caption=”计算机等级考试”Text1、Text=”计算机等级考试”End Sub End Sub5、假定有如下的窗体事件过程:Private Sub Form_Click()a$ = "Microsoft Visual Basic"b$ = Right(a$, 5)c = Mid(a$, 1, 9)MsgBox a$, 34, b$, c$, 5End Sub程序运行后单击窗体,则在弹出的信息框中的标题栏中显示的信息就是( )A、Microsoft VisualB、MicrosoftC、BasicD、56、窗体上放置了三个文本框,若在Text1中输入456,在Text2中输入78,在程序中执行了语句Text3=Text1+Text2后,则在Text3中显示( )A、434B、45678C、溢出D、语法错误7、执行下面的程序,单击窗体,则在窗体上显示的就是( )。

VB程序设计课后习题答案

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第二、三章习题答案

第一章课后习题一、选择题1. VB 6.0 集成开发环境中不能完成的功能是 .(A) 输入编辑源程序 (B)编译生成可执行程序(C) 调试运行程序 (D)自动查找并改正程序中的错误2.VB 6.0是一种面向的编程环境。

(A)机器(B)对象(C)过程(D)应用3.下列关于VB编程的说法中,不正确的是。

(A)属性是描述对象特征的数据(B)事件是能被对象识别的动作(C)方法提示对象的行为(D)VB程序采用的运行机制是面向对象4.在VB中最基本的对象是,它是应用程序的基石,是其他控件的容器。

(A)文本框(B)命令按钮(C)窗体(D)标签5.有程序代码如下:Text1.text="Welcome use VB"则Text1、Text、"Welcome use VB"分别代表。

(A)对象、值、属性(B)对象、方法、属性(C)对象、属性、值(D)属性、对象、值6. 对于窗体,下面______属性在程序运行时其属性设置起作用。

(A)MaxButton (B)BorderStyle (C)Name (D)Left7. 类是对象的抽象,对象则是类的具体化。

在窗体上建立的一个控件称为______。

(A)对象(B)容器(C)实体(D)类8. 若要使标签控件显示时不覆盖其背景内容,要对______属性进行设置。

(A)BackColor (B)BorderStyle(C)ForeColor (D)BackStyle9. 用一个程序段对一对象被单击(或双击)作出响应,从而实现指定的操作,称为______。

(A)可视画化程序设计(B)事件驱动编程机制(C)过程化程序实际方法(D)非过程化程序设计语言10. 文本框没有______属性。

(A)Enabled (B)Visible (C)BackColor(D)Caption11. 不论何控件,共同具有的是______属性。

(A)Text (B)Name (C)ForeColor (D)Caption12. 要使Form1窗体的标题栏显示"欢迎使用VB",以下______语句是正确的。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

习题
一、单项选择题
1、设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是()
A.PrintA=x+y
B. Print"A=";x+y
C. Print"A="+Str(x+y)
D. Print"A="&x+y
2、假定有如下的命令按钮(名称为Command1)事件过程:
PrivateSubCommand1_Click()
x=InputBox("输入:","输入整数")
MsgBox"输入的数据是:”,,”输入数据:"+x
EndSub
程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误的是()
A. x的值是数值10
B. 输入对话框的标题是“输入整数”
C. 信息框的标题是“输入数据:10”
D. 信息框中显示的是“输入的数据是:”
3、有如下程序
a=3;b=4
PRINT b<a
END
运行后,输出的结果是( )
A. 4>3
B. -1
C. 0
D. 显示出错信息
4、在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1
的命令按钮,然后编写一个事件过程。

程序运行以后,如果在文本框中输入一个字
符,则把命令按钮的标题设置为“计算机等级考试”。

以下能实现上述操作的事件
过程是()
A. Private Sub Text1_Change()
B. Private Sub Command1_Click()
Command1.Caption=”计算机等级考试”Caption=”计算机等级考试”
End Sub End Sub
C. Private Sub Form1_Click()
D. Private Sub Command1_Click()
Text1.Caption=”计算机等级考试”Text1.Text=”计算机等级考试”
End Sub End Sub
5、假定有如下的窗体事件过程:
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后单击窗体,则在弹出的信息框中的标题栏中显示的信息是()
A. Microsoft Visual
B. Microsoft
C. Basic
D. 5
6、窗体上放置了三个文本框,若在Text1中输入456,在Text2中输入78,在程序中
执行了语句Text3=Text1+Text2后,则在Text3中显示()
A. 434
B. 45678
C. 溢出
D. 语法错误
7、执行下面的程序,单击窗体,则在窗体上显示的是()。

Option Explicit
Private Sub Form_Click()
Dim a As Integer, b As Integer, c As Integer
b = 6:
c = 6.5
a =
b = c
Print a
End Sub
A. 1
B. -1
C. 0
D. 语法错误
说明: False-→0 True→-1
8、语句PRINT “INT(-13.2)=”;INT(-13.2)的输出结果为:
A. INT(-13.2)= -13.2
B. INT(-13.2)= 13.2
C. INT(-13.2)= -13
D. INT(-13.2)= -14
二、填空题
1、在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a = InputBox("请输入一个整数")
b = InputBox("请输入一个整数")
Print a + b
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入321和456,输出结果为321456 。

2、执行下面的程序段后,b的值为300 。

a=300
b=20
a=a+b
b=a-b
a=a-b
3、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1.Print "VB Programming"
End Sub
程序运行后,单击窗体,在文本框中显示的内容是VB程序设计,而在图片框中显示的内容是VB Programming。

4、在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,则在窗体上显示的内容是123456 。

5、如果在立即窗口中执行以下操作:
a = 8 <CR>(<CR>是回车键,下同)
b = 9 <CR>
Print a > b <CR>
则输出结果是___False__。

6、在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、
Label3的标签,然后编写如下代码:
Private Sub Command1_Click()
Static y As Integer
Dim z As Integer
n = 10
z = n + z
y = y + z
x = x + z
Label1.Caption = x
Label2.Caption = y
Label3.Caption = z
End Sub
运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是_30 30 10。

7、若在一个应用程序窗体上,依次创建了CommandButton、TextBox、Label等控件,
则运行该程序显示窗体时,CommandButton会首先获得焦点。

8、在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a$="VisualBasic"
Print String(3,a$)
End Sub
程序运行后,单击命令按钮,在窗体上显示的内容是____VVV___。

9、输入下列程序
Private Sub Command1_Click( )
Text1.Text=”努力”
End Sub
Private Sub Command2_Click( )
Text1.Text=”学习”
End Sub
单击Command2按钮,又单击Command1按钮,在文本框中显示___努力____。

10、要使Print方法在Form_Load( )事件过程中有效,必须将_窗体的Visible
_属性设置为True,或者使用_窗体的Show__方法。

三、问答题
1、简要回答vb中赋值语句的使用要点。

2、简要分析MsgBox函数与InputBox函数有何区别,?
3、InputBox函数和Text文本框有何异同?
4、Print方法中可以使用“,”和“;”,简述它们的作用和差别。

5、简述标签的作用。

相关文档
最新文档