浙江省计算机二级vb上机试题题库
浙江省计算机二级vb上机试题题库二、编程题：1 判断一个数是否是素数。
Private sub form_click()Dim x as integer,I as integerX=text1For i=2 to sqr(x) …If x mod i=0 then exit forNext iIf i>sqr(x) thenText2=”x是素数”ElseText2=”x不是素数”EndifEndsub2、求两个任意自然数的最大公约数。
Private sub form_click()Dim m as integer,n as integer,I as integer,r as integerm=text1n=text2R=m mod nDo while r<>0M=nN=rR=m mod nLoopText2=str(n)End sub3、随机生成10个两位正整数，将其中的奇数和偶数分别显示在list1和list2中。
Private sub form_click()Dim a(1 to 10) as integer,I as integerFor i=1 to 10A(i)=int(rnd*90+10)Next iFor i=1 to 10If a(i) mod 2=1 thenList1.additem str(a(i))ElseList2.additem str(a(i))EndifNext iEnd sub4、判断一个数是否是回文数。
Private sub form_click()Dim I as integer,s as stringS=text1For i=1 to len(s)\2If mid(s,I,1)<>mid(s,len(s)-i+1,1) then exit forNext iIf i>len(s)\2 thenPrint s & ”是回文数”ElsePrint s & ”不是回文数”EndifEnd sub5求两个自然数的最小公倍数。
Private sub form_click()Dim m as integer ,x as integer,y as integer,flg as BooleanX=text1:y=text2Flg=falseDo until flgm=m+xIf m mod y=0 thenFlg=trueEnsifLoopText2=str( m)End sub注：还可用先求最大公约数，再求最小公倍数的方法。
6 从键盘接收一个字符，判断其是否是大写字母、小写字母、数字或其他字符。
Private sub form_click()Dim x as stringx = Text1Select Case xCase "A" To "Z"Text2 = "x是大写字母"Case "a" To "z"Text2 = " x是小写字母"Case "0" To "9"Text2 = " x是数字"Case ElseText2 = "x是其他字符"End selectEnd sub7判断一个三位正整数是否是水仙花数。
Private sub form_click()Dim a as integer,b as integer,c as integer,x as integerX=val(text1)A=x\100B=(x-a*100)\10C=x-a*100-b*10If x=a^3+b^3+c^3 thenText2=str(x)+”是水仙花数”ElseText2=str(x)+”不是水仙花数”EndifEnd sub8任意生成10个两位正整数，将这10个数的和显示在text1中，平均值显示在text2中。
Private sub form_click()Dim I as integer,x as integer ,s as integerS=0For i=1 to 10X=int(rnd*90+10)S=s+xNext iText1=str(s)Text2=str(s/10)End sub9求出斐波那契数列的前18项，并按顺序将他们显示在窗体上。
斐波那契数列的递推公式如下：Private sub form_click()Dim fb(1 to 18) as integer,I as integerFb(1)=1:fb(2)=1For i=3 to 18Fb(i)=fb(i-1)+fb(i-2)Next iFor i=1 to 18Print fb(i);Next iEnd sub10求100以内的偶数和，将结果显示在窗体上。
Private sub form_click()Dim I as integer,s as integerS=0For i=2 to 100 step 2S=s+iNext iPrint sEnd sub11任意生成10个两位正整数，使用选择法对其进行升序排序。
Private sub form_click()Dim a(10) as integer,I as integer,j as integerFor i=1 to 10A(i)=int(rnd*90+10)Next iFor i=1 to 9For j=i+1 to 10If a(i)>a(j) thenT=a(i):a(i)=a(j):a(j)=tEndifNext jNext iFor i=1 to 10Print a(i);Next iEnd sub12求6！，将阶乘结果显示在窗体上。
Private sub form_click()Dim I as integer,t as longT=1For i=1 to 6T=t*iNext iPrint tEnd sub13求100以内的奇数和，并将结果显示在窗体上。
Private sub form_click()Dim s as integer,I as integerS=0For i=1 to 100 step 2S=s+iNext iPrint s14任意生成10个两位正整数，使用冒泡法对其进行排序。
Private Sub form_click()Dim a(1 to 10) As Integer, I as integer , J as integer, t As Integer For I = 1 To 10a(I) = Int(Rnd * 90 + 10)Next IFor I = 1 To 9For J = 1 To 10-iIf a(J) > a(J + 1) Thent = a(J): a(J) = a(J + 1): a(J + 1) = tEnd IfNext JNext IFor I = 1 To 10Print a(I);Next IEnd Sub15从键盘接收一个数字，判断其是否小于0，等于0或大于0。
Private sub form_click()Dim x as integerX=inputbox(“输入一个数字”)If x<0 thenPrint “输入的数字小于0”Elseif x=0 thenPrint “输入的数字等于0”ElsePrint “输入的数字大于0”EndifEnd sub16 将20以内的素数求出来，显示在text1文本框中。
Private sub form_click()Dim I as integer,j as integerFor i=1 to 20For j=2 to sqr(i) …也可用i-1或i\2代替sqr(i)If I mod j=0 then exit forNext jIf j>sqr(i) thenText1=text1 & str(i)‟显示在列表框用list1.additem I , 显示在图片框用picture1.print iEndifEnd sub17 判断一个三位的正整数是否是升序数。
Private sub form_click()Dim x as integer ,a as integer ,b as integer ,c as integerX=inputbox(“输入一个三位的正整数”)A=x\100B=(x-a*100)\10C=x-a*100-b*10If a<b and b<c thenPrint “x 是升序数”ElsePrint “x 不是升序数”Endif End sub18编写程序，求下面函数的值，将结果显示在窗体上。
函数如下： ⎪⎪⎩⎪⎪⎨⎧-+-=x xx x y 25222552200>≤<≤<≤x x x xPrivate sub form_click()Dim x as integer ,y as singleX=val(text1)If x<=0 thenY=2-xElseif x>0 and x<=2 thenY=x+2Elseif x>2 and x<=5 thenY=x^2ElseY=25-xEndifPrint y End sub19 将任意输入的三个数按照从大到小的顺序输出。
Private sub form_click()Dim I as integer ,j as integer ,t as single Dim x(1 to 3) as single A=text1:b=text2:c=text3X(1)=a:x(2)=b:x(3)=cFor i=1 to 2For j=i+1 to 3If x(i)<x(j) thenT=x(i):x(i)=x(j):x(j)=tEndifNext jNext iFor i=1 to 3Print x(i)Next iEnd sub20将100以内的素数求出来，显示在picture1中。
Private sub form_click()Dim I as integer ,j as integerPicture1.print 2For i=3 to 100 step 2For j=2 to sqr(i)If I mod j=0 then exit forNext jIf j>sqr(i) thenPicture1.print iEndifNext iEnd sub21随机生成10两位正整数，将这10个数中的最小值求出来，并显示在窗体上。
计算机二级vb考试题库及答案
计算机二级vb考试题库及答案计算机二级vb考试题库一及答案1.下列关于栈的叙述正确的是(D)A)栈是非线性结构B)栈是一种树状结构C)栈具有先进先出的特征D)栈具有后进先出的特征2.若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是(D)A)bdgcefhaB)gdbecfhaC)bdgaechfD)gdbehfca3.根据数据结构中各数据元素之间前后件关系的复杂程度，一般将数据结构分成(C)A)动态结构和静态结构B)紧凑结构和非紧凑结构C)线性结构和非线性结构D)内部结构和外部结构4.下面对对象概念描述错误的是(A)A)任何对象都必须有继承性B)对象是属性和方法的封装体C)对象间的通讯靠消息传递D)操作是对象的动态属性5.软件开发的结构化生命周期方法将软件生命周期划分成(A)A)定义、开发、运行维护B)设计阶段、编程阶段、测试阶段C)总体设计、详细设计、编程调试D)需求分析、功能定义、系统设计6.下列工具中为需求分析常用工具的是(D)A)PADB)PFDC)N-SD)DFD7.开发大型软件时，产生困难的根本原因是(A)A)大系统的复杂性B)人员知识不足C)客观世界千变万化D)时间紧、任务重8.下述关于数据库系统的叙述中正确的是(A)A)数据库系统减少了数据冗余B)数据库系统避免了一切冗余C)数据库系统中数据的一致性是指数据类型一致D)数据库系统比文件系统能管理更多的数据9.单个用户使用的数据视图的描述称为(A)A)外模式B)概念模式C)内模式D)存储模式10.关系数据库管理系统能实现的专门关系运算包括(B)A)排序、索引、统计B)选择、投影、连接C)关联、更新、排序D)显示、打印、制表计算机二级vb考试题库二及答案1.以下程序段运行的结果为(B)Private Sub Form_Click( )MyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)Private Sub Form_Click( )MyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P") End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)Private Sub Form_Click( )MyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong"，则程序运行结果为(A)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong"，则程序运行结果为(B)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的是(A)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：Private Sub Command1_Click( )Dim x!, y!, z!, t!x = Text1y = Text2z = Text3If x y Thent = xx = yy = tEnd IfIf y z Thent = yy = zz = tIf x y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x "," y "," zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为(C)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段：Private Sub Form_Load( )Dim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = ""Result = Num1 * Num2Case 4Op = ""Result = Num1 / Num2End SelectLabel1= Num1 Op Num2 "=" ResultEnd Sub窗体运行后，输入1，则label1的标题显示结果为(A)A.3+2=5B.3-2=1C.32=6D.32=1.5看了“计算机二级vb考试题库及答案”。
秋浙江省高校计算机VB二级等级考试真题试卷(含答案)
2001年秋浙江省高校计算机等级考试试卷 (二级Visual BASIC>说明：<1）考生应将试卷一至试卷三的答案涂在答题卡上，将第四、五题的答案填写在答卷上，否则作无效处理；<2）请将你的准考证号的后四位填写在答卷的右下角指定位置内；<3）考试时间为120分钟。
试卷一、计算机基础题<本题共15分）<一）单选题<每小题1分，共10分）(1>下面 (1>组设备包括输入设备、输出设备和存储设备。
A、CRT、CPU、ROMB、鼠标器、绘图仪、光盘C、磁盘、鼠标器、键盘D、磁带、打印机、激光打印机(2> 微型计算机的更新与发展，主要基于 (2> 的变革。
A、软件B、微处理器C、存储器D、磁盘的容量(3> 内存空间地址段为2001Ｈ——7000Ｈ，则其存储空间为(3>KB。
A、20480B、20.48C、20D、5(4> (4> 是Windows操作的特点。
A、先选择操作命令，再选择操作对象B、先选择操作对象，再选择操作命令C、需同时选择操作对象和操作命令D、需将操作对象拖到操作命令上(5>在Windows的资源管理器中，刚查看了A盘的目录，若在同一驱动器中换了一张软盘，想查看新的目录，可用 (5> 命令。
A、刷新B、更改C、显示D、重显示(6> 在使用Word文本编辑软件时，要把文章中所有出现的“学生”两字都改成以粗体显示，可以选择(6>功能。
A、样式B、改写C、替换D、粘贴(7> 在Word编辑文本时，为了使文字绕着插入的图片排列，可以进行的操作是 (7>。
A、插入图片，设置环绕方式B、插入图片，调整图形比例C、建立文本框，插入图片，设置文本框位置D、插入图片，设置叠放次序(8> 在GB2312-80汉字系统中，计算机把一个汉字表示为 (8> 。
A、汉语拼音字母的ASCII代码B、十进制数的二进制编码C、按字形笔划设计的二进制码D、两个字节的二进制编码(9> 使用电子邮件时，有时收到的邮件有古怪字符，即出现了乱码，这是由于 (9> 。
国家二级VB机试(上机操作)模拟试卷300(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷300(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单，其中“设置”菜单项为灰色(不可用)，如图3—137所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个名称为Hscroll1的水平滚动条，其最大刻度为100，最小刻度为0；再画两个单选按钮，名称分别为Option1、Option2，标题分别为“最大值”、“最小值”，且都未选中。
再通过属性窗口设置适当属性使得程序刚运行时，焦点在滚动条上(如图3—138所示)。
请编写适当的事件过程，使得程序运行时，单击“最大值”单选按钮，则滚动条上的滚动框移到最右端；单击“最小值”单选按钮，则滚动框移到最左端。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sji2．frm。
正确答案：第1小题步骤1：新建一个“标准EXE”工程，利用菜单设计器按表4—81在窗体上建立一个二级菜单。
步骤2：按要求将文件保存至考生文件夹中。
第2小题步骤1：新建一个“标准：EXE”工程，按表4—82在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写两个单选按钮的单击事件过程。
参考代码：Private Sub Option1_Click( )HScroll1．Value=100End SubPrivate Sub Option2_Click( )HScroll1．Value=0End Sub步骤3：按要求将文件保存至考生文件夹中。
解析：第1小题：本题只需按题目要求利用VB菜单设计器建立一个二级菜单。
计算机二级考试VB练习题及答案
计算机二级考试VB练习题及答案计算机二级考试VB练习题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是店铺搜索整理的计算机二级考试VB练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!计算机二级考试VB练习题及答案1.以下程序是求最大公约数和最小公倍数的程序，在【】处填写合适的关系运算符。
Private Sub Form_Click( )Dim m1, n1, m, n, r As Integern1 = InputBox("输入自然数n", "输入数")m1 = InputBox("输入自然数m", "输入数")n = n1m = m1If m<n p="" then<="">t = m: m = n: n = tEnd Ifr = m Mod nDo While r 【<>】 0m = nn = rr = m Mod nLoopPrint "最大公约数=", nPrint "最小公倍数= ", m1 * n1 / nEnd Sub2.下面是求100以内素数的程序。
Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod 【i】 = 0 Then tag = FalseNext iIf tag Then Print mNext mEnd Sub3.下面是求100以内素数的程序，下面说法正确的是(A)(单)Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag=true Then Print mNext mEnd SubA.tag为true时，表示m是素数B.tag为false时，表示m是素数C.语句m Mod i = 0，说明m是素数D.以上说法都不正确4.百元买百鸡问题：假定小鸡每只5角,公鸡每只2元，母鸡每只3元。
浙江省计算机二级vb考试_历年_试题(真题)及详细答案_格式
2008年春浙江省高等学校计算机等级考试试卷(二级Visual Basic)说明：⑴考生应将所有试题的答案填写在答卷上。
其中试题1～试题6，请在答卷上各小题正确选项的对应位置处填“√”；⑵请将你的准考证号的后五位填写在答卷右下角的指定位置内；⑶考试时间为90分钟;试题1（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】单击Command1后用输入对话框输入1个整数，单击Command2后在Text1中显示其反序的数（高位变低位）。
要求在文本框中不可输入任何字符。
例如：输入123显示321，输入-567显示-765。
【程序】(1)Private Sub Form_Load()(2)End SubPrivate Sub Command1_Click()Text1.Text = "": n = InputBox("n=")End SubPrivate Sub Command2_Click()If n < 0 Then n = -n: Text1.Text = "-"While n <> 0Text1.Text = (3)(4)WendEnd Sub【供选择的答案】(1) A、Dim n As Byte B、Dim n As IntegerC、Dim n As StringD、Public n As Byte(2) A、Text1.Locked = True B、Text1.Locked = FalseC、Text1.Visible = TrueD、Text1.Visible = False(3) A、n/10 & Text1.Text B、n Mod 10 & Text1.TextC、Text1.Text & n/10D、Text1.Text & n Mod 10(4) A、n = n \ 10 B、n = n / 10C、n = n Mod 10D、n = n - 10试题2（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
浙江计算机二级vb考试试题及答案
浙江计算机二级vb考试试题及答案一、单项选择题（每题2分，共20分）1. VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 在VB中，以下哪个选项不是控制结构？A. If...Then...ElseB. For...NextC. While...WendD. Function答案：D3. 以下哪个选项是VB中合法的变量名？A. 2variableB. variable2C. $variableD. variable$答案：B4. VB中，以下哪个函数用于计算一个数的绝对值？A. AbsB. SqrC. RoundD. Int5. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arr(5)B. Dim arr(5) As IntegerC. Dim arr(5) As StringD. Both B and C答案：D6. VB中，以下哪个选项是正确的子程序声明？A. Sub MySub()B. Function MySub()C. Both A and BD. None of the above答案：C7. 在VB中，以下哪个选项是正确的事件处理程序的声明方式？A. Private Sub Form_Click()B. Public Sub Form_Click()C. Both A and BD. None of the above答案：A8. VB中，以下哪个选项是正确的窗体属性？A. CaptionB. TextC. Both A and BD. None of the above答案：C9. 在VB中，以下哪个选项是正确的控件事件？B. DoubleClickC. Both A and BD. None of the above答案：C10. VB中，以下哪个选项是正确的文件访问模式？A. Open For InputB. Open For OutputC. Both A and BD. None of the above答案：C二、填空题（每空2分，共20分）1. VB中，使用________函数可以将字符串转换为小写。
国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷100(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个标签，名称为L1，标题为“业余爱好”，再画一个名称为Chl的复选框数组，含三．个复选框，它们的Index属性分别为0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态见表3一1。
运行后的窗体如图3-11所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
(2)在名称为Forml的窗体上画一个文本框，名称为Text1；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使得在运行时，单击“隐藏”菜单项，则文本框消失；单击“显示”菜单项，则文本框显示出来。
运行后的窗体如图3-12所示。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题本题只需按要求画出控件数组，并设置其Value属性。
【操作步骤】步骤1：新建一个“标准EXE”工程。
步骤2：在窗体Forml中加入一个标签和一个复选框，并用“复制”和“粘贴”的方法，生成包含三个元素的复选框数组。
步骤3：分别设置窗体和复选框数组中各元素的相关属性，其属性及值如表4．5所示。
步骤4：按要求将文件保存至考生文件夹中。
第2小题本题需用菜单设计器建立菜单，并编写“显示”和“隐藏”菜单项的单击事件过程控制文本框的visible属性变化。
【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Forml中画一个文本框，在属性设置窗口中将其Name属性值设置为Text1。
(完整版)浙江省计算机等级考试二级VB上机练习题
计算机等级考试上机练习题一、程序设计题浙江省计算机等级考试（二级VB）上机测试的程序设计题，从2002年秋季开始，其题型及考试要求都有较大变化。
要求考生在老考生目录中，按照题目要求，自己新建一工程文件Design.Vbp，按题目要求完成界面设计和编写相应事件代码。
程序设计题的操作步骤如下：1．考生在单击“回答”按钮后，便可启动Visual Basic6.0系统，同时运行考生目录中的Design.exe文件，以便考生设计时随时同程序设计要求最终效果比较。
2．程序界面设计，要求考生设置窗体指定的一些属性，在窗体添加控件，并设置控件的某些属性。
3．编写程序代码，根据题目的要求，在代码窗口中编写相应事件的程序代码，调试运行程序使其程序的运行效果与运行Design.exe的效果相同。
4．将工程以文件名“Design.Vbp”，窗体以文件名“Design.Frm”保存在考生文件夹中。
下面是计算机等级考试（二级Visual Basic程序设计）上机测试的程序设计样题。
如果学生要上机做这些试题，由于你的计算机中没有Design.EXE文件，你可自己启动Visual Basic6.0系统，新建一标准EXE工程，按题目的要求设计界面、添加所需控件并设置相关属性，编写相应事件代码，使其程序运行结果能实现题目的要求。
（二）程序设计题1．请参考Design.exe程序的运行结果，新建一个工程，完成“添加与删除”程序的设计。
将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“添加与删除”，固定边框。
（2）在窗体中引入一个文本框Text1，再在文本框的下面引入一个列表框List1，列表框内容中有四项，分别为“Word、Excel、PowerPoint、Outlook”。
（3）单击“添加”按钮（Command1），将文本框中的内容加到列表框中的第一题，如果文第二部分上机测试练习题171本框中没有内容，则给出提示“没有内容，不予添加”。
计算机二级VB上机操作练习题及答案
计算机二级VB上机操作练习题及答案计算机二级VB上机操作练习题及答案Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，下面店铺为为大家带来计算机二级VB上机操作练习题及答案，希望大家喜欢！一、基本操作题(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。
组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。
运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp，窗体文件名为sjtl.frm。
(2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。
再画两个标题分别为“椭圆”和“圆”的命令按钮。
如下图所示。
要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel 的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。
程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjr2.vbp，窗体文件名为sjr2.frm。
二、简单应用题(1)考生文件夹中有工程文件sjt3.vbv。
窗体上显示有一个列表框和一个文本框，且列表框中已有若干列表项。
程序的功能是，程序运行时，当用户在列表框中单击并选中某个列表项时，该项的内容将显示到文本框中，用户可以在文本框中对相关内容进行编辑，按回车键后，能够用编辑好的内容替换被选中的列表项，并自动清空文本框;当双击某个列表项时，则从列表框中删除该列表项;当用户直接在文本框中键入文本并按回车键后，则把该文本添加为列表框的一个新列表项，添加完成后，将文本框清空。
运行窗体如图所示。
要求：程序已经给出，但不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。
注意：考生不得修改窗体文件中已经存在的控件和程序。
最后程序按原文件名存盘。
浙江省二级vb考试试题及答案
浙江省二级vb考试试题及答案一、选择题（每题2分，共20分）1. VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. LongD. All of the above答案：D2. 在VB中，以下哪个函数用于计算数组中元素的和？A. SumB. CountC. MaxD. Min答案：A3. VB中，以下哪个关键字用于声明一个过程？A. FunctionB. SubC. PropertyD. Class答案：B4. 在VB中，以下哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp5. VB中，以下哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. ListBox答案：B6. 在VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Name答案：A7. VB中，以下哪个选项是正确的循环结构？A. For...NextB. Do...LoopC. While...WendD. All of the above答案：D8. 在VB中，以下哪个函数用于将字符串转换为小写？A. UCaseB. LCaseC. StrCompD. Trim答案：B9. VB中，以下哪个关键字用于声明一个类？B. ModuleC. FunctionD. Sub答案：A10. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Name答案：A二、填空题（每题2分，共20分）1. VB中，声明一个整型变量的关键字是________。
答案：Integer2. 在VB中，使用________函数可以获取当前系统时间。
答案：Now3. VB中，________关键字用于声明一个全局变量。
答案：Public4. 在VB中，________事件用于响应文本框内容的改变。