vb课后VB after class

1、1有 5 个人坐在一起,问第 5 个人多少岁,他说比第 4 个人大 2 岁。问第 4 个人的岁数，他说比第 3 个人大 2 岁。问第 3 个人，他又说比第 2 个人大 2 岁。问第 2 个人，他说比第 1 个人大 2 岁。最后问第 1 个人，他说是 10 岁。请问第 5 个人多少岁。要求定义一求第 n 个人年龄的递归函数过程，过程名为 age，形参为 n.通过调用此过程完成功能。2定义一求 n!的递归函数过程 Fact，通过调用它完成求 1!+2!+3!+4!+5!。3M 函数定义如下： 设计一个计算 M(n)的过程 M(n)，并计算 M(30)、M(40)、M(50) 、M(60)、M(70)、M(80)、M(90) 、M(100)、。

2、代码：第四章：Page 。108 。4（1） ，分段函数：Private Sub Command1_Click()Dim x As Single, y As Singlex = Val(InputBox(“assign a number to x“, “Number x“, 0)If x = 1 Theny = 3 * x - 2Elsey = 4 * x - 12End IfPicture1.Print “when x=“; x; “then y=“; yEnd SubPrivate Sub Command2_Click()EndEnd Sub4（2）：Private Sub Command1_Click()RandomizeFor i = 1 To 100n = Int(Rnd * (99 - 10 + 1) + 10)Text1 = Text1 + CStr(n) + “ “Select Case nCase Is 70m3 = m3 + 1End SelectNext iPicture1.Print “小于等。

3、习 题一、单项选择题1、设 x=4，y=6，则以下不能在窗体上显示出“A=10” 的语句是（ ）A.PrintA=x+y B. Print“A=“；x+yC. Print“A=“+Str(x+y) D. Print“A=“b=4PRINT baEND运行后，输出的结果是 ( )A. 43 B. -1 C. 0 D. 显示出错信息4、在窗体（名称为 Form1）上画一个名称为 Text1 的文本框和一个名称为 Command1的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是（ ）A. Private Sub Text1_Change() B. Private Sub Comm。

4、习 题一、单项选择题1. 在设计阶段，当双击窗体上的某个控件时，所打开的窗体是_。A. 工程资源管路器窗口 B. 工具箱窗体 C. 代码窗体 D. 属性窗体 2. VB 中对象的含义是_。A. 封装了数据和方法的实体 B. 封装的程序 C. 具有某些特性的具体事物的抽象 D. 创建对象实例的模板 3. 窗体 Form1 的 Name 属性是 MyForm，它的单击事件过程名是_。A. MyForm_Click B. Form_Click C. Form1_Click D. Frm1_Click 4. 如果要改变窗体的标题，需要设置窗体对象的_属性。A. BackColor B. Name C. Caption D. Font 5. 若要取消窗体的最大化功能，可将其_。

5、中华 IT学习网 www.100itxx.com 官方总站：圣才学习网 www.100xuexi.com中华 IT学习网 www.100itxx.com 官方总站：圣才学习网 www.100xuexi.com第 7 章 过 程71 填空题1 一个 VB应用程序可以包括的三种模块是：（ ） 、 （ ）和（ ）模块。答案：窗体模块、标准模块、类模块2函数过程定义中至少有一个赋值语句把表达式的值赋给（ ） 。答案：函数过程名3在 VB中，过程定义中有两种传递形式的参数：一种是（ ） ，称为传值调用；另一种是（ ） ，称为传址调用。答案：传值参数、传址参数4 若模块中以关键字 public定义子过程，则在（ ）中。

6、VB 程序设计及应用课后作业说明：建议完成教材中所有的习题，并完成部分Visul Basic 程序设计实训及考试指导中的部分习题。作业 1一、选择题(1) 从功能上讲，Visual Basic 6.0 有 3 种版本，下列不属于这 3 种版本的是_。A) 学习版B) 标准版C) 专业版D) 企业版(2) 与传统的程序设计语言相比，Visual Basic 最突出的特点是_。A) 结构化程序设计B) 程序开发环境C) 事件驱动编程机制D) 程序调试技术(3) 在正确安装 Visual Basic 6.0 后，可以通过多种方式启动 Visual Basic 。以下方式中，不能启动Visual Basic 的是_。A) 通过“开始菜单”中。

7、习题 一 选择题 1 在程序中已将变量Inta Bl st和D分别定义为Integer型 Boolean型 String型和Date型 下列语句中 正确的是 A Inta 333 a22 B D 10 05 01 C st 5 abc D Bl True 2 语句Print 5 20 输出结果是 A 5 20 B 出错 C 5 20 D 100 3 下列可作为Visual Basic变量名的是 A。

8、第 1 章 Visual Basic 6.0 程序 设计概述一、判断题1 23 说 明 ： 同 类 控 件 （ 如 两 个 标 签 ） 相 互 重 叠 ， 设 计 时 可 以 设 置 “置 前 ”、 “置 后 ”属 性 。4 5 6 7 8 9 10 11 1213 14 15 16 17 18 19 20二、选择题1. C 2. B 3D 4C 5B 6A 7D 8 A 9B 10A 11C 12D三、填空题1对象、事件 2属性、方法、事件 3控件、屏幕（Screen）4对象 5Left、Top 6属性、.=7网格 8F orm19Load 或 Initialize 或 Resize 或 Activate（自动执行的先后顺序也按此排列）10Activate、Deactivate四、程序设计题程序 1界面设计参看图 10-。

9、二、选择题1. Visual Basic 中的窗体文件的扩展名是A、.reg B、.frm C、.bas D、.vbp2. Visual Basic 中的模块文件的扩展名是A、.reg B、.frm C、.bas D、.vbp3. Visual Basic 中的工程文件的扩展名是A、.reg B、.frm C、.bas D、.vbp4. 以下关于 Visual Basic 语言的说法中，正确的是A、Visual Basic 是一种面向过程的语言 B、Visual Basic 是一种面向对象语言C、Visual Basic 是一种低级语言 D、Visual Basic 是一种机器语言7. 下列不属于对象的基本特征的是A、属性 B、方法 C、事件 D、过程一、填空题2. 13/3 MOD 57 的值 除数为零提示。

10、班级： 姓名： 学号： 任课教师：王骏第 4、5、6 章 顺序结构、选择结构、循环结构程序设计1、执行下面的程序，单击窗体，则在窗体上显示的是 。 Option ExplicitPrivate Sub Form_Click()Dim a As Integer, b As Integer, c As Integerb = 6: c = 6.5a = b = cPrint aEnd Sub 2、运行下列程序，窗体上显示的结果是 。 Private Sub Form_Click()A$ = “12“: B$ = “34“C = Val(A$) + Val(B$)：D = Val(A$ + B$)Print C Mod 10; D 10：Print C + DEnd Sub3、读程序，单击窗体后，在窗体上显示的内容为 。 Private Sub Form_Click()x = 1t。

11、课后习题参考答案第 1 章 Visual Basic 6.0一、判断题15： 610： 1113：二、选择题15：ADBBB 610：.CACDB三、填空题1、 图片框和框架2、 对象3、 控件 屏幕4、 Load5、 Load Activate 四、程序设计题1、Private Sub Command1_Click()Print Text1.TextEnd SubPrivate Sub Command2_Click()EndEnd Sub2、Private Sub Command1_Click()Form1.FontSize = Form1.FontSize + 3Print “青春无悔“End SubPrivate Sub Command2_Click()FontSize = FontSize - 3Print “青春无悔“End SubPrivate Sub Command3_Click()Form1.FontBold = TruePrint 。

12、A1Private Sub Command1_Click()Label3 = Text1End SubA2Private Sub Form_Load()Timer1.Interval = 0End SubPrivate Sub Command1_Click() 自动Timer1.Interval = 200End SubPrivate Sub Command2_Click() 手动Timer1.Interval = 0Call MyMoveEnd SubPrivate Sub Timer1_Timer()Call MyMoveEnd SubSub MyMove()Label1.Move Label1.Left - 50If Label1.Left 150 Theny = 150End IfPrint yEnd SubC3Private Sub Command1_Click()Dim x!, y!, z!x = InputBox(“input x“)y = InputBox(“input y“)z = InputBox(“input z“)Print “ 。

13、习题 5一判断题1.2.3.4567.8.9.10二选择题1 B2 B3 A4 C5 D6 D7 A8 C三程序阅读题1 窗体上的显示结果：2 窗体上的显示结果：四程序填空题1. (1) I+j-1(2) 7-I(3) print2. (1) Dim STR As String(2) inputbox(STR)(3) UCase(x) = “E“五程序设计题1Private Sub Form_Click()Dim i As IntegerDim j As IntegerDim n As Integer n+1 层为杨辉三角形的层数Dim a() As Integer 定义动态数组，因为层数未定n = InputBox(“请输入一个正整数 9 ThenPrint “输入的数太大，n a(0)a(j + 1) = a(j)j = j - 1Loopa(j + 1) = a(0)Print n; Spc(8);For 。

14、1 通过文本框TextBook1舒服一个实数 单击计算按钮 在TextBook2 6中分别输出该数的相反数 平方 绝对值平方根 立方以及绝对值的立方根 需要在文本框前添加注释文本框内的数据 Public Class Form1 Private Sub Form1 Load ByVal sender As System Object ByVal e As System EventArgs Handl。

15、vb分数类和向量类之间运算程序（Arithmetic program between VB fractional class and vector class）- score class operationThe metabolic score class class modulePrivate, a, B, member variables of the fractional classPublic Function fgcd (a, b) for the common denominatorDim, C, x, yIf a 0 And b 0 Then X = Abs (a): y = Abs (b)While y 0C = x - y * Int (x / y): x = y: y = CWendFgcd = xElseIf a = 0 And B 0 ThenFgcd = Abs (b)ElseIf a 0 And B = 0 ThenFgcd = Abs (a)ElseIf, a = 0, And, B = 0, ThenFgcd = 0Else。

16、习题一一、判断题1Visual Basic 是以结构化的 Basic 语言为基础、以事件驱动作为运行机制的可视化程序设计语言。2属性是对 Visual Basic 对象性质的描述，对象的数据就保存在属性中。3在 Visual Basic 中，有一些通用的过程和函数作为方法供用户直接调用。4控件的属性值不可以在程序运行时动态地修改。5许多属性可以直接在属性表上设置、修改，并立即在屏幕上看到效果。6所谓保存工程，是指保存正在编辑的工程的窗体。7决定对象是否可见的属性是 Visible 属性，决定对象可用性的属性是 Enabled 属性。8若工程包含多个窗体或模块，则系统先。

17、上海二级 vb题目（Shanghai class two VB topics）First, the judgment question1, Visual Basic program development is characterized by object oriented event driven. (V)2, Print_Text is an illegal variable name. (x)3, the form of the AutoRedraw attributes to achieve the screen image reconstruction. (V)4, the font size should use the Font attribute (x)5, Sub can achieve the process of nested call (V)6, the three parameters in the IIF function can not be omitted. (V)7, block structure condition stateme。

18、vb课后（VB after class）Third chapters1, the input ladder top length, lower length and height, calculate the trapezoidal area and output, require the use of InputBox function input, using print method output. Private Sub Command1_Click ()Dim a As Single, B As Single, H As SingleDim s As SingleA = Val (InputBox (“please input the ladder on side“)B = Val (InputBox (“please input the ladder under the side“)H = Val (InputBox, “enter the ladder height“)S = (a + b) * H / 2Print “trapezoid area。