VB程序设计答案
VB程序设计答案 第一章 习题参考答案
一、 填空题
1、对象 事件驱动
2、编译运行模式 解释运行模式
二、 简答题
1、 简述VB的特点。
答:?可视化的程序设计方法
?面向对象的程序设计思想
?事件驱动的编程机制
?结构化的程序设计语言
?高度的可扩充性
?强大的数据库访问能力
?支持动态数据交换
?支持对象链接与嵌入
2、简述VB的安装过程。
答:?向光驱中放入VB安装光盘;
?计算机将运行自动安装程序,若没有,执行VB目录下的Setup.exe;
?根据提示逐一回答问题,并点击“下一步”;
?点击“完成”;
2、 如何启动VB。
答:三种方法:
?单击“开始”按钮,选择“程序”菜单下的“Microsoft Visual Basic 6.0 中
文版”菜单项并单击;
?双击桌面上的VB6.0快捷图标;
?在“开始”菜单的运行对话框中输入命令来启动VB;
第二章 习题参考答案
一、选择题:
1-10、 DCACD BCBBC
11-20、BADCA BBAAB
21-29、AACBB CDDC
二、填空题
1( 窗体、控件
2( 属性值
3( 属性窗口设置、代码窗口设置
4( 事件过程
5( 对象名、下划线、事件名
6( Form_Click
第三章 习题参考答案
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
一、选择题
1、B 2、C 3、A 4、B 5、A 6、C 7、C
二、填空题
1、 11
字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。String、Byte、Integer、Long、Single、Double、Currency、Boolean
Date、Object、Variant 、
2、 双引号(英文)、#
3、 ASCII、1、2
4、 public、通用、Dim、Static、Private、Static
5、 &、+、+
6、 Now()、Time、日期型
三、解答题
1、(3) 2、(1 )
3、(1)常量(关键字) (2)字符型常量 (3)逻辑型常量 (4)变量 (5)字符串常量 (6)变量
(7)字符串常量 (8)变量 (9)日期型常量 (题目应是#11/16/1999#) (10)数值型常量(单精度)
4、31
5、(1)(1+y/x)/(1-y/x) (2)x^3+3*x*y/(2-y)
)sqr(abs(a*b-c^3)) (4)sqr(s*(s-a)*(s-b)*(s-c)) (3
6、
7、(1)13 (2)17
(3)#1999-11-12# (4)zxy123ABC
8、(1)19 (2)8.16666666666667
(3)5(25 (4)2
9、(1)-4 (2)2 . 82842712474619 (3)-3 (4)49 (5)”hello” (6)He
7)16 (8) “-459.65” (9)5
10、(4)
11、(2)
12、(4)
第四章 习题参考答案
一、选择题:
1—7: DAABBCD
二、填空题
1( 500.00%
2( 将字号扩大为原来的二倍
3( B
三、编程题(略)
1(文本框、标签和命令按钮的名称分别为text1、label1、command1
Private Sub Command1_Click()
Label1.caption=text1.text
Command1.caption=text1.text air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
End Sub
2(单价、数量、折扣和应付款对应的文本框的名称分别为:text1、text2、text3和text4,计算和清除命令按钮的名称分别为:command1和command2。
Private Sub Command1_Click()
Text4=val(text1)*val(text2)*val(text3)
End Sub
Private Sub Command2_Click()
Text1=”” : Text2=””: Text3=””: Text4=””
End Sub
3(文本框、“转大写”命令按钮和“转大写”命令按钮的名称分别为text1、command1和command2
Private Sub Command1_Click()
Text1=Ucase(text1)
End Sub
Private Sub Command2_Click()
Text1=Lcase(text1)
End Sub
第五章 习题参考答案
一、选择题:
1—11: CAABBABBBCC
二、填空题
1((3) 2( 1 2 3 3(2 2 3 4(160 5(9
6(78 7(x<=5 (或x<6 或 x<7) 8(B
9(iSum iSum+j 1250
三、编程题
1(Private Sub Form_Click()
Dim i%,s%
S=0
For i = 101 To 200 step 2
If i mod 3<>0 then
Print i
S=s+i
End If
Next i
Print s
End Sub
2(Private Sub Form_Click()
Dim n%,s&
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
S=1:n=0
While s<=400000
N=n+1
S=s*n
Wend
If s>400000 Then n=n-1
Print n
End Sub
3(Private Sub Form_Click()
Dim imin%,imax%,i%,R%
Imin=100:imax=20
For i=1 to 20
R=Int(Rnd*51+50)
If R>imax Then imax=R
If R
Max)
三、编程题
1(Private Sub C1_click()
If OP1(0).Value=True Then P1.Print “选择了椭圆形”
If OP1(1).Value=True Then P1.Print “选择了圆形”
If OP1(2).Value=True Then P1.Print “选择了正方形”
End Sub
2(统计按钮名为Command1,输入框名为text1,输出框为text2(MultLine设为True)
Private Sub Command1_click()
Dim X(1 to 26) AS Integer,I As Integer
Dim S As String,L As Integer
L=Len(Text1.text)
For i=1 To L
S=Mid(Text1,I,1)
S=Ucase(S)
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
If S >= "A" And S <= "Z" Then
x(Asc(S) - 65 + 1) = x(Asc(S) - 65 + 1) + 1
End If
Next i
For i=1 To L
Text2=text2 & Chr(64+i) & “=” & x(i) & “ “
If I Mod 7=0 then Text2=text2 & chr(13)+chr(10)
Next i
End Sub
3(设学生成绩的平均分已在Mark(1)至Mark(10)中,学生姓名在name(1)至name(10)中。
Private Sub Command1_click()
Dim I%,J%,T%,S$
For i=1 To 9
For j=i+1 To 10
If Mark(i)Y Then
F1=X
Else
F1=Y
End If
End Function
7(
Function GDBH(ByVal x%) As String
Dim i%
For i = 3 To x - 3 Step 2
If isp(i) And isp(x - i) Then
GDBH = i & "+" & (x - i) & "=" & x
Exit Function
End If
Next
End Function
Function isp(y%) As Boolean
i = 2: k = Int(y / 2)
Do While i <= k
If y Mod i = 0 Then Exit Do
i = i + 1
Loop
If i > k Then
isp = True
Else
isp = False
End If
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
End Function
Private Sub Form_Click()
For i = 6 To 40 Step 2
Print GDBH(i)
Next i
End Sub
8(Function isQO(ByVal x As Integer) As String
If x Mod 2 =0 Then
isQO=”偶数”
Else
isQO=”奇数”
End If
End Function
9(Function F1(ByVal x As Integer) As Boolean
If x Mod 17 =0 and x Mod 37 =0Then
F1=True
Else
F1=False
End If
End Function
Private Sub Form_Click()
For i = 1000 To 2000
If F1(i) Then
Print i
End if
Next i
End Sub
10(Sub F1(a() As Integer, ByVal L1 As Integer, ByVal L2 As
Integer)
Dim L%, U%, x%, i%
L = LBound(a): U = UBound(a)
If L1 > U Or L2 > U Then
Print "位置输入错误~"
Exit Sub
End If
If L1 > L2 Then
x = a(L1)
For i = L1 To L2 + 1 Step -1
a(i) = a(i - 1) air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
Next i
a(L2) = x
ElseIf L2 > L1 Then
x = a(L1)
For i = L1 To L2 - 1
a(i) = a(i + 1)
Next i
a(L2) = x
End If
End Sub
第九章 习题参考答案
一、选择题:
1—3: ADD
二、填空题
1(下拉式 弹出式 2(PopupMenu
3(Visible Enabled 4(-
三、编程题(略)
第十章 习题参考答案
一、选择题:
1—3: DBD
二、填空题
1(Load 2(窗体模块 模块 类模块
3(DoEvents
三、编程题
1((略)
2(Function F(ByVal x&,ByVal Y&) As Integer
Dim t&,r&
If x0
X=y
Y=r
R= x Mod y
Loop
F=y
End Function
Private Sub Command1_Click()
Text3 = Val(Text1) / F(Val(Text1), Val(Text2))
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
Text4 = Val(Text2) / F(Val(Text1), Val(Text2))
End Sub
第十一章 习题参考答案
一、选择题:
1—3: DDA
二、填空题
6 2(AB A
三、编程题
1(Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x
As Single, Y As Single)
Text1 = x: Text2 = Y
End Sub
2(
Dim startX, StartY As Integer ‘在通用中申明
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, x As
Single, Y As Single)
If Button = 2 Then
startX = x: StartY = Y
End If
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As
Single, Y As Single)
If Button = 1 Then
PSet (x, Y), RGB(0, 0, 0)
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, x As
Single, Y As Single)
If Button = 2 Then
Dim r%, c%
Dim EndX, EndY As Integer
EndX = x: EndY = Y
c = RGB(0, 0, 0)
r = Sqr((EndX - startX) ^ 2 + (EndY - StartY) ^ 2)
Form1.Circle (startX, StartY), r, c
End If
End Sub
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
第十二章 习题参考答案
一、选择题:
1—8: BBABBCCA
9(I H F C L G E B A J K D
二、填空题
1(Drive 2(Path Print Dir1.Path
(Path 4(Hidden system 3
5(顺序文件 随机文件 二进制文件
6(FreeFile
7(Close #1
8(Open “c:\samples\readme.txt” For Output AS #3
9(Open “c:\autoexec.bat” For Intput AS #4
10(Open “c:\samples\xscj.dat” For Random AS #3 Len=54
11(Open “smtext1.txt” For Binary AS #1
12(For Input Eof(1)
13(KeyAscii END(或者End end eNd enD) Text1.text
三、编程题
1(‘在标准模块中定义
Type stu
ID As String * 12
name As String * 8
z1 As String * 12
z2 As String * 12
sex As String * 2
jc As Boolean
scool As String * 20
sx As Integer
yw As Integer
yy As Integer
wl As Integer
zf As Integer
End Type
Dim p As stu ‘在通用中定义
Private Sub CmdAppend_Click()
p.ID = Text1
p.name = Text2
p.z1 = Text3
p.z2 = Text4
p.scool = Text5
If Option1.Value = True Then p.sex = "男"
If Option2.Value = True Then p.sex = "女"
If Check1.Value = 1 Then p.jc = True Else p.jc = False
p.sx = Val(Text6) : p.yw = Val(Text7) air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
p.yy = Val(Text8) : p.wl = Val(Text9)
p.zf = Val(Text10)
Put #1, , p
End Sub
Private Sub CmdDisplay_Click()
Get #1, Val(txtRecord_No), p
Text1 = p.ID : Text2 = p.name
Text3 = p.z1 : Text4 = p.z2
Text5 = p.scool
If p.sex = "男" Then Option1.Value = True Else Option2.Value = True
If p.jc = True Then Check1.Value = 1 Else Check1.Value = 0
Text6 = p.sx : Text7 = p.yw
Text8 = p.yy : Text9 = p.wl
Text10 = p.zf
End Sub
Private Sub Command3_Click()
Text1 = "" : Text2 = ""
Text3 = "" : Text4 = ""
Text5 = "" : Text6 = ""
Text7 = "" : Text8 = ""
Text9 = "" : Text10 = ""
End Sub
Private Sub Form_Load()
Open App.Path & "\stu.dat" For Random As #1 Len = Len(p)
End Sub
Private Sub Form_Unload(Cancel As Integer)
Close #1
End Sub
Private Sub Text10_GotFocus()
Text10 = Val(Text6) + Val(Text7) + Val(Text8) + Val(Text9)
End Sub
2.3.4.
Private Type books
id As String * 10
name As String * 8
sex As String * 2
math As Integer
eng As Integer
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
ele As Integer
End Type
‘成绩输入
Private Sub Command1_Click()
Dim b As books
Open "c:\stu.dat" For Append As #1
b.id = InputBox("请输入学号")
b.name = InputBox("请输入姓名")
b.sex = InputBox("请输入性别")
b.math = InputBox("请输入数学成绩")
b.eng = InputBox("请输入英语成绩")
b.ele = InputBox("请输入电子成绩")
Write #1, b.id, b.name, b.sex, b.math, b.eng, b.ele
Close #1
End Sub
‘不及格人员输出
Private Sub Command2_Click()
Dim a, b, c
Open "c:\stuo.dat" For Input As #1
While Not EOF(1)
Input #1, a, b, c
If c = "数学" Then List1.AddItem b
If c = "英语" Then List2.AddItem b
If c = "电子" Then List3.AddItem b
Wend
Close #1
End Sub
‘将不及格人选出存入stuo.dat
Private Sub Command3_Click()
Dim a, b, c, d, e, f
Dim k%
Open "c:\stu.dat" For Input As #1
Open "c:\stuo.dat" For Output As #2
While Not EOF(1)
Input #1, a, b, c, d, e, f
If d < 60 Then Write #2, a, b, "数学"
If e < 60 Then Write #2, a, b, "英语"
If f < 60 Then Write #2, a, b, "电子"
Wend
Close #1
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,
Close #2
End Sub
air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,air, keep house air fresh, cooling, moisture, reduce the body temperature of the chicken, which is a measure of the chicken house the first element of the environment. (1) the parameters: ventilation in summer peak demand calculations, 4~5 cubic metres per kilogram of body weight per hour, harmful gas concentration does not exceed 20ppm ammonia, hydrogen sulfide, l0ppm, co 0.15%. (2) ventilation natural ventilation and mechanical ... 5. thermal insulation roof cold season is the region of greatest heat loss, are also hot towel sunlight than any other region, so the roof insulation is the most important region, followed by the walls, if open sheds to make doors and Windows switches freely, and seal well. On most of the walls and roof insulation must be taken or equivalent devices, thermal insulation materials require higher thermal resistance, good thermal insulation properties, and thicken the North wall must also be taken of thickness and measures such as roof and ceiling canopy. In places with more rain, due the eaves of roofs on both sides extending outward. Pheasants (pheasants) farm building (a) site choose pheasant fields should be selected gaozao terrain, sand texture, well drained, slightly to the South of terrain. Mountain areas should be selected under the sunny, spacious, ventilation, sunshine, where the drainage is good. Pheasant farms should be built in a quiet, safe place, away from residential areas, factories, the main traffic artery, but taking into account feed, transportation problems. A clean water source, water is not contaminated. To have a reliable power supply, not only to maintain normal lighting,