习题第一章程序与编程环境一、填空题1 . 理，F o r m Lo a d 2.事 件 （ 触发） 3. 楚，锤4. Cu r r e n t X . Cu r r e m Y 5. m a x Bu t t o n , Bo r d e r S t y l e = 1 o r 3 o r 4 o r 56. A l i g n m e n t , 空缺, 空缺 7. S t y l e , Lo a d Pi c t u r e 8 . Li n e , S h a p e9.重画 10. F i l l S t y l e . m a x Le n g t h 、 Lo c k e d 12.空缺13. s u b , 对象名, 事件名 14. 方法, Ob i e c t .Me t h o d . t e x t l .s e t f o c u s O15. Na m e , m i n Bu t t o m , Cu r r e n t X （ Y ） , Ca p l i o n16. I n t e r v a l , En a b l e 17. t i m e r , I n t e r v a l , m s （ 毫秒）18 . Mo u s e Do w n , Cl i c k , Lo a s t F o c u s19. .F r m , .F r x , .b a s . c i s . Vb p 20. R e m , R e m 语句二、简 答 题 (略 )第二章数据的类型、表示以及运算一、 请指出下列哪些是V B 的合法常量，并说明原因( 1 ) V (2) X 常量不能加类型说明符号改成123.4 (3) X与上题类似，如果是常量，则类型说明符放在后面 (4) J 等价于2E3 (5) V (6) V等 于 十 进 制 的 4113(7)X如果是16进制要写&符 号 (8 ) X指数不能为小数 (9) X 月 份 超 过 1 2 , 日超过31 (10) V (11) V (12) V等价于上一题 (13)X 8 进制数每一位不能超过8 (14) V (15) X变量，常量要为基本数据类型的值 (16) 4二、找出合法变量(1) V (2) V如果与控件La b e l l 同在一个应用程序里面，该变量会屏蔽掉控件La b e l 1(3) X保留字 (4) V (5) X变 量 不 能 以 数 字 开 头 ( 6 ) 变量不能有小数点(7) V (8 ) V数组变量 ( 9 ) X 保留字 (10) V可以，但 r n d ()不可以，r n d ()是 函 数 (11) V (12) V (13) V (14) X ' 符号表示注释 (15)X 这是表达式，不是变量 (16) X同上，是表达式三、指出下列数据x ,y ,z 的声明是否正确，如果正确请指明其类型(1) V x —l o n g , y - v a r i a n t , z — i n t e g e r(2) - J x —l o n g , y —l o n g , z —i n t e g e r(3) V x —d o u b l e , y —d o u b l e , z — i n t e g e r(4) X变量x &中间不能有空格(5) V自动转换成字符串(6) X变量声明不能直接赋值(7) V(8 ) V自动转换成字符串(9) X常量不能把函数写上去(10) V 四、 写出下列表达式的结果(1) 1 (2) 1 (3) f a l s e (4) a b l 2 (5) 123 (6)出错，加法表达式中如果有一个是数值类型，则 “ +”表示加号，而不是字符的链接符号 (7) F a l s e (8 )t r u e (9)t r u e (10) f a l s e 默认转换成相同类型(数值)，建议这里把2 改成D 试试(P. S .布尔类型 TR UE = -1, F A LS E = 0;优先顺序： '(乘方)今-(求负)今*、/ > \ (整除)今MOD今+、-)五、写出下列函数的结果(1) 3 (2) 2 (3) -2 (4) 0 (5) 2 (6) 23 (7) 23 (8 ) 1 (9) 1 (10)21日期差分函数，参 数 “ m ”为两年月份之差六、写出满足以下条件的表达式(1 ) f i x (r n d ()*90)+1 0 (2 )c h r (f i x (r n d ()*2 6)+65) (3) (A m o d 1 00)\ 1 0(4) A m o d B OO (5)A> “ A” a n d A< “ Z" (6) A< B OR A< C (7)A> C AN D B > C(8) (A> C AN D B < C) OR (A< C AN D B > C) (9) A+B > C AN D B +OA AN D C+A> B(1 0)A= "及格" X OR B = "及格” (l l )Ro u n d (A/B ,2 )(1 2 ) Le n (A)< > 0 或 Le n (A) > 0(1 3) "A1 0? ”(1 4) Le n (A)> = 3七、填空题1 . “ ” ， # # 2 . x > = 1 0 a n d x 〈 2 04. s i n (x )-2 + (l /2 )*s q r (x ~ 2 -y ~ 2 )6. T , F 7. S IN (AT N ⑴ )3. (y m o d 3= 0) o r (y m o d 1 = 0)5. 1 68. Ra n d o m i z e9. (c > c h r (97) a n d c < c h r (1 2 2 )) o r (c 〈 c h r (48) a n d c > c h r (57))1 0. v b Cr Lf 1 1 . CIn t O, 01 2 .从 第 1 2 个月开始，循环一年1 2 个月1 3. a b , c d O1 5. N o w ()1 4. V a r i a n t , S t r i n g , In t e g e r1 6. D a t e D i f (#2 01 1 -5T #, n o \ v (), " m " )八、请指明下列程序运行后，各个变量的值(1 ) 3 5(2 ) 1 2 0(3) Fa l s e(4) -3九、 分析下面程序中的错误并修改，使其能够完成指定的功能(1 ) Pr i n t 2 0000+0&+2 0000或 Pr i n t 2 0000&+2 0000&⑵改 1 ：A=xA= a+aB=xB = 2 *b 改 2：A=a+x+xB=2*(x+b)十 .简 答 题 (略 )第三章程序界面与基本输入输出一、填空题1. Textbox、 Inputbox, Label, Textbox, Msgbox, Print2. 二 ， M , CurrentX, CurrentY3. Print4. AutoSize. Stretch5. Textbox, Label, Textbox, True6. Textl='"', Picture 1.cis7. Integer, String8. Textbox, Check , Option, Combo, List9. .selFocus, 失 去焦点10. Min, Max, Scroll, Change11. Tabindex12. Enabled, Visible二、简 答 题 （ 略）三、编程题(略)第四章控制结构一、判断题1. X2. X3. V4. X 循环体中改变其值5. V二、填空题1 . 姬，婕，侬2. “A " ， "E”,chr(97), "A"to "Z", Is>0, Else3 . 死循环4 . 设置计数器5. True/False, 0/16. 0, ListCount-1 三、读程序填空1. 8 8 及格2. Print x; "是偶数”Print x; “ 是奇数”3. i= Instr (st,righKsl, len(sl)-i)I = InstHst. "The”)Leftist, i-1) & right®, len(st)-i-3)不用填任何东西(这里是旧版书的过程返回)4. 4 <0 “ 无定义”0 to 1 (log(x)/log(2))八 2Is >1 sqr(log(x)/log(2))5. 40J76.Abs(x2-xl)<0.000017. while m onPrint m (或 n)四、编 程 题 (略 )第五章数组和自定义类型一、简答题1 . Option Base 1 ,只能取 0 或 12 .很多情况3 .动态数组可重定义， 静态数组不可以：动态数组可以用变量， 静态数组不可以用变里4 .不能，Preserve关键字保留数组原有的内容，但是只能够改变数组的最后一维5 .将用引号分隔的字符串塞进数组；UBound(), LBound()在不确定数组上下界情况下可使用或写出的程序更通用6 . 8 字节7 . 6 个元素；[0,2] [3,4]8 .这里较为特殊的是List框的Text属性，就是List框所选的内容9 .组合框= 文本框+列表框；组合框可以输入，列表框不可以；组合框无多选，列表框可以10 .自定义类型还没有在内存中分配变量，而自定义变量则是在内存中分配了变量。
P84) 5.6二、指出下列有关数组语句的错误1 . Dim a%(10)或 Dim a(10) as Integer2 .下界溢出，边界顺序颠倒3 .多维数组立面的每一维上界不能为负数4 . Option Base 15 .静态数组，下标不能是常量6 .动态数组重定义只能与声明时的类型相同 7 .动态数组没有重定义就直接使用8 .静态数组不可以重定义9 .动态数组用Preserve关键字重定义，只能改变数组的最后一维的大小10 . 用 Array赋值，只能是动态数组11 .数组a 的类型为字符串，应改为：a$（ ）12 . 数组重1 开始，越界三、写出下面程序的输出结果（ 1） 输出： 14916253649（ 2） 输出：1 2 32 3 13 2 3（ 3） 输出：6 12（ 4） 输出：25（ 5） 输出：1 2 34 69（ 6） 输出：21四、程序填空( 1 ) ① Rnd()*90+10 ②⑵ ① Rnd()*90+10 ②( 3 ) ① 39 to 1 step-1 ②( 4 ) ① Preserve a(n+l)( 5 ) ① 10 ②( 6 ) ① A(i,j) ②i+1 to 30 ③ a⑴=a6 @ Imod2<>0arr(i)>50 ③ sum+arr(i)1 to 40 (3) mod② a(i+l)=a(i) ③ a(i+l)=m10③ a((i-l)*10+j)A(5-i+l,5-j+l) ③ A(5-i+l,5-j+l) = temp五、编 程 题 （ 略）第 六 章 过 程一、简答题1 .函数有返回值，过程没有 2 .形参为定义函数( 过程) 时的参数；实参为运行函数( 过程) 时的实际参数3 . ByVai创建副本,ByRef不创建副本4 .数组只能传地址5 .局部、模块级、全局6 .静态：生命周期是全局的局部变量，生命周期比普通周部变量要长二、指出下列有关过程声明语句的错误1. X将保留字Sub作为函数名。
改正：Function subl%()2. X生命重复，参数名与函数名一样，编译器分不清哪个是参数，哪个是函数返回值改正：Function f%(para%)3. X过程不应该有返回值改正：Sub f()4. X数组必须为按地址传递，过程不应该有返回值改正：Sub f(a%())5. 数组参数必须传首地址改正：Sub f(a%())三、写出单击命令按钮后下面程序运行结果1 .输出：2 342 .输出：2533 .输出：A=4 b=6 c=6A=8 b=6 c=64 .输出：357455.输出：3 12 36.输出：2 4 6 8四、程序填空1. ① flag = -1 ② y + flag * t ③ t <= 0.0000001 ④ n as Integer ⑤n, x-12. ① n\2 ® b(n-i+l) ③ a(), 103. ① IsP = True② m mod i = 0 ③ Pl and P2 ④ IsP(i)(P .S .这里漏了一段程序IsP ( )函数)Public Function IsP(m%) as BooleanDimi%IsP = TrueFor I =2 to Int(sqr(m))If m mod 1 = 0 Then IsP = FalseNext iEnd Function4. ① Tag ② t = a(O) ③ UBound(A)-l @ a(j) = t ⑤ t = A ( U B o u n d ( A ) )⑥ L B o u n d ( A ) +1 s t e p- I ⑦ = t五 . 编 程 题 （ 略）第七章外存数据的访问一、填空题( 1 ) O u t pu t( 2 ) 打开 t e x t . t x t读入内存( 3 ) O pe n " c : \ t e s t . d o c “ f o r I n pu t a s # 1O pe n ' ' c : \ t e s t . d o c “ f o r A ppe n d a s # 1( 4 ) O pe n f r & " \ " & " t e s t . t x t " f o r I n pu t a s # 1( 5 ) F r e e F i l e O( 6 ) C l o s e , K i l l , F i l e C o py( 7 ) K i l l “ c : \ * . b a t ”( 8 ) F i l e C o py " C : \ F o r m l . f r m ” , “ C : \复件 F o r m l . f r m ”( 9 ) " " ( 无) ，“ J二、读程序填空( 1 )① T e x t : “ E n d ”② W r i t e # 1 , T e x t ( 带格式) 或 P r i n t # 1 , T e x t ( 不带格式)(2)① k < 5② s = s + i n pu t ( l , # l )③s( 3 )① f o r I n pu t a s # 1② I n pu t ( L o f ( l ) , # l )③ C l o s e # 1④ f o r O u t pu t a s # 1⑤ P r i n t # 1 , “ B e g i n ”⑥ P r i n t # l , s三、简答题（ 1 ） 顺序读写、随机读写（ 2） 对应文件（ 外存）的一个缓冲区（ 内存）句柄，读写文件入口，不可省略（ 3 ） W irte有格式，P rint无格式（ 4） 可以（ 5 ）用Close关闭文件，将缓冲区数据写入文件第八章对话框与菜单的设计一、填空题1 .空缺,空缺,空缺 2 . CommonDia log3 . ShowOpe n, ShowSa ve , ShowColor, ShowFont, ShowP rint, ShowHe lp4 . 5 . 5 6 . Hid e , Unloa d7 . ShowMod e l 8 . ShowColor二、判断题1 . V 2 . X 3 . X 4 . X 5 . 、 /三、读程序填空1.① showSa ve② CommonDia log 1 . File na me ③ now（ ） , Common Dialog 1 .Filename2 .① “ 窗体文件l* .frmlVB工程文件l* .vbp”② 13 . ① Form2.Textl ② Unload Form2四、简 答 题 （ 略）第 九 章 绘 图一、填空题1. ScaleHeight, ScaleWidth2. DrawWidth3. B ,F4. 300, 520二、判断题1. V 2. J 3. X 4. V 5. V 6. V 7. J三、简 答 题 （ 略）四、编 程 题 （ 略） 。