内容发布更新时间 : 2024/5/3 23:00:29星期一 下面是文章的全部内容请认真阅读。

VB学习与实验指导测试题

参考答案

第一章

一、选择题 1 6 11 16 1 4 A B A A 2 7 12 17 事件 视图 属性窗口 B C C B 2 5 3 8 13 18 D A C D 对象按钮 窗体编辑器 4 9 14 3 D C D 5 10 15 工程 B A C 二、填空题 第二章

一、选择题 1 6 1 4 A D 类 2 7 C A 2 5 3 C 事件 4 3 6 D 5 Name（名称） C 二、填空题 第三章

一、选择题 1 6 11 16 21 26 1 2 3 4 5 6 7 A C C A B C 2 7 12 17 22 27 A C C C D B 3 8 13 18 23 28 CD A A B A D 4 9 14 19 24 29 C D D B B B 5 10 15 20 25 A D D D C 二、填空题 (a*sin(30*3.14/180)+c*log(b))/((abs(d)+1)*(e+f))+1 mod x*y>0 and x=fix(x) and y=fix(y) y mod 4=0 and y mod 100<>0 or y mod 400=0 int(rnd*90)+10 0 “” 空格 8 (1) (3) (5) (7) (9) 9 (11) (13) (15) (17) (19) (21) (23) (1) (3) (5) (7) 10 (8) (9) (10) (11) (12) 8 abcd false I like VB 4 4 10 -10 aa 0 C 4 中国 VISUAL BASIC x<-100 or x>100 x<=y or x>=z a = 0 Xor b = 0 UCase(s) = s 6,845.30 (2) (4) (6) (8) (10) (12) (14) (16) (18) (20) (22) (24) (2) (4) (6) 1 出错（类型不匹配） 29/06/2008 4 3 4 -1 3 1 5 34.54 上海 visual basic a=int(a) and b=int(b) and a*b>0 a>0 and fix(a)<>a len(s)<10 Left(s, 1) = \instr(s,\Trim(s) = s Date() = #8/8/2008# Weekday(date) = 2 第四章

一、简单填空 1 2 3 4 5 1 2 3 4 Randomize N=int(rnd*90)+10 M=(int(rnd*91)+10)/10 Exit for Exit do 150 12 22 23 -1 5 3 0 20 40 60 二、读程序写结果 三、程序填空 1 2 3 4 5 Len(s) Mid(s,I,1) c>=”A” and c<=”Z” c>=”a” and c<=”z” c>=”0” and c<=”9” 1 2 n\\2 n mod i=0 sum+i n=sum 1000 Cstr(n) Cstr(m) Right(s2,len(s1))=s1 100 200 2 n-1 exit for count+1 cound mod 5=0 print Sum=1 A*x*x/((2*n-1)*(2*n)) Sum+a Abs(a)<=1e-7 第五章

一、选择题 1 6 11 1 2 3 B A B 120 36 10 31 7 26 14 26 2 7 12 C D D 3 8 13 C B A 4 9 A C 5 10 C A 二、读程序写结果 三、程序填空 A(I,j); Picture1.print 1 A(I,1) 1