重庆市计算机等级二级VB历年真题A
- 格式:doc
- 大小:84.00 KB
- 文档页数:12
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行,目前处于紧张的备考阶段,以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案,供参考练习,预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后,VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中,VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中,要将一个窗体装载到内存进行变量初始化等预处理,但没有显示该窗体,应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段:a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后,单击命令按钮,在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
计算机二级考试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考试试题附答案计算机二级vb考试试题(附答案)为帮助大家更好巩固计算机二级VB考试基础知识,yjbys店铺为大家分享最新的计算机二级vb基础试题及答案,希望对同学们考试有所帮助!第一部分计算机基础知识1. 下列有关信息、信息处理、信息技术的叙述中,错误的是___(1)___。
A.信息与物质、能量是客观世界的三大构成要素B.与信息处理相关的行为和活动主要指信息的分类、计算、分析等,但不包含信息的收集和传递C.现代信息技术的主要特征之一是以数字技术为基础D.计算机技术、通信技术均属于信息技术2. 下列有关数字技术与微电子技术的叙述中,错误的是___(2)___A.数字技术是采用有限个状态(主要是两个状态)来表示、处理、存储和传输信息的技术B.比特是信息的基本单位,1个比特可以表示8位二进制数C.集成电路芯片是微电子技术的结晶,是现代信息产业的基础D.Moore定律是指"单块集成电路的集成度平均每18-24个月翻一番"3. 下列有关计算机发展与分类的叙述中,错误的是___(3)___。
A.数字电子计算机诞生于20世纪40年代,个人计算机(微型计算机)产生子20世纪80年代初B.第4代计算机的CPU主要采用中小规模集成电路,第5代计算机采用超大规模集成电路C.计算机分类有多种方法,按其内部逻辑结构通常分为16位机、32位机或64位机等,目前使用的PC机大多是32位机或64位机D.巨型计算机一般采用大规模并行处理的体系结构,我国国防科技大学研制的"天河1号,,巨型计算机,其性能可在全球巨型机排行榜中位居前10名4. 下列有关PC机微处理器的叙述中,错误的是___(4)___A.目前PC机所用的各种微处理器均由Intel公司设计和生产B.微处理器通常由单片集成电路制成C.一台高性能PC机中通常包含多个微处理器D.台式PC机与笔记本PC机采用的微处理器通常有所不同5. 下列有关PC机主板与芯片组的叙述中,错误的是 ___(5)___。
历年计算机二级vb考试试题及答案1. 题目:在VB中,以下哪个选项是正确的数据类型?A. IntegerB. StringC. DoubleD. All of the above答案:D2. 题目:在VB中,以下哪个关键字用于声明一个变量?A. DimB. ConstC. OptionD. Function答案:A3. 题目:在VB中,以下哪个函数用于计算一个数的平方根?A. SqrB. PowC. LogD. Abs答案:A4. 题目:在VB中,以下哪个选项是正确的条件语句?A. If...Then...ElseB. While...End WhileC. For...NextD. Select...Case答案:A5. 题目:在VB中,以下哪个属性用于设置控件的可见性?A. VisibleB. EnabledC. CaptionD. Text答案:A6. 题目:在VB中,以下哪个事件用于在文本框内容发生变化时触发?A. ClickB. ChangeC. DblClickD. KeyPress答案:B7. 题目:在VB中,以下哪个选项是正确的数组声明方式?A. Dim arr(10)B. Dim arr() As IntegerC. Dim arr(10) As IntegerD. Dim arr As Integer(10)答案:C8. 题目:在VB中,以下哪个关键字用于定义一个子程序?A. FunctionB. SubC. PropertyD. Class答案:B9. 题目:在VB中,以下哪个选项是正确的文件访问模式?A. Open For InputB. Open For OutputC. Open For AppendD. All of the above答案:D10. 题目:在VB中,以下哪个函数用于将字符串转换为数字?A. CIntB. CStrC. CDblD. CLng答案:A。
计算机二级vb笔试试题及答案1. 写一个程序,求1到100之间所有偶数的和。
```Dim sum As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNext iMsgBox "1到100之间所有偶数的和为:" & sum```2. 编写一个程序,判断一个输入的年份是否为闰年。
```Dim year As Integeryear = InputBox("请输入年份:")If year Mod 4 = 0 And year Mod 100 <> 0 Or year Mod 400 = 0 Then MsgBox year & "年是闰年。
"ElseMsgBox year & "年不是闰年。
"End If```3. 编写一个程序,输出1到20之间的所有质数。
```Dim i, j As IntegerFor i = 2 To 20For j = 2 To i - 1If i Mod j = 0 ThenExit ForEnd IfNext jIf j = i ThenMsgBox iEnd IfNext i```4. 请简述 VB 中的数组的定义及使用方法。
VB 中的数组可以使用 `Dim` 语句定义,语法为 `DimarrayName(subscripts)`,其中 `arrayName` 为数组名,`subscripts` 为数组的维数和维数的范围。
数组的使用方法包括:- 将值存储到数组中:可以使用 `arrayName(index) = value` 的语法将指定位置的值存储到数组中。
- 获取数组中的值:可以使用 `value = arrayName(index)` 的语法获取数组中指定位置的值。
历年计算机二级vb考试试题及答案计算机二级VB考试是考察考生对VB(Visual Basic)编程语言的掌握程度和应用能力。
以下是历年计算机二级VB考试的试题及答案,供考生参考。
第一部分:选择题1. 下列VB控件中,不是用于用户输入的是:A) 文本框B) 输入框C) 复选框D) 按钮答案: D2. VB运行环境中,可视化地设计界面的工具是:A) MsgBoxB) PaintC) IDED) Debug答案: C3. 下列哪个选项能够将字符串转换为整数类型?A) Str()B) Val()C) Len()D) Mid()答案: B4. VB中表示循环结构的关键字是:A) ForB) WhileC) IfD) Do答案: D5. 下列哪个选项用于定义数组?A) Array[]B) Array()C) List[]D) List()答案: B第二部分:填空题1. 在VB中,实现条件判断可以使用 ___________ 语句。
答案: If2. VB中,用于判断两个变量是否相等的运算符是 ___________。
答案: =3. 在VB中,数组的下标从 ___________ 开始计数。
答案:04. VB中,使用 ___________ 关键字来声明一个变量。
答案: Dim5. VB中,用于结束循环的关键字是 ___________。
答案: Exit第三部分:编程题1. 编写一个VB程序,要求用户输入一个整数n,计算并输出1到n 之间所有整数的和。
答案:Private Sub btnCalculate_Click()Dim n As IntegerDim sum As Integern = Val(txtNumber.Text)sum = 0For i = 1 To nsum = sum + iNext iMsgBox "1到" & n & "之间所有整数的和为:" & sumEnd Sub2. 编写一个VB程序,要求用户输入一个字符串,将字符串中的大写字母全部转换为小写字母,并将结果输出。
重庆市计算机等级二级VB历年真题A-1二级Visual Basic 语言笔试试题(A)一、单项选择题(每题1 分,共20分)1. 执行X = 7 And 3 : Y = 7 Or 3后,比较结果:(A)X = Y (B) X > Y (C) X < Y (D) 发生错误2. 执行X = 7 Mod 3 : Y = 7 \ 3后,比较结果:(A)X = Y (B) X > Y (C) X < Y (D) 发生错误3. 下列常数或表达式中数值最大的为:(A) &H200-1 (B) &HFF+256 (C) 512 (D) &H100+255 4.下列表达式中数值最小的为:(A) –7 / 3 (B) Fix ( -7 / 3 ) (C) -Int (7 / 3 ) (D) Int ( -7 / 3 )5.执行Print Int ( 12.34567 * 1000 ) / 1000 后,显示的结果为:(A)12.000 (B)12.34 (C)12.345 (D)12.34566. 从A$ = "Windows Application",中取出"Application" 子字符串所用到的函数是:(A)Left$ (A$, 10) (B)Right (A$, 10)(C)Mid$ (A$, 9, 10) (D)Mid$(A$, 9)7. 如要将一个数值变量A中的数值在标签Label1上显示,正确的语句是:(A) = A (B)Label1.Tag = A(C)Label1.Caption = A (D)Label1.Top = A8. 如要将一个字符串变量A中的字符串在标签Label1上显示,正确的语句是:(A) = A (B)Label1.Tag = A(C)Label1.Caption = A (D)Label1.Top = A9. 如要读出文本框Text1上显示的字符串,正确的语句是:(A)X$ = (B)X$ = Text1.Tag(C)X$ = Text1.Font (D)X$ = Text1.Text10.按下鼠标左键或右键,将能够区分鼠标的左、右键的事件是:(A)Click (B)DblClick (C)MouseDown (D)DragDrop11. 命令按钮Command1表面可以显示在Picture属性中的图片,必须设置命令按钮的:(A)Command1.Apearance = Flat (B)Command1.Visible = True(C)Command1.Style = Graphical (D)Command1.Enable = True12.命令按钮Command1的Picture, DownPicture和DisabledPicture属性都已装入图形,当命令按钮的Enable = False时,在命令按钮表面显示的图形为:(A)DownPicture 属性中的图形(B)DisabledPicture属性中的图形(C)Picture属性中的图形(D)Picture属性中的图形,但呈现为灰色13. 将命令按钮Command1表面显示的图片复制到图片框Picture1中的语句是:(A)Picture1=Command1.Picture (D)Picture1.Picture =Command1.DownPicture(C)Picture1.Picture =Command1 (B)Picture1=Command1.DisablePicrure14. 将到图片框Picture1中的图片复制到命令按钮Command1表面显示的语句是:(A)Command1=Picture1.Picture (B)Command1.DisablePicrure=Picture1(C)Command1.Picture =Picture1 (D)Command1.DownPicture=Picture1.Picture15.在二个图片框中各有一组单选按钮OptionButton,其作用为:( A)两组单选按钮中只有一个能被选中(B)因有两组单选按钮,无一可被选中(C)两组单选按钮中各有一个能被选中(D)两组单选按钮中各有一个以上的能被选中16.在二个图片框中各有一组复选框CheckBox,其作用为:(A)两组复选框中只有一个能被选中(B)因有两组复选框,无一可被选中(C)两组复选框中各有一个能被选中(D)两组复选框中各有多个能被选中17. 图片框的FillStyle 属性为Solid,用Line方法绘制矩形框,若省略F选项,填充的色彩为图片框的:(A)BackColor属性(B)FillColor属性(C)ForeColor 属性(D)固定为黑色18. 图片框的FillStyle 属性为Solid,在用Line方法绘制矩形框时,若省略色彩选项,矩形框的边界色彩为:(A)BackColor属性(B)FillColor属性(C)ForeColor 属性(D)固定为黑色19. 定时器Timer控件触发Timer事件触发过程的时间间隔为:(A)每秒触发一次(B)每隔Interval属性中设定的时间间隔触发一次(C)每毫秒触发一次(D)每隔由Windows系统设定的时间间隔触发一次20.以顺序输出(写文件)模式打开文件"Test.Dat" 的语句是:(A)Open "Test.Dat" For Output As #1(B)Open "Test.Dat" For Input As #2(C)Open "Test.Dat" For Binary As #3(D)Open "Test.Dat" For Random As #4 Len = 16二、多项选择题: (每题1分, 共10分)1.绝对值小于4的表达式有:(A)7\2 (B)-7\2 (C)Int(7/2) (D)Int(-7/2) (E)Fix(-7/2)2.在VB中,呈现灰色的色彩表示法有:(A)&H808080 (B)&H80C080 (C)QBColor(7)(D)RGB(128,128,128) (E)RGB(128,255,128)3. 整数A > B, 产生一个大于等于B且小于A的随机整数的表达式为:(A)Int((A-B)*Rnd+1) (B)Int((A-B +1)*Rnd+B) (C)A+Int((A-B -1)*Rnd)(D)Int((A-B) *Rnd+B)`(E)B+Int((A-B)*Rnd)4. 具有标题Caption属性的控件有:(A)标签Label (B)窗体Form (C)框架Frame(D)图片框PictureBox (E)命令按钮CommandButton5.在其表面可以显示图形的控件有:(A)图象框Image (B)复选框CheckBox (C)单选按钮OptionButton(D)图片框PictureBox (E)命令按钮CommandButton6. 控件的MousePoint属性上可将光标的形状设置为:(A)Arrow (B) Cross (C)I-Beam (D)Up Arrow (E)HourGlass7.在键盘上按空格键,并立即松开,被触发的事件有:(A)KeyUp (B)KeyDown (C)KeyPress (D)Click (E)DbClick8.在控件上按下鼠标右键, 并立即松开,被触发的事件有:(A)Click事件(B)DbClick事件(C)MouseDown事件(D)MouseMove事件(E)MouseUp事件9. 一个控件数组中的控件必须符合的条件是:(A)数组中的每个控件类型相同(B)数组中的每个控件的名称相同(C)数组中的每个控件的大小都必须相同(D)数组中的每个控件的位置都必须相同(E)数组中的每个控件的索引(Index)属性相同10.VB的工程菜单(Project)中部件(Components)菜单项中有很多功能强大的外部控件:(A)通用对话框CommonDialog (B)高级文本框RichTextBox(C)日历Calender (D)Internet浏览器WebBrowsers(E)接收和发送E-Mail的控件MAPISession和MAPIMessages三、判断分析(每题1分, 共10分)(下列各小题的叙述是否正确,如正确,请选择“?”;如错,请选择“?”。
计算机vb二级考试试题及答案一、选择题(每题2分,共20分)1. VB中用于声明变量的关键字是:A. DimB. DeclareC. ConstD. Let答案:A2. 在VB中,下列哪个选项不是合法的变量名?A. _myVariableB. 123VariableC. myVariableD. Variable$答案:B3. VB中,用于结束一个循环的语句是:A. ContinueB. ExitC. BreakD. Stop答案:B4. 在VB中,下列哪个函数用于计算字符串的长度?A. Len()B. Length()C. StrLen()D. Size()答案:A5. 下列哪个选项不是VB中的流程控制语句?A. If...ThenB. For...NextC. Do...LoopD. Switch...Case答案:D6. VB中,用于定义一个类模块的关键字是:A. ClassB. ModuleC. FormD. Sub答案:A7. 在VB中,下列哪个选项是正确的事件处理程序的声明方式?A. Private Sub Button1_Click()B. Public Sub Button1_Click()C. Private Function Button1_Click()D. Public Function Button1_Click()答案:A8. VB中,用于创建一个数组的语句是:A. Dim arr(5) As IntegerB. Dim arr As Integer(5)C. Dim arr As Integer[5]D. Dim arr(5) As Integer()答案:A9. 在VB中,下列哪个选项不是合法的数值类型?A. IntegerB. DoubleC. StringD. Long答案:C10. VB中,下列哪个选项是正确的字符串连接操作?A. "Hello" & "World"B. "Hello" || "World"C. "Hello" + "World"D. "Hello" ||| "World"答案:A二、填空题(每题2分,共10分)1. 在VB中,使用________函数可以将数字转换为字符串。
计算机二级《VB》考题与答案计算机二级《VB》考题与答案 1单选题(每小题1分共30分)在微机中,1MB准确等于__B__。
A、 1024×1024个字B、 1024×1024个字节C、 1000×1000个字节D、 1000×1000个字十进制整数100化为二进制数是_A___。
A、 1100100B、 1101000C、 1100010D、 1110100 计算机病毒是指___C_ 。
A、带细菌的磁盘B、已损坏的磁盘C、具有破坏性的特制程序D、被破坏的程序计算机的主存储器是指 __C__。
A、RAM和磁盘B、ROMC、ROM和RAMD、硬盘和控制器下列描述中不正确的是_B___。
A、多媒体技术最主要的两个特点是集成性和交互性B、所有计算机的字长都是固定不变的,都是8位C、通常计算机的存储容量越大,性能就越好D、各种高级语言的翻译程序都属于系统软件在_C___视图下可以插入页眉和页脚。
A、普通B、大纲C、页面D、主控文档8.关于Word的常用工具栏,下面说法正确的是( C )。
A.不包括文档建立B.不包括打印预览C.不包括自动滚动D.不能设置字体9、在Windows的回收站中,可以恢复 __A__。
A、从硬盘中删除的文件或文件夹B、从软盘中删除的文件或文件夹C、剪切掉的文档D、从光盘中删除的文件或文件夹10、为获得WINDOWS帮助,必须通过下列途径__D_。
A、在“开始”菜单中运行“帮助”命令B、选择桌面并按F1键C、在使用应用程序过程中按F1键D、A和B都对11、在WORD中查找和替换正文时,若操作错误则__A__。
A、可用“撤消”来恢复B、必须手工恢复C、无可挽回D、有时可恢复,有时就无可挽回12、在Word中,___B___用于控制文档在屏幕上的'显示大小。
A、全屏显示B、显示比例C、缩放显示D、页面显示13、Word在正常启动之后会自动打开一个名为___D___的文档。
计算机二级VB考试题含答案计算机二级VB考试题含答案计算机二级VB考试题及答案1.以下能判断指针是否指向文件尾的函数是(D)(单)A.BOFB.LOCC.LOFD.EOF2.如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是(B)(单)A.如果工程中含有SubMain过程,则程序一定首先执行该过程B.不能把标准模块设置为启动模块C.用Hide方法只是隐藏一个窗体,不能从内存中清除该窗体D.任何时刻最多只有一个窗体是活动窗体3.窗体的过程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAs Single),有4个参数,关于这些参数,正确的描述是(D)(单)A.通过Button参数判定当前按下的是键盘上哪一个键B.Shift参数只能用来确定是否按下Shift键C.Shift参数只能用来确定是否按下Alt和Ctrl键D.参数x,y用来设置鼠标当前位置的坐标4.设组合框Combo1中有3个项目,则以下能删除最后一项的语句是(B)(单)bo1.RemoveItemTextbo1.RemoveItem2bo1.RemoveItem3bo1.RemoveItemCombo1.Listcount5.以下关于焦点的叙述中,错误的是(A)(单)A.如果文本框的Enabled属性为False,能接收从键盘上输入的数据B.当文本框失去焦点时,触发LostFocus事件C.当文本框的Enabled属性为False时,其Tab顺序不起作用D.可以用TabIndex属性改变Tab顺序6.如果要在菜单中添加一个分隔线,则应将其Caption属性设置为(D)(单)A.=B.*C.&D.-7.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程:PrivateSubCommand1_Click()n=val(Text1.Text)SelectCasenCase1To20x=10Case2,4,6x=20CaseIs<10x=30Case10x=40EndSelectText2.Text=xEndSub程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是(A)(单)A.10B.20C.30D.408.设有以下循环结构Do循环体LoopWhile<条件>则以下叙述中错误的是(A)(单)A.若"条件"是一个为0的常数,则一次也不执行循环体B."条件"可以是关系表达式、逻辑表达式或常数C.循环体中可以使用ExitDo语句D.如果"条件"总是为True,则不停地执行循环体9.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum>6Printnum;num=num+2.4LoopEndSub程序运行后,单击命令按钮,则窗体上显示的内容是(B)(单)A.13.45.8B.135C.147D.无数据输出10.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1s=s+aa=a-1LoopWhilea<=0Prints;aEndSub程序运行后,单击命令按钮,则窗体上显示的内容是(C)(单)A.79B.340C.97D.死循环11.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20y=2f=x*yEndFunctionPrivateSubCommand1_Click()StaticxAsIntegerx=10y=f(x)Printx;yEndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是(C)(单)A.105B.205C.2040D.104012.设有如下通用过程:PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextIEndSub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程:PrivateSubCommand1_Click()Dimarr(5)AsVariantFori=1To5arr(i)=iNextICallFun(arr(),n)Text1.Text=nEndSub程序运行后,单击命令按钮,则在文本框中显示的内容是(A)(单)A.10B.15C.25D.2413.在窗体上画一个名称为Command1的`命令按钮,然后编写如下代码:OptionBase1PrivateSubCommand1_Click()d=0c=10x=Array(10,12,21,32,24)Fori=1To5Ifx(i)>cThend=d+x(i)c=x(i)Elsed=d-cEndIfPrintdEndSub程序运行后,如果单击命令按钮,则在窗体上输出的内容为(C)(单)A.89B.99C.23D.7714.在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;六个标签,名称分别为Label1、Label2、Label3、Label4、Label5、Label6,其中标签Label4、Label6分别显示"A"、"B"、"A*B"等文字信息,标签Label1、Label2分别显示Hscroll1、Hscroll2滚动条的数值,Label3显示A*B的计算结果。
计算机二级vb考试题库及答案一、单项选择题(每题2分,共20分)1. VB中,以下哪个函数用于计算字符串的长度?A. UCaseB. LCaseC. LenD. Mid答案:C2. 在VB中,以下哪个选项表示“不等于”的比较运算符?A. =B. <>C. ==D. <=答案:B3. VB中,以下哪个控件用于显示图像?A. LabelB. PictureBoxC. TextBoxD. ComboBox答案:B4. 在VB中,以下哪个关键字用于声明一个过程?A. FunctionC. DimD. Const答案:B5. VB中,以下哪个选项是正确的变量声明方式?A. Dim xB. Dim x%C. Dim x$D. All of the above答案:D6. 在VB中,以下哪个语句用于结束当前循环?A. ContinueB. ExitC. BreakD. Loop答案:B7. VB中,以下哪个控件用于接收用户输入的文本?A. CheckBoxB. TextBoxC. ListBoxD. ComboBox答案:B8. 在VB中,以下哪个选项表示“大于等于”的比较运算符?B. <=C. >=D. <答案:C9. VB中,以下哪个函数用于将字符串转换为大写?A. UCaseB. LCaseC. StrCompD. Trim答案:A10. 在VB中,以下哪个关键字用于声明一个数组?A. DimB. ConstC. FunctionD. Sub答案:A二、填空题(每题2分,共20分)1. VB中,使用________函数可以将字符串中的字符转换为小写。
答案:LCase2. VB中,使用________关键字可以声明一个全局变量。
答案:Public3. VB中,使用________语句可以创建一个新的过程。
答案:Sub 或 Function4. VB中,使用________控件可以显示和选择多个项目。
2024年等级考试-计算机二级-VB语言程序设计考试历年真题常考点试题带答案(图片大小可任意调节)第1卷一.单选题(共20题)1.如果要改变窗体的标题,则需要设置的属性是A.BorderStyleC.BackColorD.Caption2.窗体的 DrawWidth属性值设置为大于 1 时,下列 ( ) 属性会失去作用A.BackcolorB.FillStyleC.DrawstyleD.Fillcolor3.要改变控件的宽度,应修改该控件的 ( ) 属性。
A.TopB.LeftC.WidthD.Height4.要使鼠标指向“命令按钮”时,出现一个提示文本,应设置其()属性。
A.ToolTipTextB.StyleC.PictureD.Caption5.下面方法不属于列表框和组合框。
B.AddItemC.GetFocusD.RemoveItem6.为了把焦点移到某个指定的控件,所使用指定的控件的()方法.A.VisibleB.RefreshC.SetFocusD.GetFocus7.下列数据类型中,占用内存最大的是A.BooleanB.IntegerC.ByteD.Single8.要使标签控件标题内容居中显示,应设置其()属性。
A.ToolTipTextB.AlignmentC.BackStyleD.Appearance9.定时器控件唯一能够响应的事件为()A.Click事件B.Timer事件C.Change事件D.DblClick事件10.对象不具有 Caption 属性。
belB.OptionC.FormD.Timer11.产生[10,37]之间的随机整数的VisualBasic表达式是A.Int(Rnd(1)*27)+11B.Int(Rnd (1)*28)+11C.Int (Rnd(1) w28)+10D.In t(Rnd(1)*27)+1012.以下关键字中,不能定义变量的就是()C.PublicD.Private13.下列数据类型中,占用内存最小的是A.BooleanB.ByteC.IntegerD.Single14.程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是A.LoadB.ClickC.MouseDownD.MouseUp15.以下关于窗体的描述中,错误的是()。
二级Visual Basic笔试模拟试题(共100分)注意事项: 1. 请将一、二、三题的答案填涂在答题卡上2. 请将四、五、六题的答案做在答题纸上一、单项选择题(每小题1分,共25分)1.用于设置粗体字的属性是( d )。
(A)FontItalic (B)FontName (C)FontBold (D)FontSize2.语句Me.Print "the"; Spc(2); "sun"执行后在窗体上输出的结果是( a )。
(A)the sun (B)thesun (C)"the"; "sun" (D)the Spc(2) sun 3.设有说明语句:Option Base 1: Dim arr(-3 to 3,10),则数组arr中元素个数为(b )。
(A)60 (B)70 (C)80 (D)904.以下属性与方法中,(c )可以重新定义窗体的坐标系。
(A)DrawStyle (B)DrawWidth (C)DrawMode (D)Scale5.当运行VB程序时,系统在窗体加载时将自动执行窗体的(a )事件过程。
(A)Load (B)Click (C)UnLoad (D)GotFocus 6.Visual Basic 是一种面向对象的可视化程序设计语言,采取了(a)的编程机制。
(A)事件驱动(B)按过程顺序执行(C)从主程序开始执行(D)按模块顺序执行7.下列程序段中,不能把x和y中的较大者赋予变量Max的是( d )。
(A)Max = IIf(x > y, x, y)(B)If x > y Then Max = x Else Max = y(C)If x >= y Then Max = x Else Max = y(D)If x >= y Then Max = y Else Max = x8.在文本框中输入的数据,其默认的数据类型是(b)。
全国计算机二级考试《VB》操作试题及答案全国计算机二级考试《VB》操作试题及答案一、基本操作题(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2中,单击“清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。
运行时的窗体如图所示。
要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sit2.vbp,窗体文件名为sjt2.frm。
二、简单应用题(1)在考生文件夹F有一个工程文件sjt3.vbp,窗体上已经有一个标签Labell,请添加一个单选按钮数组,名称为Opl,含三个单选按钮,它们的Index 属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽车”,再添加一个名称为Textl的文本框。
窗体文件中已经给出了Opl的Click事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在程序运行时单击“飞机”或“火车”单选按钮时,在Textl中显示“我坐飞机去”或“我坐火车去”,单击“汽车”单选按钮时,在Text1中显示“我开汽车去”,如图所示。
国家二级计算机vb考试试题及答案一、单项选择题1. 下列选项中,属于VB常用数据类型的是:A) IntegerB) StringC) BooleanD) All of the above答案: D2. 下列关于VB中函数和子过程的说法,哪个是正确的?A) 函数可以返回一个值,子过程不能返回值B) 函数和子过程都可以返回一个值C) 函数和子过程都不能返回值D) 函数和子过程都可以返回多个值答案: A3. VB中的控件“Label”用于:A) 显示文本信息B) 接受用户的输入C) 显示图像D) 进行数据计算操作答案: A4. 下列关于VB中数组的说法,哪个是正确的?A) 数组的下标从0开始B) 数组的下标从1开始C) 数组的下标可以是负数D) 数组的下标可以是小数答案: A5. VB中用于处理数据的语句不包括:A) If-ThenB) For-NextC) Do-WhileD) Break-Continue答案: D二、填空题1. VB中,用于变量声明与赋值的是_________语句。
答案: Dim2. VB中,执行循环的语句是___________。
答案: For-Next3. VB中,用于判断条件的语句是___________。
答案: If-Then4. VB中,用于定义子过程的关键字是_____________。
答案: Sub5. VB中,用于结束程序的语句是____________。
答案: End三、编程题编写一个VB程序,实现计算一个数字列表的平均值的功能。
具体要求如下:1. 创建一个名为"frmAverageCalculator"的窗体,包含一个Label控件、一个TextBox控件和一个Button控件。
2. 在Label控件中显示提示信息:"请输入数字,以逗号分隔:"。
3. 用户在TextBox控件中输入一组数字列表,以逗号分隔,例如:"1,2,3,4,5"。
4月重庆市计算机二级VF真题及答案Visual重庆二级Visual Foxpro笔试试题(A卷)(共100分)一、单项选择题(每小题1分,共30分)1.Visual Foxpro设置默认目录的命令是()A)SET ***** TO C)set date to A)数值型A)0 B)SET *****N TO 默认目录D)set deleted to 默认目录C)逻辑型D)4D)D2-MD)2357 D)日期型2.字段的宽度不是由系统自动给出的字段类型是()B)备注型3.函数len(“ABCD”-“ABCD”)的值是()B)8C)94.设D1和D2为日期型数据,M为整数,不能进行的运算是()A)D1+D2 A)-2357B)D1-D2 B)-2356.00C)D1+M5.函数round(-2356.78,-2)的值是()C)-24006.下列表达式中,运算结果为.t.的是()A)AT(“BB”,”ABCD”)=0 C)chr(ASC()) A)-20.60B)”[重庆]”$”朝天门重庆商城” D)subs(“数据库技术”,7,4) C)-20.00D)-41.007.执行?VAL(”-20.6*2”)命令后,结果是()B)41.208.连续执行以下命令之后,最后一条命令的输出结果是()SET EXACT OFF X=”重庆”?IIF(”重庆”$”双重喜庆”,”“+x, ”“-x)A 代表空格9.要使用数组arr1更新当前数据表的当前记录,应使用命令()A)scatter to arr1 C)append from arr1B)dimension arr1 D)gather from arr1 B)祝福重庆CD)10.将学生按籍贯(C,10)字段升序排列,如果籍贯相同,则按学号(N,4)升序排列,正确的表达式是()A)籍贯,学号B)籍贯+学号D)籍贯+STR(学号,4)C)籍贯,STR(学号,4)11.假设打开工资表,按基本工资建立升序索引,然后执行了赋值语句N=800,则下列各条命令中,错误的是()A)SEEK N B)SEEK FOR 基本工资=N D)LOCATE FOR 基本工资=NC)FIND 100012.下列关于视图的描述中,错误的是()A)通过视图可以对表进行查询B)对过视图可以对表进行更新C)视图是一个虚表D)视图就是一种查询13.设数据表文件在当前工作区已经打开,命令:COPY FIELDS 字段名表TO 文件名完成的工作相当于关系运算()A)连接B)选择C)自然连接D)投影14.在当前打开的图书数据表文件中,书号字段为字符型,要求将书号以字母D开头的所有图书记录复制到TS.DBF中,应使用的命令是()A)COPY TO TS for “D”$书号B)COPY TO TS for SUBSTR(书号,1,1)=“D” C)COPY TO TS for 书号=“D*”D)COPY TO TS for right(书号,1)=“D” 15.数据库系统中对数据库进行管理的核心软件是()A)DBMSB)DBC)OSD)DBS16.如果在表之间的联系中设置了参照完整性规则,并在删除规则中选择了“限制”,则当删除父表中的记录时,系统将如何处理?()A)不做对照完整性检查B)不准删除父表中的记录C)自动删除子表中所有相关记录D)若子表中有相关记录,则禁止父表中记录17.执行命令***** WHILE 性别=”女”时,屏幕上显示了若干记录,但执行命令***** WHILE 性别=”男”时,屏幕上没有显示任何记录,这说明()A)表文件是空文件B)表文件中没有性别字段值为”男”的记录C)表文件中的第一个记录的性别字段值不是“男” D)表文件中当前记录的性别字段不是“男”18.下列关于DELETE-SQL命令的正确描述是()A)该命令不需要指定删除表的名称B)可以删除一个数据库文件C)只能逻辑删除数据表中的记录D)删除的记录不能用Recall命令恢复19.在SELECT-SQL的查询结果中,消除重复记录的方法是()A)通过指定主关键字B)通过指定惟一索引D)使用HAVING子句C)使用*****T子句20.在SELECT-SQL的HAVING子句的描述中错误的是()A)HAVING子句必须与GROUP BY子句同时使用B)HAVING子句与GROUP BY子句无关C)使用WHERE子句的同时可以使用HAVING子句D)使用HAVING子句的作用是限定分组的条件21.在SELECT-SQL语句中,与表达式“工资Between 1000 and 1500”功能相同的表达式是()A)工资=1000 and 工资=1500 B)工资=1500 and 工资=1000 C)工资=1000 or 工资=1500 D)工资=1500 or 工资=100022.要显示数据表STU.dbf中“平均分”超过90分和不及格的全部女生记录,应使用的SQL命令是()A)SELEC * from stu where 性别=”女” .or. (平均分=90 .and. 平均分=60)B)SELEC * from stu where 性别=”女” .and. 平均分90 .and. 平均分60 C)SELEC * from stu where 性别=”女” .and. 平均分90 .or. 平均分60 D)SELEC * from stu where 性别=”女” .and. (平均分90 .and. 平均分60)23.下列对函数的说法中正确的是()A)若函数不带参数,则调用该函数时,函数名后面的圆括号可以省略B)若函数有多个参数,则各参数间应用空格隔开C)调用函数时,参数的类型、个数和顺序不一定要一致D)调用函数时,函数名后若有圆括号,则不论有无参数都不能省略24.顺序执行下列命令:X=100 Y=8 X=x+y?x,x=x+y显示结果为()A)100 .f. X=15 Y=17 Do while x=y X=x+1Enddo ?x A)15B)16C)17D)18D)计时器26.在Visual FoxPro常用的基类中,运行时不可见的是()A)命令按钮组B)复选框C)表格27.将文本框的PasswordChar属性设置为星号(*),那么,当在文本框中输入”电脑2010”时,文本框中显示的是()A)电脑2010 A)A = BA)LostFocusB)DestroyB=AB)100 .t. C)108 .t. D)108 .f.25.下面程序的运行结果是()B)__ C)__C)A=A+BB=A-BA=B-AD)错误设置,无法输入D)C=AA=BB=C28.下列哪组语句可以将变量A、B的值互换?()B)=(A+B )/2 AB=(A-B)/229.运行程序时,对象的初始化事件是()C)InitD)Click30.要运行表单文件form1.scx,下列命令正确的是()A)Do form1.scx C)run form1.scx二、判断题(每小题1分,共10分)1.内存与字段名变量都是独立于数据表而存在的。
计算机等级考试二级VB真题附答案范文一份计算机等级考试二级VB真题附答案12017年计算机等级考试二级VB真题附答案一、选择题1). ABC.DBF是一个具有两个备注型字段的数据表文件,若使用COPY TO TEMP命令进行复制操作,其结果是A.得到一个新的数据表文件B.得到一个新的数据表文件和一个新的备注文件C.得到一个新的数据表文件和两个新的备注文件D.错误信息,不能复制带有备注型字段的数据表文件正确答案:B2). 若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是A.bdgcefhaB.gdbecfhaC.bdgaechfD.gdbehfca正确答案:D3). 已知一棵二叉树前序遍历和中序遍历分别为__H和__F,则该二叉树的后序遍历为A.__AB.__AC.__HD.__G正确答案:B4). 下面有关注释语句的格式,错误的是A.Rem注释内容B.′注释内容C.a=3:b=2 ′对a、b赋值D.Private Sub Command1_MouseDown(button As Integer , shift As Integer , _Rem 鼠标按下事件的命令调用过程X As Single ,Y As Single)正确答案:D5). 栈底至栈顶依次存放元素A、B、C、D,在第五个元素E 入栈前,栈中元素可以出栈,则出栈序列可能是A.ABCEDB.DCBEAC.DBCEAD.CDABE正确答案:B二、基本操作题(1)在名称为Forml的窗体上添加一个名称为Shapel的形状控件,通过设置参数使其形状为圆形;添加一个名称为Labell的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Textl的文本框,文本框最多能够显示5个字符,文本框中初始内容为“圆形”注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sitl.frm,工程文件名为sjtl.vbp。
重庆市计算机等级二级VB历年真题A-1二级Visual Basic 语言笔试试题(A)一、单项选择题(每题 1 分,共20分)1. 执行X = 7 And 3 : Y = 7 Or 3后,比较结果:(A)X = Y (B) X > Y (C) X < Y (D) 发生错误2. 执行 X = 7 Mod 3 : Y = 7 \ 3后,比较结果:(A)X = Y (B) X > Y (C) X < Y (D) 发生错误3. 下列常数或表达式中数值最大的为:(A) &H200-1 (B) &HFF+256 (C) 512 (D) &H100+2554.下列表达式中数值最小的为:(A) –7 / 3 (B) Fix ( -7 / 3 ) (C) -Int (7 / 3 ) (D) Int ( -7 / 3 ) 5.执行 Print Int ( 12.34567 * 1000 ) / 1000 后,显示的结果为:(A)12.000 (B)12.34 (C)12.345 (D)12.34566. 从A$ = "Windows Application",中取出 "Application" 子字符串所用到的函数是:(A)Left$ (A$, 10) (B)Right (A$, 10)(C)Mid$ (A$, 9, 10) (D)Mid$(A$, 9)7. 如要将一个数值变量A中的数值在标签Label1上显示,正确的语句是:(A) = A (B)Label1.Tag = A(C)Label1.Caption = A (D)Label1.Top = A8. 如要将一个字符串变量A中的字符串在标签Label1上显示,正确的语句是:(A) = A (B)Label1.Tag = A(C)Label1.Caption = A (D)Label1.Top = A9. 如要读出文本框Text1上显示的字符串,正确的语句是:(A)X$ = (B)X$ = Text1.Tag(C)X$ = Text1.Font (D)X$ = Text1.Text10.按下鼠标左键或右键,将能够区分鼠标的左、右键的事件是:(A)Click (B)DblClick (C)MouseDown (D)DragDrop11. 命令按钮Command1表面可以显示在Picture属性中的图片,必须设置命令按钮的:(A)Command1.Apearance = Flat (B)Command1.Visible = True(C)Command1.Style = Graphical (D)Command1.Enable = True12.命令按钮Command1的Picture, DownPicture和DisabledPicture属性都已装入图形,当命令按钮的Enable = False时,在命令按钮表面显示的图形为:(A)DownPicture 属性中的图形 (B)DisabledPicture属性中的图形(C)Picture属性中的图形 (D)Picture属性中的图形,但呈现为灰色13. 将命令按钮Command1表面显示的图片复制到图片框Picture1中的语句是:(A)Picture1=Command1.Picture (D)Picture1.Picture =Command1.DownPicture(C)Picture1.Picture =Command1 (B)Picture1=Command1.DisablePicrure14. 将到图片框Picture1中的图片复制到命令按钮Command1表面显示的语句是:(A)Command1=Picture1.Picture (B)Command1.DisablePicrure=Picture1 (C)Command1.Picture =Picture1 (D)Command1.DownPicture=Picture1.Picture15.在二个图片框中各有一组单选按钮OptionButton,其作用为:( A)两组单选按钮中只有一个能被选中(B)因有两组单选按钮,无一可被选中(C)两组单选按钮中各有一个能被选中(D)两组单选按钮中各有一个以上的能被选中16.在二个图片框中各有一组复选框CheckBox,其作用为:(A)两组复选框中只有一个能被选中 (B)因有两组复选框,无一可被选中(C)两组复选框中各有一个能被选中 (D)两组复选框中各有多个能被选中17. 图片框的FillStyle 属性为Solid,用Line方法绘制矩形框,若省略F选项,填充的色彩为图片框的:(A)BackColor属性 (B)FillColor属性(C)ForeColor 属性 (D)固定为黑色18. 图片框的FillStyle 属性为Solid,在用Line方法绘制矩形框时,若省略色彩选项,矩形框的边界色彩为:(A)BackColor属性 (B)FillColor属性(C)ForeColor 属性 (D)固定为黑色19. 定时器Timer控件触发Timer事件触发过程的时间间隔为:(A)每秒触发一次 (B)每隔Interval属性中设定的时间间隔触发一次(C)每毫秒触发一次 (D)每隔由Windows系统设定的时间间隔触发一次20.以顺序输出(写文件)模式打开文件 "Test.Dat" 的语句是:(A)Open "Test.Dat" For Output As #1(B)Open "Test.Dat" For Input As #2(C)Open "Test.Dat" For Binary As #3(D)Open "Test.Dat" For Random As #4 Len = 16二、多项选择题: (每题1分, 共10分)1.绝对值小于4的表达式有:(A)7\2 (B)-7\2 (C)Int(7/2) (D)Int(-7/2) (E)Fix(-7/2)2.在VB中,呈现灰色的色彩表示法有:(A)&H808080 (B)&H80C080 (C)QBColor(7)(D)RGB(128,128,128) (E)RGB(128,255,128)3. 整数A > B, 产生一个大于等于B且小于A的随机整数的表达式为:(A)Int((A-B)*Rnd+1) (B)Int((A-B +1)*Rnd+B) (C)A+Int((A-B -1)*Rnd)(D)Int((A-B) *Rnd+B)`(E)B+Int((A-B)*Rnd)4. 具有标题Caption属性的控件有:(A)标签 Label (B)窗体 Form (C)框架 Frame(D)图片框 PictureBox (E)命令按钮CommandButton5.在其表面可以显示图形的控件有:(A)图象框Image (B)复选框 CheckBox (C)单选按钮OptionButton(D)图片框 PictureBox (E)命令按钮CommandButton6. 控件的MousePoint属性上可将光标的形状设置为:(A)Arrow (B) Cross (C)I-Beam (D)Up Arrow (E)HourGlass7.在键盘上按空格键,并立即松开,被触发的事件有:(A)KeyUp (B)KeyDown (C)KeyPress (D)Click (E)DbClick8.在控件上按下鼠标右键, 并立即松开,被触发的事件有:(A)Click事件 (B)DbClick事件(C)MouseDown事件 (D)MouseMove事件 (E)MouseUp事件9. 一个控件数组中的控件必须符合的条件是:(A)数组中的每个控件类型相同 (B)数组中的每个控件的名称相同(C)数组中的每个控件的大小都必须相同 (D)数组中的每个控件的位置都必须相同(E)数组中的每个控件的索引(Index)属性相同10.VB的工程菜单(Project)中部件(Components)菜单项中有很多功能强大的外部控件:(A)通用对话框CommonDialog (B)高级文本框RichTextBox(C)日历Calender (D)Internet浏览器WebBrowsers(E)接收和发送E-Mail的控件MAPISession和MAPIMessages三、判断分析 (每题1分, 共10分)(下列各小题的叙述是否正确,如正确,请选择“?”;如错,请选择“?”。
)1.在VB中,未经声明的变量的数据类型为Variant通用型。
2.已经声明,但未经赋值的数值变量的初值为0。
3.已经声明,但未经赋值的字符串变量的初值为长度为1的空格。
4.控件Frame具有容器功能,可将其他控件放置在Frame控件内。
5.标签控件Label中的内容在运行时可以通过键盘直接修改。
6.文本框控件TextBox中的内容在运行时可以通过键盘直接修改。
7.命令按钮的表面可以显示文字或图形。
8.若一控件的Enabled = False,Visible = True,则在运行时该控件可见,但不响应操作。
9.若一控件的Visible=False,Enabled= True,则在运行时该控件不可见,但可响应操作。
10.由于定时器Timer控件在运行时是不可看的,因此定时器控件不可能有事件触发过程。
四、填空题: (每空2分, 共20分)1.单击命令按钮Command1之后,在窗体上显示10个数值范围为10 - 100的随机数。
Private Sub Command1_Click ( )For k = 1 To _①__A = Int (__②__ * Rnd ) + ____③____Print ANext kEnd Sub2.在窗体上绘制一闭合图形的操作是:在闭合图形的起点按下鼠标左键,拖动鼠标画出图形,放开鼠标左键自动画出到起点的连线,完成闭合,结束绘制。
Private Sub Form_MouseDown(Button%, Shift%, X!, Y!)Tag = Y * 10000 + X____④____ (X, Y)End SubPrivate Sub Form_MouseMove(Button%, Shift%, X!, Y!)If ____⑤____ = 1 Then Line -(x, y)End SubPrivate Sub Form_MouseUp(Button%, Shift%, X!, Y!)X0 = Tag ____⑹____ 10000: Y0 = Tag ____⑦____10000Line (X, Y)-(X0, Y0)End Sub3.滚动条数组HScroll1(1)、HScroll1(2)、HScroll1(3) 分别调节图片框Picture1背景色的红、绿、蓝分量。