VB程序设计题
序号问题参考
答案
题型
1输出1~100中所有整数的平方和。32835
基本
2求1~210之间所有整数的立方和并输出结果。49084
4025
基本
3求1~55的平方根的和。（保留小数点两位）275.4
3
基本
4求S=1+1/2+1/3+……+1/100。 5.187
388
基本
5计算y=1+2/3+3/5+4/7+…+n/(2*n-1)的值, n=50, 要求：按四舍五入
的方式精确到小数点后第二位。
26.47 基本
6当m的值为50时，计算下列公式之值: t=1+1/2^2+1/3^2+…+1/m^2
(按四舍五入的方式精确到小数点后第四位)。
1.625
1
基本
第1/22 页
7当m的值为50时，计算下列公式之值：
t=1-1/(2*2)-1/(3*3)-…-1/(m*m) 要求：按四舍五入的方式精确到小
数点后第四位。
0.374
9
基本
8当n=50时，求下列级数和：S=1/（1*2）+1/（2*3）+…+1/(n*(n+1))
要求：按四舍五入的方式精确到小数点后第四位。
0.980
4
基本
9求Y=1-1/2+1/3-1/4+1/5... 前30项之和。要求：按四舍五入的方式
精确到小数点后第二位。
0.68 基本
10求数学式1-1/2+1/3-1/4+1/5-1/6+…+1/99-1/100的值。（按四舍五
入方式精确到小数点后4位）
0.688
2
基本
11根据以下公式pi/2=1+1/3+1/3*2/5+1/3*2/5*3/7+1/3*2/5*3/7*4/9+…
求pi(pi为圆周率)的值（保留6位小数）。当最后一项的值小于0.0005
时停止计算。
3.140
578
基本
12求10的阶乘。36288
00
基本
第2/22 页
13当n的值为25时，计算下列公式的值: s=1+1/1!+1/2!+1/3!+…+1/n!
要求：按四舍五入的方式精确到小数点后第四位。
2.718
3
基本
14计算s=2!+4!+6!+8!。41066 基本
15求1～200之间能被7整除的数的平方和。37798
6
基本
16计算1000以内，既能被6整除又能被8整除的数的个数。41 基本17求1到400间，同时能被3和7整除的数的个数。19 基本18求[351,432]之间既不能被3整除，又不能被8整除的数的个数。47 基本
19求[10,1000]之间满足除以7余5、除以5余3、除以3余1的所有整
数的个数。
9 基本
20求200到500间，能被13整除但不能被17整除的数的个数。21 基本21求3000以内能被17或23整除的正整数的个数。299 基本
22求500以内（含500）能被5或9整除的所有自然数的倒数之和。
按四舍五入的方式精确到小数点后第二位。
1.48 基本
第3/22 页
23求s=1+3+5+7+...直到s>3000为止。3025 基本
24求1到5000之间的能被5整除的前若干个偶数之和，直到和大于
500为止。
550 基本
25求[1,5000]内能被5整除的前若干个偶数之和，直到和大于50000
为止。
50500 基本
26求出1到7000之间的能被5整除的前若干个偶数之和，当和值大
于500时退出并输出和值。
550 基本
27求数列2,4,8,16,32,…前若干项之和。当和大于9000时，终止求和
并输出结果。
16382 基本
28求在1,2,3,...,100中, 任选两个不同的数,要求它们的和能被3和7
整除的数的对数(注意:3+5和5+3认为是同一对数)。
236 基本
29算年龄。用爷爷的年龄的5倍加6得的和，再乘以20，再加上奶奶
的年龄，再减去365，得数为6924，又知爷爷比奶奶大2岁。求爷
爷、奶奶的年龄的和。
140 基本
第4/22 页
30宴会上一共有1225次握手，设每一位参加宴会的人对其他与会人
士都有一样的礼节，那么与会人士有多少？
50 基本
31已知S=1+1/(1+2)+1/(1+2+3)+…+1/(1+2+3+…+N) ，当N的值为50
时，求S的值。要求：按四舍五入的方式精确到小数点后第四位。
1.960
8
基本
32已知S1=1, S2=1+2, S3=1+2+3,..., SN=1+2+3+...+N, 求
S1,S2,S3,...,S100 中, 有多少个能被3和7整除？
18 基本
33已知S1=1, S2=1+2, S3=1+2+3,...,SN=1+2+3+...+N, 求在
S1,S2,S3,...,S100 中,所有能被3和7整除的数之和.
31500 基本
34已知Sn=A1+A2+A3+...+An, 其中,当n为奇数时An=n-1,当n为偶数
时,An=n+1.例如:S6=0+3+2+5+4+7, 求：S60=A1+A2+A3+...+A60.
1830 基本
35sum=d+dd+ddd+……+ddd..d(d为1-9的数字)。例如：3+33+333+3333
（此时d=3,n=4）。从键盘上输入d 的值为8，n的值为9，求sum
的值。
86419
7523
基本
36求字符串"87IM&2345kjwdssdcf"中数，字母字符的ASCII码之和。1113 基本
第5/22 页
37求字符串“This is my Basic”所有字符的ASCII码之和。1436 基本
38求一正整数等差数列的前六项的和，该数列前四项之和是26，四项
之积是880。
57
等差数
列
39求一正整数等差数列的前六项的平方和，该数列的前四项之和是
26、之积是880。
699
等差数
列
40我国今年的国民生产总值为45600亿元,若今后每年以9%的增长率
增长,计算多少年后能实现国民生产总值翻一番?
9 递推
41猴吃桃：有一天小猴子摘下了若干个桃子，当即吃掉一半，还觉得
不过瘾，又多吃了一个。第二天接着吃了剩下的桃子中的一半，仍
不过瘾，又多吃了一个。以后每天都是吃尚存桃子的一半零一个。
到第10天早上小猴子再去吃桃子时，看到只剩下一个桃子了。问
小猴子第一天共摘下了多少个桃子。
1534 递推
42猴子第1天摘下若干桃子，当即吃掉一半，又多吃一个，第二天将
剩余的部分吃掉一半还多一个；以此类推，到第10天只剩余1个。
3070 递推
第6/22 页
问第1天共摘了多少桃子。
43计算Y=X/1!-X^3/3!+X^5/5!-X^7/7!+……前20项的值(已知：X=2)。
要求：按四舍五入的方式精确到小数点后第二位。
0.91 递推
44求表达式e^x≈1＋x＋x^2/2!+x^3/3!+x^4/4!……+x^n/n!的近似值，
设x=9,n＝25；
8103.
059
递推
45求表达式e^x≈1＋x＋x^2/2!+x^3/3!+x^4/4!……+x^n/n!的近似值，
直到最后一项小于0.01为止；设x＝9
8103.
081
递推
46用cos(x)≈1－x^2/2!+x^4/4!-……+(-1)^(n)*(x^(2n))/(2n)!的公式求
近似值，设x＝9，n＝15
-0.911
208
递推
47用cos(x)≈1－x^2/2!+x^4/4!-……+(-1)^(n)*(x^(2n))/(2n)!的公式求
近似值，直到最后一项绝对值小于0.00001为止。设x＝7。
0.753
895
递推
48用sin(x)≈x－x^3/3!+x^5/5!-……+(-1)^(n-1)*(x^(2n-1))/(2n-1)!的公
式求近似值。设x=7,n＝15。
0.656
9831
递推
49求S=1/2+2/3+3/5+5/8+……的前30项的和（注：该级数从第二项开18.46 递推
第7/22 页
始，其分子是前一项的分母，其分母是前一项的分子与分母的和）。要求：按四舍五入的方式精确到小数点后第二位。
50求数列：2/1，3/2，5/3，8/5，13/8，21/13，…… 前50项之和(注：
此数列从第二项开始，其分子是前一项的分子与分母之和，其分母
是前一项的分子)。（按四舍五入的方式精确到小数点后第二位）
83.24 递推
51求数列2/1，3/2，5/3，13/8，……的前10项之和。16.47
991
递推
52已知：f(0)=f(1)=1 f(2)=0 f(n)=f(n-1)-2*f(n-2)+f(n-3) ( n>2 )
求f(0)到f(50)的所有51个值中的最大值。
59832
5
递推
53已知：f(0)=f(1)=1 f(2)=0 f(n)=f(n-1)-2*f(n-2)+f(n-3) (n>2)
求f(0)到f(50)中的最小值。
-2889
59
递推
54已知一个数列的前3个数为1，2，3，以后每个数为前3个数的和，
编程序求此数列的第35项。
95043
9251
递推
55金星和地球在某一时刻相对于太阳处于某一确定位置，已知金星绕16425 公倍数
第8/22 页
太阳一周为225日，地球绕太阳一周为365日，问两个行星至少经过多少日仍同时回到原来的位置上？
56士兵在演练过程中，队伍变换成10、21、35、60行时，队形都能
成为矩形。问参加演练的士兵最少有多少人？
420 公倍数
57求27090，21672，11352，8127的最大公约数。129 公约数
58从键盘输入两个数51211314和84131421，利用辗转相除法求它们
的最大公约数。求需要经过多少次辗转。
18 公约数
59已知数组S(x)中数组元素的值与Cos（x）一一对应，100= 用比较法对数组进行从小到大的排序，并求出排完序之后S（150） 的值。 -0.049 排序 60已知数组S(x)中数组元素的值与Sin（x）一一对应，100= 用比较法对数组进行从小到大的排序，并求出排完序之后S（150） 的值。 -0.044 排序 61自然数对是指两个自然数的和与差都是平方数，如8和17的和509 平方 第9/22 页 8+17=25与其差17-8=9都是平方数，则称8和17是自然数对（8，17）。假定（A，B）与（B，A）是同一个自然数对且假定A>=B，求所有小于或等于100（即：A<=100,B<=100，A<>B,A和B均不为0）的自然数对中A-B之差的和。 62自然数对是指两个自然数的和与差都是平方数，如8和17的和 8+17=25与其差17-8=9都是平方数，则称8和17是自然数对（8， 17）。假定（A，B）与（B，A）是同一个自然数对且假定A>=B， 求所有小于或等于100（即：A<=100,B<=100，A<>B,A和B均不 为0）的自然数对中A*B的积的和。 79492 平方 63"水仙花数"是指这样的数，其各位数字的立方和等于该数本身。编 写程序，计算从100年开始到2000年为止，共有多少个年号是水 仙花数年号。 4 数字 64有一个三位数满足下列条件: (1)三位数字各不相同; (2)此数等于它 的各位数字的立方和。求这种三位数的个数。 4 数字 第10/22 页 65编程求在四位数的奇数中，所有各位数字之和是25的倍数的数之 和。 12985 15 数字 66计算在[0，60]的范围内有多少个数，其每位数的乘积大于每位数的 和。 31 数字 67求[1，999]之间能被3整除，且至少有一位数字是5的所有正整数 的个数。 91 数字 68求能被7整除且至少有一位数字为9的三位数的个数。36 数字 69求三位奇数中，个位数字与十位数字之和除以10所得的余数是百 位数字的数的个数。 45 数字 70求三位数的偶数中，所有各位数字之和是15的倍数的数的和。20454 数字71求三位数的奇数中，所有各位数字之和是12的倍数的数的个数。38 数字 72求三位数中，个位数字与十位数字之和除以10所得的余数是百位 数字，且百位数字是偶数的数的和。 21980 数字 73求四位数的偶数中，所有各位数字之和是15的倍数的数的个数。306 数字 第11/22 页 74求在四位数的偶数中，所有各位数字之和是30的倍数的数的和。28884 数字 75求这样的一个三位数，其个位数不大于2。若将个位数移动到百位 之前（如：321移成132），新三位数大于原三位数的两倍。 102 数字 76设某四位数的千位数字与十位数字的和等于百位数字与个位数字 的积，例如，对于四位数：9512，9+1=5*2，求所有这样的四位数 之和。 10782 89 数字 77设有十进制数字a、b、c、d和e，求满足下列式子：abcd×e=dcba （a≠0，e≠0，e≠1）的最小四位数abcd。 1089 数字 78一个两位数的正整数，如果将其个位数与十位数字对调所生成的数 称为其对调数，如28是82的对调数。现给定一个两位的正整数， 请找到另一个两位的整数，使这两个数之和等于它们的各自的对调 数之和。这样的另一个两位数有多少个。（从键盘输入的两位数为 46） 8 数字 第12/22 页 79回文数是指正读和反读都一样的正整数。例如3773是回文数。求 出[1000，9999]之间的奇数回文数的个数。程序中有错误。 50 数字回 文 804位反序数：设N是一个四位数，它的9倍恰好是其反序数，求N。 (反序数就是将整数的数字倒过来形成的整数，如1234的反序数是 4321。) 1089 数字对 称 81求共有几组i,j,k符合算式ijk+kji=1534,其中i,j,k是[0,9]之间的一个 整数且i 2 数字对 称 82求共有几组i、j、k符合算式ijk+kji=1534，其中i、j、k是0~9之 间的一位整数。 5 数字对 称 83所谓回文数是从左至右或从右至左读起来都是一样的数字，如：121 是一个回文数。编写程序，计算从1981年开始到3000年为止，共 有多少个年号是回文数年号。 11 数字对 称 84一辆以固定速度行驶的汽车，司机看到里程表上从左到右的读数和 从右到左的读数是相同的，这个数是12321(公里)，2小时后，里程 50 数字对 称 第13/22 页 表上再次出现一个新的对称数。问车的速度是多少公里/小时？ 85求符合下列条件的四位完全平方数(某个正整数A是另一个正整数 B的平方,则称A为完全平方数)，它的千位数字与十位数字之和等 于百位数字与个位数字之积，例如，3136=562, 且3+3=1*6 故3136 是所求的四位完全平方数. 求其中最大的一个数。 7921 数字平 方 86若一个四位正整数是另一个正整数的平方，且各位数字的和是一个 平方数，则称该四位正整数是“四位双平方数”。例如：由于 7396=86^2，且7+3+9+6=25=5^2，则称7396是“四位双平方数”。 求最小的“四位双平方数”。程序中有行一有错误。 1521 数字平 方 87若一个四位正整数是另一个正整数的平方，且各位数字的和是一个 平方数，则称该四位正整数是“四位双平方数”。例如：由于 7396=86^2，且7+3+9+6=25=5^2，则称7396是“四位双平方数”。 若把所有“四位双平方数”按升序排列，求前10个“四位双平方数” 的和。 29690 数字平 方 第14/22 页 88四位平方数：千位、百位数相同，十位、个位数相同，且是某一个 二位数的平方，求四位平方数的个数。 1 数字平 方 89统计1000~9999之间的所有满足以下条件的四位数的个数。该数是 一个完全平方数，且第1、2位数字之和为12，第3、4位数字之积 为24。 1 数字平 方 90求[3，500]内所有素数之和。21534 素数91求数列f(n) = n*n+n+41的前100项中素数的个数86 素数92求[3-1000]之间最大的五个素数之和。4919 素数93求[5000,6000]之间最小的素数5003 素数94求[1000,20000]之间最大的素数19997 素数95求[444,666]之间最大的素数是多少？661 素数96求[2，400]中相差为10的相邻素数对的对数。 5 素数97求出3到100之间的所有非偶数非素数的数的个数。25 素数98求区间[500，2500]中按递增顺序的第25个素数。659 素数 第15/22 页 99若两个连续的自然数的乘积减1后是素数，则称此两个连续自然数 为友数对，该素数称为友素数。例如，由于8*9-1=71，因此，8 与9是友数对，71是友素数。求[100，200]之间的第10个友素数对 所对应的友素数的值（按由小到大排列）。 17291 素数 100若两个连续的自然数的乘积减1后是素数，则称此两个连续自然数 为友数对，该素数称为友素数。例如，由于8*9-1=71，因此，8 与9是友数对，71是友素数。求[50，150]之间的友数对的数目。 38 素数 101在[1,10000]范围内考察个位数字是7的素数有多少个? 308 素数 102一个素数称之为超级素数，若该素数依次去掉个位，十位，...等等, 每次所得的数仍然是素数。例如239就是超级素数。求[100,9999] 之内超级素数的和 85574 素数超 级 103除1和它本身外，不能被其它整数整除的正整数称为素数（注：1 不是素数，2是素数）。若两素数之差为2 ，则称两素数为双胞胎 数，问[31,601]之间有多少对双胞胎数。 22 素数双 胞 第16/22 页 104已知菲波纳契数列{ X }中,X(1)=0,X(2)=1,X(n)=X(n-1)+X(n-2)，编程 求数列前30个数中，有多少个质数。 11 素数递 推 105求12345最大的质因子 823 素数因 子 106求整数2310的所有质因子（即所有为素数的因子）之和。 28 素数因 子 107[300，800]范围内同时满足以下两个条件的十进制数. ⑴其个位数字 与十位数字之和除以10所得的余数是百位数字；⑵该数是素数； 求满足上述条件的最大的三位十进制数。 761 素数数 字 108一个数出现在该数的平方数的右边，称这个数为“同构数”。例如， 5出现在平方数25的右边，25出现在平方数625的右边，则5、25 都是“同构数”。求[1，1000]之间的所有“同构数”的个数。 7 同构数 109找出1-1000之间的全部同构数的个数。同构数是指一个数，它出现 在它的平方数的右端。例如，5的平方是25，5是25中右端的数， 6 同构数 第17/22 页 5就是一个同构数。同理，25也是一个同构数。 110一个数如果刚好与它所有的因子之和相等，则称该数为“完数”, 如 6＝1＋2＋3，则6就是个完数,求200到500之间所有的完数之和。 496 因子 111求[10，1000]之间的所有完数之和。各真因子之和（不包括自身） 等于其本身的正整数称为完数。例如：6=1+2+3，6是完数。 524 因子 112求[200,300]之间的有奇数个不同因子的最大整数。289 因子 113求[200,300]之间有奇数个不同因子的最小的整数(在计算因子个数 时,包括1和该数本身)。 225 因子 114若某整数N的所有因子之和等于N的倍数，则N称为多因子完备 数,如数28,其因子之和1+2+4+7+14+28=56=2*28,28是多因子完备 数。求[1,200]之间有多少个多因子完备数。 4 因子 115已知24有8个正整数因子(即:1,2,3,4,6,8,12,24)，而24正好被其因 子个数8整除。求[100,300]之间能被其因子数目整除的数中最大的 数。 296 因子 第18/22 页 116百钱百鸡问题。用100钱买100只鸡，公鸡一只五钱，母鸡一只三 钱，雏鸡三只一钱，编程计算共有几种买法(要求每种鸡至少要买1 只)。 3 组合 117解百马百瓦古题。大、小马和马驹共100匹，共驮100片瓦。大马 一驮三，小马一驮二，马驹二驮一，一次驮完，三种马都驮，共有 多少种组合? 6 组合 118用一元纸币兑换一分、两分和五分的硬币，要求兑换硬币的总数为 30枚，问共有多少种换法？(注：在兑换中，一分、两分或五分的 硬币数可以为0枚) 4 组合 11950元的整币兑换成5元、2元和1元币值（三种币值均有、缺少一 种或两种都计算在内）的方法有多少种。 146 组合 120将50元兑换成5元、2元和1元的方法(每种面额不能为0)的种数。80 组合121将50元兑换成5元、2元和1元的方法的种数（每种面额不能为0）。106 组合122编程求方程5X+4Y=2，在|X|<=50,|Y|<=100内的整数解，X+Y最大86 组合 第19/22 页 值是多少？ 123求方程5X-4Y=2，在|X|<=100,|Y|<=50内的整数解中|X|+|Y|最大值？86 组合 124求方程8x-5y=3,在|x|<=150, |y|<=200内的整数解。试问这样的整数 解中x+|y|的最大值是多少？ 2 组合 125编程求取：[121,140] 之间的弦数的个数（若某正整数的平方等于另 两个正整数平方之和，则称该数为弦数. 例如:3^2+4^2=5^2, 因此5 是弦数）。 8 组合 126求[1，50]之间的所有整数能构成直角三角形的三边的组数。例如： 3*3+4*4=5*5，它们构成直角三角形，所以{3，4，5}作为一组，但 {4，3，5}视为跟{3，4，5}相同的一组。 20 组合 127若（x,y,z）满足方程：x^2+y^2+z^2=55^2(注：要求x > y > z),则（x,y,z） 称为方程的一个解。试求方程的所有整数解中|x+y+z|的最小值。 1 组合 128求满足以下条件的（a，b，c）的组数：（1） 1/(a^2)+1/(b^2)=1/(c^2) ；（2）a>b>c ；（3）a+b+c<100。 2 组合 第20/22 页 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。 《VB语言程序设计》教材 林卓然编著 《VB程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y) 练习一 一、选择题 1、下面列出的程序设计语言中（A ）是面向问题的语言。 A、机器语言 B、汇编语言 C、高级语言 D、0、1二进制语言 解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（D ）不属于VB 6.0的版本。 A、学习版 B、专业版 C、企业版 D、共享版 解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题 1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。 3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。 练习二 一、选择题 1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为蓝色的语句正确的是（ A ） A、Forma1.Backcolor=vbBlue B、Backcolor= vbBlue C、Forma1 =vbBlue D、Forma1′s Backcolor is vbBlue. 2、下面方法中，不能打开编码编辑器的是（D） A、单击“视图”菜单中的“代码窗口”命令。 B、双击窗体设计器的窗体或控件。 C、双击窗体设计器的窗体或控件，单击工程资源管理器中的“查看代码”按钮。 D、双击窗体设计器的窗体或控件，单击标准工具栏中的“代码窗口”按钮。 3 、保存VB应用程序时，下列方法中正确的是（Ａ） A、先保存窗体文件，再保存工程文件。 B、先保存工程文件，再保存窗体文件 C、直接保存窗体文件，系统会自动按顺序先保存窗体文件再保存工程文件。 D、直接保存窗体文件，系统会自动按顺序先保存工程文件再保存窗体文件。 二、填空题 1、VB工程文件的扩展名是工程文件(*.vbp)，窗体文件的扩展名是窗体文件(*.frm)。 2、选中工程资源管理器中的窗体对象，再单击按钮可打开窗体设计器。 3、在VB中，按下工具栏中的“启动”按钮或 程序设计 〖第1题〗『程序设计』(5分)(题号:148) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)求10~20之间所有素数的乘积并输出在窗体上。 ' 将结果存入变量L中。 '------------------------------------------------- '注意：请在指定的事件内编写代码。 '------------------------------------------------- 答案：---------------------- Dim i As Integer Dim j As Integer Dim b As Boolean l = 1 b = False For i = 10 To 20 For j = 2 To i - 2 If i Mod j = 0 Then b = True End If Next If b = False Then l = l * i End If b = False Next Print Str(l) ---------------------- 〖第2题〗『程序设计』(5分)(题号:150) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)求1 - 1/2 + 1/3 - 1/4 + ……+ 1/99 - 1/100的值。' 将结果存入变量J中。 '------------------------------------------------- '注意：请在指定的事件内编写代码。 '------------------------------------------------- 答案：---------------------- Dim i As Integer For i = 1 To 100 If i Mod 2 = 1 Then j = j + 1 / i ElseIf i Mod 2 = 0 Then j = j - 1 / i End If Next Print j ---------------------- 〖第3题〗『程序设计』(5分)(题号:131) '------------------------------------------------- '【程序设计】 '------------------------------------------------- '题目：(事件)单击窗体。 ' (响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100， ' 结果输出在窗体上。 '------------------------------------------------- '将结果存入变量S中 '------------------------------------------------- 答案：---------------------- Dim i As Integer s = 0 For i = 1 To 10 s = s + 1 / (i ^ i) Next Print (s) ---------------------- 〖第4题〗『程序设计』(5分)(题号:152) 《VB 程序设计》考试题型练习 一. 填空 1. VB 中的对象具有 属性 、 事件 、和 方法 三种特性，它们是构成对象的三个基本要素。 2. VB 中的常量分为哪三种： 文字常量 、 符号常量（用户自定义常量） 系统内部常量 。 3. 变量的三要素是指： 变量的名 、 变量的数据类型 、 变量的值 。 4. VB 中日期型数据的表示格式为： #mm/dd/YYYY#或#mm-dd-YYYY# 。 5. 在VB 中，“\”是 整除 运算符；“/”是 浮点除 运算符。两个字符串可以使用连接符 &或+ 串接起来。 6. 2 22z y x z y x ++++的VB 表达式为 （x+y+z ）/sqr(x^2+y^2+z^2) 。 7. a ac b b 242-+的VB 表达式为 (b+sqr(b^2-4*a*c))/(2*a) 。 8. 计时器控件的 Interval 属性用于设置Timer 事件发生的时间间隔，为了使计时器控件Timer1每隔0.5秒触发一次Timer 事件，应将该属性设置为 500 ；为了暂时关闭计时器，应把该计时器的 Enable 属性设置为False 。 二. 单选题 1. 如果要使VB 程序运行时不能对文本框中的内容进行编辑，需将文本框的哪个属性设置为True （ D ）。 A ）MultiLine B ）Visible C ）TabStop D ）Locked 2. 表达式Right("asdf", 2)+Ucase("as" )的值为（ A ）。 A ）dfAS B ）asAS C ）dfas D ）asas 3. 执行如下语句： a ＝InputBox("Today", "Tomorrow", "Yesterday") 将显示一个输入对话框，在对话框的输入区中的默认值是（ C ）。 A) Today B) Tomorrow C) Yesterday D) Today Tomorrow Yesterday 4. 设a=3，b=5，则以下表达式值为真的是（ B ）。 A) a>=b And b>10 B) (a>b) Or (b>0) C) (a<0) Or Not (b>0) D) (-3+5>a) And (b>0) 一、程序设计 '【程序设计】 1.'题目：编写函数fun，函数的功能是：计算两个正整数的最大公约数，并显示。如：'两个数为15、20，结果显示"5" '要求使用Do ... Loop语句来实现。 答案：Do r = m Mod n If r = 0 Then Exit Do m = n n = r Loop fun = n 2.'题目：判断一个数是否是素数。 答案：---------------------- Dim i As Integer Prime = True For i = 2 To Int(Sqr(m)) If m Mod i = 0 Then Prime = False: Exit For Next i ---------------------- 3,'题目：(事件)单击窗体。 ' (响应)求10!的值，并将结果输出到窗体上。 将结果存入变量SUM中。 答案：---------------------- Dim i As Integer sum = 1 For i = 1 To 10 sum = sum * i Next Print sum 4,'题目：(事件)单击窗体。 (响应)求1+2+3+……+100的值，并把结果输出在窗体上。结果存入变量SUM中。 答案：---------------------- Dim i As Integer For i = 1 To 100 sum = sum + i Next Print sum ---------------------- 5,'题目：编写函数fun，函数的功能是：求1到m之间的偶数之积。 答案：---------------------- Dim y As Double y = 1 Dim i As Integer For i = 1 To m 中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型 第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C ) 《V i s u a l B a s i c程序设计》期末复习题 一、单项选择题 1．Visual Basic是一种面向对象的可视化编程语言，采取了（）的编程机制。 A．按过程顺序执行B．从主程序开始执行 C．事件驱动D．按模块顺序执行 2．与传统的设计语言相比，Visual Basic最突出的特点是（） A．程序开发环境B．结构化程序设计 C．程序调试技术D．事件驱动的编程机制 3．将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其它机器上不能运行的主要原因是（）。 A．缺少.frm窗体文件B．该可执行文件有病毒 C．运行的机器上无VB系统D．以上原因都不对 4. Visual 集成开发环境有三种工作模式，下列不属于三种工作模式之一的是（）。 A．设计模式B．编写代码模式 C．执行模式D．中断模式 5．后缀为.bas的文件表示（）。 A．工程文件 B．窗体文件 C．窗体二进制数据文件 D．标准类模块文件 6．工程文件的扩展名是（）。 A．.vbp B．.frm C．.bas D．.frx 7．刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。 A．时钟控件B．图像框C．框架D．通用对话框 8.以下叙述中错误的是（）。 A．一个工程中可以包含多个窗体文件 B．在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的文件 C．在一个窗体文件中用Private定义的通用过程能被其它窗体调用 D．全局变量必须在标准模块中定义 9．要在窗体Form1内显示“欢迎您！”，使用的语句是（） A．="欢迎您!" B．="欢迎您!" C．Form. print "欢迎您!" D． "欢迎您!" 10．决定标签内显示内容的属性是（） A．Name B．Text C．Caption D．Alignment 11．要设置命令按钮的背景图形，必须设置的两个属性是（） A．Caption和Picture B．Style和Picture C．Style和Icon D．Value和Icon 12．将数据项“China”添加到列表框List1中成为第一项，应使用的语句是（）A．"China" B．"1,China" C．"China",0 D．"China",1 13．在VB中，下列各项合法的变量名是（）。 A．Integer B．ab-c C．2abc D． a_bc 14．在VB中，下列合法的变量名是（） 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… 《VB程序设计》复习题 一、选择题 1.改变控件在窗体中的上下位置，应修改控件的__A_____属性 A .Top B. Left C.Width D. Right 2.将通用对话框类型，设置为字体对话框，可修改该控件的____D_____属性 A. font B. filename C. filter D. action 3.标签控件最重要的属性是__A______ A. caption B. text C. name D. width 4.文本框中选定的内容，由下列____C_____属性反映。 A. Text B.Caption C. Seltext D. sellenght 5.选中复选框控件时，value属性的值，可以是_ D______ A.true B. false C. 0 D.1 6.设置列表框选中的文本用____D____属性 A. selected B. caption C. text D. list 7.简单组合框的style值为____B_____ A .0 B. 1 C. 2 D. 3 8.在文件列表框的实现文件的多重选择，应修改该控件的___D______属性 A. filename B. pattem C. path D. multiselect 9.语句listl.removeitem 1 将删除list.listindext等于___D______的项目。 A. 0 B. 2 C. 3 D. 1 10.计时器的interval属性为0时，表示____A_____。 A. 计时器失效 C. 相隔0 毫秒 B. 相隔0秒 D. 计时器的enable属性为false 11.以下的vb 常量中非法的是(B) a. “Good Luck” b. PI c. 1.5E-03 d. 16.3412 12.要想返回文本框中输入的内容则可利用其( B )属性进行编程 a.caption b. text https://www.wendangku.net/doc/3e11697684.html, d. righttoleft 13.下列不能用commondialog 控件调用的对话框是( D) a. open/save b. help c. font d. search 14.vb 应用程序是分层管理的,其最高的层次为( A) a. 工程 b. 模块 c. 窗体 d. 过程 VB程序设计试题及答案（一） 一、单选题 1. 是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) =“欢迎使用VB” (B) ='欢迎使用VB' (C) =欢迎使用VB (D) ="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 … … Next x Next x VB程序设计复习题 1．Visual Basic是一种___D___的可视化程序设计语言。 A．面向机器 B．面向过程 C．面向问题 D．面向对象2．Visual Basic主窗口中不包括____B_____。 A．标题栏 B．状态栏 C．工具栏 D．菜单栏 3．程序运行中用鼠标双击当前窗体时，会触发窗体的_____C____ 事件。 A．Load B．Unload C．DblClick D．KeyPress 4．假设窗体上已有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先要执行的操作是 ____A______。 A．单击窗体上没有控件的地方 B．单击任一个控件 C．双击任一个控件 D．双击窗体上没有控件的地方 5、要设置窗体上各控件的属性，可在 ____C___ 中进行。 A．窗体布局窗口 B．工程资源管理器窗口 C．属性窗口 D．窗体窗口 6．设变量A的值为-2，则___A___函数的执行结果与其他三个不一样。 A．Val("A") B．Int(A) C．Fix(A) D．-Abs(A) 7．要在窗体Forml的标题栏上显示"统计程序"，可用___B___语句。 A．https://www.wendangku.net/doc/3e11697684.html,="统计程序" B．Form1.Caption="统计程序" C. Forml.Caption=统计程序 D．https://www.wendangku.net/doc/3e11697684.html,=统计程序 8．函数String(n, "str")的功能是 B 。 A．把数值型数据转换为字符串 B．返回由n个字符组成的字符串 C．从字符串中取出n个字符 D．从字符串中第n个字符的位置开始取子字符串 9、定义变量如下： Dim MyVar MyVar =”come see me “ 若在立即窗口中显示MyVar的值，下面正确的是（ A ） 1．退出Visual Basic 的快捷键是______。A. Ctrl+Q B.Shift+Q C.Alt+Q 2．窗体设计器是用于设计______。 A．应用程序的界面 C．应用程序的代码D. Ctrl+Alt+Q B. 对象的属性D. 窗体的代码 3．启动Visual Basic 后,VB为用户建立的第一个窗体是______。 A．Form1 B.Form C．窗体1 D. 窗体 4．启动Visual Basic 后,VB为用户新建立的工程的名字是______。 A．窗体1 B. 工程1 C．窗体 D. 工程 5．工程资源管理器窗口包含的文件类型有______种。 A．1 B.2 C．3 D. 4 6．如果VB环境中缺少某个窗口，一般应从主菜单______的下拉菜单中找到相应的激活命令。 A．编辑C．调试B. 文件D. 视图 7．能够通过标准工具栏打开的窗口是______。 A．代码窗口 C．属性窗口 8．窗体文件的扩展名______。B. 设计器窗口D. 窗体布局窗口 A．.bas B. vbp C．.exe 9．工程文件的扩展名______。 A．.com D. frm B. vbp C．.exe D. bas 10．Visual Basic的编程机制是______。 A．面向过程C．事件驱动B. 面向对象D. 可视化 （三）练习题 使用VB建立一个应用软件的全过程有哪些步骤？。1．具体过程如下（1）在窗体上建立用户窗口（界面）对象。 （2）分别对对象设置属性。 （3）分别对对象事件的过程编程且完成代码输入。 （4）运行程序和调试程序。 （5）保存程序。 1． 2．保存VB文件，至少要保存几个文件？应先保存什么文件？2．至少保存2个文件，先保存窗体文件，后保存工程文件。 《VB程序设计》模拟试题 ●填空题 1.窗体模块的文件扩展名为 ___FRM_________ 、标准模块的文件扩展名为____BAS______ 、 类模块文件的扩展名为______CLS_______ 。 2.Visual Basic中数据类型可分为 _____标准数据类型________和用户自定义数据类型两大类，前者根据其取值的不同，可分为_____整型_________、 ______长整型_____、布尔型和 ____字符型_________。 3. Abs(-6.5)= _____6.5______；Int(-9.1)= ____-10_______。 4. "程序"& "设计"运算结果为 ___程序设计____ 。 5. Dim a, b as Boolean语句显式声明变量a是___变体___变量，b是___布尔__变量。 6. MsgBox函数的返回值中， VBRetry表示单击了____重试_____按钮，VBYes表示单击了___是_____按钮，VBNo表示单击了_____否____按钮。 7. 要加载窗体，可以在代码中使用___________语句，要显示窗体，可以在代码中使用___________方法，要隐藏窗体，可以在代码中使用Hide方法，要卸载窗体，可以在代码中使用___________方法。 8.对话框分为_________对话框和________对话框两种类型，其中_____________ 对话框最 常用。 9. 对象是Visual Basic应用程序的基本单元，它是由 ___类___创建的。在Visual Basic中可以用属性、 __方法___、___事件___ 来说明和衡量一个对象的特性。 10. 条件判断语句可以使用___If…then____________语句、 ____If…Then…Else______语句和 ______If…Then…ElseIf______语句。Select case 语句 11. 声明一个值为3.14的常量Pi的语句为___Const pi = 3.14______。 12. Do…Loop Until 循环结构中，当条件为____真____时结束循环。 13. 要显示弹出菜单，可以在代码中使用_____________事件。 14. 参数传递有__________方式、__________方式和命名传递方式，常量默认采用__________方式；变量默认采用__________方式；表达式默认采用__________方式。 15. 名称属性必须以一个__字母标点_开始并且最长可达40个字符,不能包括__符号___ 和 ___空格___。 16.Visual Basic的程序模块有3种：____窗体模块____ 、标准模块和 ____类模块____。 17.Visual Basic程序，按其语句代码执行的先后顺序，可以分为___顺序__结构、选择__结构和___循环____ 结构。 18.数组元素下标的下界默认为是_____________，如果要改变其默认值，应使用_____________。 ●判断题 （）1. Visual Basic运行程序的方法只有编译模式。 （）2. 语句Command1.visible=false 与Command1.enabled=false 是等价的。 （）3. InputBox函数和MsgBox函数一样，返回的是字符串。 （）4. 通过类模块，我们不可以根据需要建立自己的控件。 （×）5. 2.1E+5是合法的Visual Basic数据。 （）6. 根据占用内存方式的不同，可将数组分为常规数组和动态数组两种类型。 （√）7. x2是合法的变量名。 （）8. 按照文件的存取方式及其组成结构可以分为两种类型：文本文件和随机文件。 1、题目:（事件）单击窗体（响应)用输入框输入一自然数，判断就是＂正数”、＂负数或＂零”,并根据输入得数用消息框显示”正数"、”负数”或”零". 2、题目:（事件）单击窗体。（响应）求２０0～３0０之间既能被3整除又能被7整除得数.并求出所有数之与存入变量ＳＵＭ中 3、题目：单击窗体。（响应)已知S=1+1/４+１／9+1/1６+1/25+…+1／1０0，结果输出在窗体上。 4、题目：（事件）单击窗体.（响应）在窗体上打印数列２／1，３／2,5/3,8/5，1３/８…得前10项，并求其与，将与保存在变量s中。 5、题目：（事件）双击窗体。(响应)把一元钞票换成一分、二分与五分得硬币每种至少有一枚)，求出其所有得换法，把结果输出在窗体上。将所有得换法得数目存入变量N中 6、题目:单击窗体。）求１！+２！＋3!+4！＋5!并将结果输出到窗体上。结果存入变量S中 7、题目:（事件）单击窗体。（响应)生成一个一维数组（10个数组元素依此为: ' １5、23、７2、４3、9６、2３、３、65、88、１7 写程序求出这个数组中得最大值、最小值与平均值,并输出在窗体上。将最大值，最小值,平均值分别存入变量Max，Min，Aver中 8、题目:(事件）单击窗体。（响应)在窗体上输出100～２0０之间得所有合数。求出所有数之与存入SUＭ中所谓合数就是指自然数中能被1与本数整除以外，还能被其她数整除得数。 ９、题目：（事件）单击窗体.(响应）求10～20之间所有素数得乘积并输出在窗体上。将结果存入变量L中。 1０、题目：(事件）单击窗体。（响应)求1- 1/2＋1/3 －1/4 +……+ 1／99－1/10０得值。将结果存入变量J中。 １题 ｎ = InputＢoｘ（"输入一个自然数”） If n ＞0 Then rｅsulｔ = ”正数＂ ElseIf n < 0 Ｔhen ｒeｓult = ”负数" ElseIf n ＝ 0 Ｔhen result ＝"零＂ End If MsgＢox "输入得数据”& ｎ＆”为：”＆ rｅsuｌt 2题 Dｉｍ i As Inteｇer Fｏｒ i = 201 To 300 Ｉf ((i Mod 3） = 0) Aｎｄ((i Mod ７) = 0） Tｈen Ｐrinｔ (CStｒ(i)） sum = ｓum + i End Iｆ Ｎeｘt Ｐrint sum 3题 DiｍｉAｓ Inteｇeｒ ｓ = 0 For i = 1 To 1０ s ＝ s + 1 / (i ^ i) Next Print (s) ４题 Ｄim i，ｊ, ｋ， m As Integer s ＝ 0 :i = 2:j = １ For k = 1 To 10 s = s ＋ｉ / j ｍ＝ j Prｉnt (CSｔｒ(i)） & "／" ＆ＣＳtｒ(j) j = i ｉ = i + m Ｎexｔ 5题 Ｄｉｍ i, j，ｋAｓＩnｔegｅr For i = １ To １00 Fｏr j = 1 Ｔo 50 For k = 1 Tｏ 20 If （（i + 2 ＊j ＋ k * 5）＝ 100) Ｔｈｅn Print (CＳｔr(i)） Priｎｔ (CStr（j)） Pｒinｔ（CＳtｒ(k)） n ＝n + １VB期末考试试题及答案
《VB程序设计》习题答案-林卓然编著
VB程序设计习题
VB题库—程序设计[1]
《VB程序设计》考试题型练习 答案
vb题库程序设计
[整理]VB程序设计复习题及答案.
vb程序设计试题(含答案)
VB程序设计期末复习题
VB程序设计 试题与答案-1
VB程序设计试题及答案一
VB程序设计复习题
VB程序设计试题及答案(一)
VB程序设计复习题答案
VB程序练习题整理稿剖析
《VB程序设计基础》模拟精彩试题
VB程序设计考试题库——考试专用