VB程序设计考试题库 优质文档
VB考试程序设计题目
1.声明一个大小为100的数组，在里面存入1到100这样100个数，然后将这些数字累加求和。
2.用户自己输入一个可以变化的数字，然后判断这个输入的字符是否是数字，能用后，求它的阶乘大小，注意判断这个数字是否会造成溢出的错误处理。
3.用循环结构在窗体上打印一个三角形，用*字符来打印;这个三角形要能自己输入打印多少行，这个行数要用户自己输入。
注意错误处理。
4.在窗体上面显示一个9×9乘法表。
5.定义一个存放身份证的变量，然后用内置函数找出些身份证显示出的信息：生日，性别，年龄等等信息。
这些信息分别用标签表示出来，我后在后面用文本框的形式存放转换后的结果。
注意程序整体的美观。
6.计算一个三角形的面积（提示：先让用户输入任意的三条边，然后判断能不能构成一个三角形（任意二边之和大于第三边），能就将三边存放在三个变量里，利用Sqrt((周长-A边)+(周长-B边)+(周长-C边))的公式得出这个三角形的面积）7.将一个数组里面存入10个数字，然后把他们里面的值进行比较，从而从大到小进行一个排序，排序完成后将这些排序好的元素打印在窗体上。
8.打印扬辉三角（这个三角形每个元素左上角的2个数字相加得到它的下一行数字。
）如下图：11 11 2 11 3 3 11 4 6 4 11 5 10 10 5 19 打印任意个数的九宫图（任意对角线相加得到一个相同的数字）如图：任意三个数和为：159.求100到999内的水仙花数（这个数每个数位上的数字的三次方之和为它本身，如153＝13+53+33）10.利用时间控件，在窗体上的一个标签上显示一个动态的文字，设置为每250ms出现I（I为每250ms加一次的变量）个汉字，如：显示“欢迎你”，先显示“欢”，再是“欢迎”，然后是“欢迎你”，接着是“欢”，循环显示。
11.输入如下图所示的图形11 2 11 2 3 2 11 2 3 4 3 2 11 2 3 4 5 4 3 2 112用ADO代码连接数据库，并用Connection向这个表内插入一条记录。
vb程序设计试题及答案
vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。
答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。
VB程序习题集（附答案）
VB程序习题集（附答案）VB简介1、在以下有关对象属性的叙述中，不正确的是___________。
A、⼀个对象的属性可分为外观、⾏为若⼲类B、不同属性可能具有不同的数据类型C、⼀个对象的所有属性都可在属性窗⼝的列表中进⾏设置D、属性窗⼝中的属性列表既可按字母排序也可按类别排序2、Visual Basic中最基本的对象是___________，它是应⽤程序的基⽯，也是其他控件的容器。
A、⽂本框B、命令按钮C、窗体D、标签3、有程序代码“Text1.Text="Visual Basic"”，其中的Text1、Text和“Visual Basic”分别代表___________。
A、对象、值、属性B、对象、⽅法、属性C、对象、属性、值D、属性、对象、值4、⽤窗体的___________属性来设置窗体的标题。
A、CaptionB、StyleC、TextD、Name5、窗体上有⼀个⽂本框控件Text1，假设已存在三个整型变量a、b、c，且变量a的值为5，变量b的值为7，变量c的值为12。
以下的___________语句可以使⽂本框显⽰的容为：5+7=12。
A、Text1.Text = a + b + cB、Text1.Text = "a+b=c"C、Text1 = a & "+" & b & "=" & cD、Text1 = "a" & "+" & "b" & "=" & "c"6、如果在窗体上有命令按钮OK，在代码编辑窗⼝有与之对应的Cmd_Click（）事件，则命令按钮的名称属性和Caption属性分别为_________。
A、OK、CmdB、Cmd、OKC、CmdOK、OKD、OK、CmdOK7、窗体Form1的名称属性是frm，它的Load事件过程名为___________。
VB程序设计题库(全)
程序设计第一题、题目：（事件）单击窗体（响应）求50以内所有偶数的和，并在窗体上输出来。
将结果存入变量S中。
代码：Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目：（事件）双击窗体（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码：Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。
将结果存入变量SUM中代码：Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+iEnd IfNextPrint sum第四题题目：（事件）单击窗体（响应）编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。
将结果存入变量M中。
代码：Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目：（事件）双击窗体（响应）求100以内奇数的和，并将结果输出在窗体上。
将结果存入变量SUM中。
代码：Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目：（事件）单击窗体（响应）已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码：Dim s As SingleFor i=1 To 10a=i*iSum =1/a + SumNextPrint Sum第七题题目：（事件）双击窗体（响应）求1+1*2+1*2*3+....+1*2*3*. (10)并将结果存到变量S中代码：Dim s As Longj=1For i = 1 To 10j= j*iSum = Sum + jNextPrint Sum第八题题目：（事件）单击窗体（响应）求1—1/2+1/3—1/4+….+1/99—1/100的值。
vb练习题(有答案)(打印)
《大学Visaul Basic程序设计》复习题第一章Visual Basic程序设计概述第一题：是非题（共10分，每项1分）1. VB6.0只能运行在Windows 2000下，不能运行在Windows 98下。
13A.对B.错√2. 用户控件和系统控件都可以加载到工具箱上，并且永久保留。
4A.对B.错√第二题、单选题（共45分，每项1.5分）1. VB中的工具栏可以从______菜单上的“工具栏”命令中移进或移出。
15A.工具B.编辑C.视图√D.调试2. 在VB的集成环境中创建VB应用程序时，除了工具箱窗口、窗体设计窗口、属性窗口外，必不可少的窗口是______。
2A.窗体布局窗口B.立即窗口C.代码窗口√D.监视窗口第二章VB的编程机制第一题：是非题（共10分，每项1分）1. 在事件驱动的应用程序中，代码是按照预定的路径执行的。
15A.对B.错√2. 标签控件即可以用来显示用户不能编辑和修改的文本，也可以用来编辑和修改文本。
9A.对B.错√3. 每一个控件实质上都是一个微型程序。
2A.对√B.错4. 窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。
A.对√B.错第二题、单选题（共45分，每项1.5分）1. 文本框没有_____属性。
21A.EnabledB.VisibleC.BackColorD.Caption√2. 文本框（Text1）中有选定的文本，执行Text1.SelText=”Hello”的结果是＿＿＿。
9A.“Hello”将替换掉原来选定的文本√B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength为5D.文本框中只有“Hello”3. 要判断“命令按钮”是否被鼠标单击，应在“命令按钮”的______事件中判断。
3A.ChangB.KeyDownC.Click√D.KeyPress4. 如果文本框的Enabled属性设为False，则＿＿＿。
6A.文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容√C.文本框的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容第三题、简单程序（共15分，每项1.5分）1. 以下程序的输出结果是______。
VB程序设计试题库
VB程序设计试题库《VB程序设计》试卷二___________________________________________ 2参考答案2：____________________________________________________ 6《VB程序设计》试卷三___________________________________________ 9参考答案3：___________________________________________________ 13 《VB程序设计》试卷四__________________________________________ 16 参考答案4：___________________________________________________ 21 《VB程序设计》试卷五__________________________________________ 23 参考答案5：___________________________________________________ 28 《VB程序设计》试卷六__________________________________________ 30 参考答案6：___________________________________________________ 34 《VB程序设计》试卷七__________________________________________ 36 参考答案7：___________________________________________________ 40 《VB程序设计》试卷八__________________________________________ 42 参考答案8：___________________________________________________ 47《VB程序设计》试卷二一、选择题（每小题1分，共10分）1、改变控件在窗体中的上下位置，应修改控件的__（1）_____属性A.TopB.LeftC.WidthD.Right2、将通用对话框类型，设置为字体对话框，可修改该控件的____（2）_____属性A.fontB.filenameC.filterD.action3、标签控件最重要的属性是__（3）______A.captionB.textD.width4、文本框中选定的内容，由下列____（4）_____属性反映。
VB程序设计题库(全)(同名21559)
VB程序设计题库(全)(同名21559)VB程序设计练习题第一题、题目：（事件）单击窗体（响应）求50以内所有偶数的和，并在窗体上输出来。
将结果存入变量S中。
代码：Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目：（事件）双击窗体（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码：Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。
将结果存入变量SUM中代码：Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+i2End IfNextPrint sum第四题题目：（事件）单击窗体（响应）编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。
将结果存入变量M中。
代码：Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目：（事件）双击窗体（响应）求100以内奇数的和，并将结果输出在窗体上。
将结果存入变量SUM中。
代码：Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目：（事件）单击窗体（响应）已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码：Dim s As SingleFor i=1 To 103a=i*iSum =1/a + SumNextPrint Sum第八题题目：（事件）单击窗体（响应）求1—1/2+1/3—1/4+….+1/99—1/100的值。
(完整word)VB_经典考试题及答案,推荐文档
目录一、填空题 (2)二、选择题 (5)三、程序填空 (18)四、阅读程序写结果 (25)五、编程题 (31)六、历年全国计算机二级等级考试真题(附答案) (33)2006年4月全国计算机等级考试二级VB笔试试卷 (33)2005年9月全国计算机等级考试二级VB笔试试卷 (43)2005年4月全国计算机等级考试二级VB笔试试卷 (50)2004年9月全国计算机等级考试二级VB笔试试卷 (57)一、填空题1、在程序中使用日期型数据时，必须用符号 将日期型数据括起来。
2、VB 集成发环境窗口，它包括了数个独立的窗口。
除必须的"主窗口"外，常用的还有 窗口、 窗口、 窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。
3、在计算机上建立一个VB 应用程序的完整过程，一般分：建立用户界面的对象、对象属性的设置 、对象事件过程及编程、 程序的运行和调试 和 保存文件 五个步骤。
4、VB 中每个对象都有自己的属性， visible 属性决定控件是否允许可见。
5、在VB 对象的三要素中，可以把 属性 看作一个对象的性质，把 事件 看作对象的响应，把 方法 看作对象的动作。
6、VB 有三种工作模式，它们分别是 模式、 模式和 模式。
7、如果希望每0.6秒钟产生一个计时事件，那么应将InterVal 属性值应设置为 。
8、在VB 中，为了使一个控件在运行时不可操作，应将控件的 enable 属性设置为 false 。
9、为了防止用户编辑文本框内的内容，应将控件的 locked 属性设置为 true 。
10、当要使标签框的大小随着Caption 属性的值进行扩展或缩小时，应将该控件的 autosize 属性设置为 true 。
11、定义一个长度为8个字符的定长字符串变量(Ch5)的Dim 声明语句是 dim ch5 as string*8 。
12、VB 中拥有多个窗体的程序可用 load 语句窗体装入内存，用 unload 语句从内存中删除指定窗体.13、在多窗体工程中，可用 show 方法显示一个窗体，用 hide 方法将一个窗体隐藏起来。
vb题库-程序设计
一、程序设计'【程序设计】1.'题目：编写函数fun，函数的功能是：计算两个正整数的最大公约数，并显示。
如：'两个数为15、20，结果显示"5"'要求使用Do...Loop语句来实现。
答案：Dor=mModnIfr=0ThenExitDom=nn=rLoopfun=n2.'答案：Nexti3,'题目：'(响应)求答案：sum=1NextPrintsum4,'题目：(响应)求答案：Fori=1To100sum=sum+iNextPrintsum----------------------5,'题目：编写函数fun，函数的功能是：求1到m之间的偶数之积。
答案：----------------------DimyAsDoubley=1IfiMod2=0Theny=y*iEndIfNextfun=y----------------------6,'题目：编写函数fun，函数的功能是：根据一个百分制成绩mark（整数），显示对应五级制的评定。
条件如下：mark大于等于90显示"优秀"mark小于90且大于等于80显示"良好"mark小于80且大于等于70显示"中等"mark小于mark小于答案：fun="优秀fun="良好fun="中等fun="及格CaseElsefun="7,'题目：答案：EndIfNextPrintsum8,'题目：'(响应)输100-200之间所有素数，并将这些数求和，求和结果存入所给变量SUM中。
答案：------------------------------------Fori=100To200Forj=2ToSqr(i)IfiModj=0ThenExitForNextIfj>Int(Sqr(i))ThenSum=Sum+iEndIf------------------------------------9,'题目：将一个十进制整数m转换成→r(2－16)进制字符串。
(完整word版)VB程序设计试题题库及答案
VB程序设计笔试题题库一、选择题1 以下常量中，是 Integer种类常量的是（C ）。
A、123&B、-38844C、123%D、327682 下边选项中 () 是字符连结运算符 . （ A ）A、&B、AndC、%D、Mod3下边关于 VB 的集成开发环境（ IDE ）的叙述中，不正确的是（B ）。
A、IDE是设计、调试、运转 VB程序的工具。
B、用户不可以任意封闭 IDE中的窗口。
C、" 窗体设计 " 窗口是用来设计应用程序界面（窗体）的。
D、翻开 / 封闭各窗口的命令主要在 IDE的" 视图 " 菜单中。
4 len( “程vb序设计”)=( C ) 。
A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$( “123456”,3,2)履行后， A= （ A ）。
A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时 , 用来分开每条语句的符号是 ( C ).A、,B、;C、:D、、8 将逻辑型数据变换成整型数据时，变换规则是（ D ）。
A、将 True 变换为 1 ，将 False 变换为 0B、将 True 变换为 1 ，将 False 变换为 -1C、将 True 变换为 0 ，将 False 变换为 -1D、将 True 变换为 -1 ，将 False 变换为 09 表达式 2+3*4^5-SIN(X+1)/2 中最初进行的运算是 ( D ).A、SINB、4^5C、3*4D、x+110 假如 x=2 ，则表达式And 3>x+3 的值（ B ）。
A、不可以计算B、 TrueC、5D、False11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。
A、Round( Rnd*50)B、 Int(Rnd*40+10)C、Round( Rnd*51)D、 10+Int(Rnd*41)12 每成立一个窗体 , 工程管理器窗口中就会增添一个 ( C ).A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT(100*RND(1)) 产生的随机整数的闭区间是 ( B ).A、[1,100]B、[0,99]C、[0,100]D、[1,99]14以下数据种类中 , 占用内存最小的是 ( D ). A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种( B ) 程序设计语言 .A、过程式B、非过程式C、机器D、初级16函数 Int(10*Rnd) 是在 ( A ) 范围内的整数 . A、[0,9]B、[0,1]C、[1,9]D、[1,10]17 以下合法的一组 Visual Basic 用户表记符是（ C ）A、Sum 和 8abcB、a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数 Len(Str(Val("123.4"))) 的值为 ( B ).A、5B、6C、8D、1119 Int(198.555*100+0.5)/100 的值为（ B ）A、B、C、200D、19820以下各表达式中 , 计算结果为 0的是 ( A ). A、FIX(12.4)+FIX(-12.6)B、CINT(12.4)+CINT(-12.6)C、INT(12.4)+INT(-12.6)D、FIX(13.6)+FIX(-12.6)21 MsgBox() 的正确语法是（D）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
优质文档VB程序设计考试题库——考试专用
1、题目：(事件)单击窗体(响应)用输入框输入一自然数，判断是"正数"、"负数或"零"，并根据输入的数用消息框显示"正数"、"负数”或"零"。
2、题目：(事件)单击窗体。
(响应)求200~300之间既能被3整除又能被7整除的数。
并求出所有数之和存入变量SUM中
3、题目：单击窗体。
(响应)已知S=1+1/4+1/9+1/16+1/25+…+1/100，结果输出在窗体上。
4、题目：(事件)单击窗体。
(响应)在窗体上打印数列2/1,3/2,5/3,8/5,13/8…的前10项，并求其和，将和保存在变量s中。
5、题目：(事件)双击窗体。
(响应)把一元钞票换成一分、二分和五分的硬币每种至少有一枚），求出其所有的换法，把结果输出在窗体上。
将所有的换法的数目存入变量N中
6、题目：单击窗体。
)求1!+2!+3!+4!+5!并将结果输出到窗体上。
结果存入变量S中
7、题目：(事件)单击窗体。
(响应)生成一个一维数组(10个数组元素依此为：
' 15、23、72、43、96、23、3、65、88、17
写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。
将最大值，最小值，平均值分别存入变量Max,Min,Aver中
8、题目：(事件)单击窗体。
(响应)在窗体上输出100~200之间的所有合数。
求出所有数之和存入SUM中所谓合数是指自然数中能被1和本数整除以外,还能被其他数整除的数。
9、题目：(事件)单击窗体。
(响应)求10~20之间所有素数的乘积并输出在窗体上。
将结果存入变量L中。
10、题目：(事件)单击窗体。
(响应)求1 - 1/2 + 1/3 - 1/4 + ……+ 1/99 - 1/100的值。
将结果存入变量J中。
1题
n = InputBox("输入一个自然数")
If n > 0 Then
result = "正数"
ElseIf n < 0 Then
result = "负数"
ElseIf n = 0 Then
result = "零"
End If
MsgBox "输入的数据" & n & "为：" & result
2题
Dim i As Integer
For i = 201 To 300
If ((i Mod 3) = 0) And ((i Mod 7) = 0) Then
Print (CStr(i))
sum = sum + i
End If
Next
Print sum
3题
Dim i As Integer
优质文档
s = 0
For i = 1 To 10
s = s + 1 / (i ^ i)
Next
Print (s)
4题
Dim i, j, k, m As Integer
s = 0 :i = 2:j = 1
For k = 1 To 10
s = s + i / j
m = j
Print (CStr(i)) & "/" & CStr(j)
j = i
i = i + m
Next
5题
Dim i, j, k As Integer
For i = 1 To 100
For j = 1 To 50
For k = 1 To 20
If ((i + 2 * j + k * 5) = 100) Then
Print (CStr(i))
Print (CStr(j))
Print (CStr(k))
n = n + 1
End If
Next
Next
Next
6题
Dim i, j, k As Integer
For i = 1 To 5
k = 1
For j = 1 To i
k = k * j
Next
s = s + k
Next
Print (CStr(s))
7题
Dim a(9) As Integer
Dim i, s As Integer
a(0) = 15：a(1) = 23：a(2) = 72
a(3) = 43：a(4) = 96：a(5) = 23。