vb程序设计学习与实验指导答案.docx

Visual Basic程序设计学习与实验指导答案 上篇学习指导 第1章 Visual Basic概述 ■选择题 1 2 3 4 5 6 7 8 9 A B D D B B C A C 10 11 12 13 14 15 16 17 18 A A C C D C A B D 二?填空题 事件 查看对象 工程 视图属性窗口 窗体编辑器 第2章面向对象程序设计初步 选择题 1 2 3 4 5 6 7 A C A D C D A ?填空题 1. 控件 2. 事件 3. 类属性 4. 属性 5. 略 6. Name 第3章 Visual Basic语言基础 选择题 1 2 3 4 5 6 7 8 9 A A C C A C C A D 10 11 12 13 14 15 16 17 18 D C C A D D A C B 19 20 21 22 23 24 25 26 27 B D B D A B C C B 28 29 D B ?填空题 1. (a*sin(30/180*3.14)+c*(log(b)/log(10)))/((Abs(d)+1)*(e+f))+1 mod X=Int(X) And Y=Int(Y) And X*Y0 4.Y Mod 4=0 And Y Mod 1000 Or Y Mod 400=0 5.6. 5. 6. x=Int((99-10+1)*Rnd+10) 7. 空格8. 6，845.30 7. 空格 8. 6，845.30 9. 1) 8 2) 1 3) abcd 4) 出错，类型不匹配 5) False 6) 2008-6-29 7) I likeVB 8) 4 9) 4 4 10) 3 4 11) 10 -10 12) -1 13) aa 14) 3 15) 0 16) 1 17) C 18) 5 19) 8 20) 34.54 21) 中国 22) 上海 23) VISUAL BASIC 24) visual basic 10. ( 1) x-100 or x100 ( 2) a=Int(a) And b =Int(b) Or a0 And b0 ( 3) x=y or x=z ( 4) a0 And aInt(a) ( 5) a=0 xor b=0 (6)Len(S)10 (7)UCase(S)=S ( 8) Left(S,1)=”a”And Right(S,1)=”a” ( 9) Instr(S,”@”)0 (10)Trim(S)=S (11)Date=#8/8/2008# 12)Weekday(Date)=2 第 4 章 程序控制结构与算法基础 一.简单填空 Randomize N=Int((99-10+1)*Rnd+10) M=(Int((100-10+1)*Rnd+10))/10 Exit For Exit Do 二．读程序写结果 150 12 22 23 -1 5 3 0 20 40 60 三．程序填空 Len(s) Mid(s,i,1) c=”A ”And c=”Z” c=”a”And c=”z” c=”0”And c=”9” n3=n3+1 0 n-1 n Mod i=0 sum+i sum=n 1000 CStr(n) CStr(n*n) Right(s2,Len(s1))=s1 100 200 N-1 Exit For count+1 count Mod 5=0 Print sum=1 a*xA2/((2* n-1)*(2* n)) sum+a Abs(a)=0.0000001 第5章数组的应用 一 ■选择题 1 2 3 4 5 6 7 8 9 B C C A C A D B C 10 11 12 13 A B D A ■读程序写结果 1. 120 36 2. 10 31 7 3. 26 14 26 三?程序填空 1. A(i,j)； Picturel.Pri nt A(i.1) 1 A(i,j) j 第” i 行最大数是” Max Data ，第” Maxj 列 2. Textl.Text A(i); k preserve B(k) B(k)=A(i) 3. Sqr( n - m) = In t(Sqr( n - m)) ReDim Preserve B(k) n A(m) 和 B(m) 4. In t((100-50+1)*R nd+50) 1 B(i)+1 第6章过程 ?判断题 1 2 3 4 5 6 7 8 9 T T F F T T T T T 10 11 12 13 14 15 16 17 18 T F T T F T T T T 19 20 T T ■选择题 1 2 3 4 5 6 7 8 A C A A A D B A 四?读程序写结果 1. x=