VB考试复习资料(模拟测试系统)
vb模拟试题及答案
vb模拟试题及答案1. 以下哪个选项是Visual Basic（VB）的编程语言？A. C++B. JavaC. PythonD. 答案：D2. 在中，以下哪个关键字用于声明一个类？A. FunctionB. ClassC. SubD. Module答案：B3. 在中，以下哪个属性用于获取或设置一个窗体的标题？A. TextB. TitleC. CaptionD. Label答案：C4. 在中，以下哪个方法用于启动一个新的线程？A. StartB. BeginInvokeC. ThreadD. Run答案：A5. 在中，以下哪个数据类型用于表示布尔值？A. BooleanB. StringC. IntegerD. Double答案：A6. 在中，以下哪个选项用于创建一个数组？A. Dim arr(5) As IntegerB. Dim arr As New Integer(5)C. Dim arr As Integer = 5D. Dim arr As Integer(5)答案：A7. 在中，以下哪个关键字用于实现继承？A. InheritsB. ImplementsC. InheritsFromD. Base答案：A8. 在中，以下哪个关键字用于捕获异常？A. TryB. CatchC. FinallyD. All of the above答案：D9. 在中，以下哪个方法用于将一个字符串转换为小写？A. ToLowerB. ToLowercaseC. LowerD. ConvertToLower答案：A10. 在中，以下哪个方法用于将一个字符串转换为大写？A. ToUpperB. ToUppercaseC. UpperD. ConvertToUpper答案：A。
计算机程序设计-VisualBasic【VB】考试试题(1)
A、 AutoSize B、 Visible C、 Enabled D、 WordWrap 正确答案： A 解析：
42、当文本框的 MaxLength 属性值取________时，该文本框能容纳的字符数最多。
A、 256 B、 512 C、 0 D、 -1 正确答案： C 解析：
43、在一行语句内写多条语句时，每个语句之间用_____ ___符号分隔。
A、 ； B、 : C、 ， D、 、 正确答案： B 解析：
44、结构化程序由三种基本结构组成，下面术语中是三种基本结构之一的是______ _。
A、 递归结构 B、 选择结构 C、 输入输出结构 D、 过程结构 正确答案： B 解析：
45、在默认情况下，InputBox() 函数返回值的类型为______ __。
8、下列关于 VB 编程的说法中，不正确的是（ ）。
A、 事件是能被对象识别的动作 B、 方法指示对象的行为 C、 属性是描述对象特征的数据 D、 VB 程序采用的运行机制是面向对象 正确答案： D 解析：
9、下面所列符号中，_________不是数据类型说明符。
A、 !
B、 % C、 ？ D、 # 正确答案： C 解析：
A、 0.01*Int(100*(x+0.005)) B、 0.01*Int(x+0.005) C、 0.01*Int(100*(x+0.05)) D、 0.01*Int(x+0.05) 正确答案： A 解析：
24、从字符串变量 Cstr 中取左边 4 个字符，应使用________。
A、 Left(Cstr，4) B、 Left(Cstr，1，4) C、 Mid(Cstr，3，4) D、 Mid(Cstr，4，3) 正确答案： A 解析：
vb模拟题库中的选择题3
vb模拟题库中的选择题31.vb 中的坐标圆点位于().A:容器右上角 B:容器左上角 C:容器正中央 D:容器右下角2.INT(100*RND(1))产生的随机整数的闭区间是().A:[0,99] B:[1,100] C:[0,100] D:[1,99]3.vb 应用程序是分层管理的,其最高的层次为().A:工程 B:模块 C:窗体 D:过程4.窗体的Caption属性的作用是().A:确定窗体的名称 B:确定窗体的标题 C:确定窗体的边界类型 D:确定窗体的字体5.窗体的Enable属性的属性值是()类型的数据.A:整型 B:字符型 C:逻辑型 D:实型6. ()对象具有Clear方法.A:图片框 B:窗体 C:复选框 D:列表框7.VisualBasic集成环境的大部分窗口都可以从主菜单项()的下拉菜单中找到相应的打开命令.A:编辑 B:视图 C:格式 D:调试8.RGB 函数通过红.绿.蓝三基色混合产生某种颜色,某语法为RGB(红.绿.蓝),括号中红、绿、蓝三基色的成分使用0~255之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置()属性. A:Max和Min B:Smallchange和LargeChange C:Scroll和Change D:Value9.vb 中的坐标系最小刻度为().A:缇 B:象素 C:厘米 D:一个标准字符宽度10. ()对象不能作为控件的容器.A:Form B:PictureBox C:Shape D:Frame11.Rnd函数不可能产生的()值.A:0 B:1 C:0.1234 D:.0000512.表达式Mid("SHANGHAI",6,3)的值是().A:SHANGH B:SHA C:ANGH D:HAI13.求以10 为底X 的常用对数的表达式为().A:LOG(X)/LOG(10) B:LN(X) C:LOG(X)/LOG(E) D:LOG(X)14.标准工具箱中的控件().A:数目是固定不变的 B:数目可以增加或减少C:包含了VisualBasic所有控件 D:在窗体建立对象时不一定被使用15.语句listl.removeitem 1 将删除list.listindext等于()的项目..A:0 B:2 C:3 D:116．Interger类型的变量可存的的最大整数是().A:250 B:256 C:32768 D:3276717.产生[10,37]之间的随机整数的VisualBasic表达式是().A:In t(Rnd(1)*27)+10 B:Int(Rnd(1)*28)+10 C:Int(Rnd(1)*27)+11D:Int(Rnd(1)*28)+1118.表达式X+1>X是().A:算术表达式 B:非法表达式 C:字符表达式 D:关系表达式19.表达式INT(8*SQR(36)*10^(-2)*10+0.5)/10的值是().A:0.48 B:0.048 C:.5 D:.0520.如果将布尔常量值TRUE赋值给一个整型变量,则整型变量的值为().A:0 B:-1 C:True D:FALSE21.语句PRINT"SGN(-26)=";SGN(-26)的输出结果为().A:SGN(-26)=26 B:SGN(-26)=-26 C:SGN(-26)=+1 D:SGN(-26)=-122.表达式(7\3+1)*(18\5-1)的值是().A:8.76 B:7.8 C:6 D:6.6723.表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是().A:4^5 B:3*4 C:x+1 D:SIN24.函数InStr("VB程序设计教程","程序")的值为().A:1 B:2 C:3 D:425.表达式(-1)*Sgn(-100+Int(Rnd*100))的值是().A:0 B:1 C:-1 D:随机数26．\、/、Mod、*等4个算术运算符中,优先级最低的是().A:\ B:/ C:Mod D:*27.设a=6,则执行x=IIf(a>5,-1,0)后,x的值为().A:5 B:6 C:0 D:-128.设置列表框选中的文本用()属性.A:selected B:caption C:text D:list29.在文件列表框中设定"文件列表"中显示文件类型应修改该控件的()属性.A:Pattern B:Path C:Filename D:Name30.计时器的interval属性为0时,表示().A:计时器失效 B:相隔0秒 C:相隔0 毫秒 D:计时器的enable属性为false 31.可视化编程的最大优点是().A:具有标准工具箱 B:一个工程文件由若干个窗体文件组成C:不需要编写大量代码来描述图形对象 D:所见即所得32.执行下面的程序段后,x的值为().x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2433.定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.A:分 B:秒 C:毫秒 D:微秒34.声明符号常量应该用关键字().A:Static B:Const C:Private D:V26/ariant35.下列可缩放图片的属性是().A:autosize B:picture C:stretch D:OleDrawMode36.下列关于设置控件属性的叙述正确的是().A:用户必须设置属性值 B:所有的属性值都可以由用户随意设定C:属性值不必一一重新设置 D:不同控件的属性项都完全一样37.下列表达式中,其值为0的是().A:7/9 B:7 mod 15 C:7\9 D:15 mod 938.下面哪些控件不会影响到界面设计效果().A:定时器 B:文本框 C:标签 D:Line控件39.改变控件在窗体中的左右位置应修改该控件的()属性.A:Top B:Left C:Width D:Right40.要使标签中显示的文本靠右显示,则应将其Alignment属性设置为().A:0 B:1 C:2 D:341.要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopen B:KeyPress C:load D:click42.设计动画通常使用时钟控件()来控制动画速度.A:Enabled B:Interval C:Timer D:Move43．下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作().A:Open "c:\file1.dat"For Output as #1 B:Open "c:\file1.dat" For Input as #1 C:Open "c:\file1.dat" For =Append as #1 D:Open "c:\file1.dat" For Write as #1 44.下列数据类型中,占用内存最小的是().A:Boolean B:Byte C:Integer D:Single45.运行下面的程序: CLSLINE (100,100)-(200,50)LINE - (150,150)LINE -(100,100)屏幕上显示的是().A:三条放射形直线 B:四条放射形直线 C:矩形 D:三角形46.图像框(Image)的何项属性设置为true时,可使图形自动调整大小,填满整个图像框().A:Width B:Picture C:Name D:Stretch47.退出VisualBasic的快捷键是().A:Ctrl+Q B:Shift+Q C:Alt+Q D:Ctrl+Alt+Q48.若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性.A:BACKCOLOR B:BORDERSTYLE C:FORECOLOR D:BACKSTYLE49.如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A:Visible B:Enabled C:DisabledPicture D:Default50.下列关于控件画法的叙述错误的是().A:单击一次工具箱中的控件图标,只能在窗体上画出一个相应的控件B:按住CTRL键后单击一次工具箱中的控件图标,可以在窗体上画出多个相同类型的控件C:双击工具箱中的控件图标,所画控件的大小和位置是固定的D:不用工具箱中的控件工具,不可以在窗体上画出图形对象,但可以写入文字字符51.以下不具有Picture属性对象是().A:窗体 B:图片框 C:图像框 D:文本框52.控件内的对齐方式()属性决定.A:Alignment B:WordWrap C:AtuoSize D:Style53.为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为(). A:5 B:500 C:300 D:500054.英文缩写OLE的含义是().A:面向对象程序设计 B:对象链接 C:对象嵌入 D:对象链接与嵌入55.已知A?B?C中C最小,则判断A?B?C可否构成三角形三条边长的逻辑表达式是().A:A>=B And B>=C And C>0 B:A+C>B And B+C>A And C>0 C:(A+C)>=C And A-C <=C) And C>0 D:A+B>C And A-B>CAnd C>056.如果在图片框上使用绘图方法绘制一个实心圆,则图片框的()属性决定了该圆的颜色.A:BackColor B:ForeColor C:FillColor D:DrawStyle57.当用户改变滚动条的value 属性时将激发滚动条的()事件.A:change B:scroll C:change 和scroll D:gotfocus58.定义货币类型数据应该用关键字().A:SINGLE B:DOUBLE C:CURRENCY D:BOOLEAN59.一个对象可以执行的动作和可被对象识别的动作分别称为().A:事件、方法 B:方法、事件 C:属性、方法 D:过程、事件60.Visual Basic 6.0中任何控件都有的属性是().A:BackColor B:Caption C:Name D:BorderStyle61.设执行以下程序段时依次输入11、33、55,执行结果为Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A:11 B:33 C:55 D:062.若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是().A:5 B:8 C:11 D:1263.VB应用程序保存在磁盘上,至少会有以()为扩展名两个文件.A:.DOC和.TXT B:.COM和.EXE C:.VBW和.BAS D:.VBP和.FRM64.下列有关控件数组与一般控件的区别的叙述中,最合理的是A:控件数组一定由多个同类型的控件组成,一般控件只有一个控件;B:控件数组的Index为0,而一般控件的Index为空;C:控件数组的Index为1,而一般控件的Index为0;D:控件数组的建立通过Dim语句声明,而一般控件不必声明.65．若要清除列表框的所有内容,可用什么方法实现A:RemoveItem B:Cls C:Clear D:以上均不可以66.选择和循环结构的作用是().A:控制程序的流程 B:提高程序的运行速度 C:便于程序的阅读 D:方便程序的调试67.可以删除字符串尾部空白的函数是().A:Ltrim B:Rtrim C:Trim D:Mid68.在窗体上画一个名称为Command1的按钮,并有下面程序,当按下Command1按钮后,程序输出的结果是Private Sub Command1_Click()Dim a%, b%a = 50:b = 100Print "调用前", "A="; a, "B="; bSwap a, bPrint "调用后", "A="; a, "B="; bEnd SubPrivate Sub Swap(ByVal x%, y%)Dim t%t = x: x = y: y = tEnd SubA:调用前A=50 B=100 调用后A=50 B=100B:调用前A=50 B=100 调用后A=100 B=50C:调用前A=50 B=100 调用后A=50 B=50D:调用前A=50 B=100 调用后A=100 B=10069.以下几项中,属于日期型常量的是().A:"10/10/02" B:10/10/02 C:#10/10/02# D:{10/10/02}70.当输入4时,以下程序的输出结果是______.Private Sub Command1_Click()x=InputBox(x)If x^2<15 Then y=1/xIf x^2>15 Then y=x^2+1Print yEnd SubA:4 B:17 C:18 D:2571.Sub过程与Function过程最根本的区别是A:Sub过程可以有参数,Function过程不可以B:Function过程可以有参数,Sub过程不可以C:两种过程参数的传递方式不同D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值72.执行下面程序段后,变量a的值为______.For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext IA:3 B:9 C:14 D:2173.Integer类型的数据由_ _____字节组成.A:1 B:2 C:3 D:474.在Visual Basic中,最简单的数据类型包括______.A:整型、实型、布尔型、字符型 B:整型、实型、字符型C:整型、实型、逻辑型 D:实型、逻辑型、字符型75.以下操作不能运行程序的是().A:单击工具栏上的"启动"按钮 B:直接按键盘的键C:单击"运行"菜单的"启动"命令 D:AlT+ F5键76.执行下面的程序段后,x 的值为()x=5For i=1 To 20 Step 2x=x+i\5Next iA:21 B:22 C:23 D:2477.表达式Len("123程序设计ABC")的值是A:10 B:14 C:20 D:1778.下面关于对象的描述中,错误的是().A:对象就是自定义结构变量B:对象代表正在创建的系统中的一个实体C:对象是一个状态和操作(或方法)的封装体D:对象之间的信息传递是通过消息进行的79.数学表达式x>y>z的正确VB逻辑表达式是______.A:x>y And y>z C:x>y And >z D:x>y And y>z80.文本框所没有的属性是().A:Enabled B:Visible C:BackColor D:Caption81.下列选项中,属于Visual Basic 6.0程序设计方法的是().A:面向对象、顺序驱动 B:面向对象、事件驱动C:面向过程、事件驱动 D:面向过程、顺序驱动82.下面是()合法的字符常数.A:ABC$ B:"ABC" C:'ABC' D:ABC83.如下程序：Public Sub Proc(a%())Static I%Doa(I) = a(I) + a(I + 1)I = I + 1Loop While I < 2End SubPrivate Sub Command1_Click()Dim m%, I%, x%(10)For I = 0 To 4: x(I) = I + 1: Next IFor I = 0 To 2: Call Proc(x): Next IFor I = 0 To 4: Print x(I);: Next IEnd SubA:3 4 7 5 6 B:3 5 7 9 5 C:2 3 4 4 5 D:4 5 6 7 884.inputBox函数返回值的类型为().A:数值B:字符串C:变体D:数值或字符串(视输入的数据而定) 85.VB的过程有三种,它们是().A:事件过程、子过程和函数过程B:Sub过程、Function过程和Property过程C:事件过程、函数过程和属性过程D:Sub过程、函数过程和通用过程86.如果一个整型变量定义后未赋值,则该变量的缺省值为().A:8 B:"" C:1 D:087.在窗体上画一个名称为Label1、标题为"VisualBasic考试"的标签,两个名称分别为Command1和Command2、标题分别为"开始"和"停止"的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500. 编写如下程序:Private Sub Form_Load()Timer1.Enabled = FalseEnd SubPrivate Sub Command1_Click()Timer1.Enabled = TrueEnd SubPrivate Sub Command2_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()If Label1.Left < Width ThenLabel1.Left = Label1.Left + 120ElseLabel1.Left = 0End IfEnd Sub程序运行后,单击"开始"按钮,标签在窗体中移动. 对于这个程序,以下叙述中错误的是A:标签的移动方向为自左向右B:单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动C:当标签全部移出窗体后,将从窗体的另一端出现并重新移动 D:标签每隔1秒移动一次88.运行下面程序后,在窗体中显示的是______.Private Sub Form_Click()a$="*": b$="$"For k=1 To 3x$=String$(Len(a$)+k,b$)Print x$;Next kPrintEnd SubA:*** ** **** B:*$*$*$ C:1*$2*$3*$ D:$$$$$$$$$89.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是().A:4 B:5 C:6 D:790.以下程序的输出结果是______.Private Sub Command1_Click()a=100Dos=s+aa=a+1Loop Until a>100print aEnd SubA:100 B:120 C:201 D:10191.若要使命令按钮不可操作,要对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption92.下面4项中合法的单精度型变量是A:num! B:sum% C:xinte$ D:mm#93.要使某控件在运行时不可显示,应对()属性进行设置.A:Enabled B:Visible C:BackColor D:Caption94.如下数组声明语句:Dim a(3,-2 To 2,5),则数组a包含的元素的个数为A:120 B:75 C:60 D:1395.执行语句For i=1 To 3:i=i+1:Next i后,变量i的值是().A:3 B:4 C:5 D:696.写出如下程序运行结果.Function f(m As Integer) As Integerb = 1Static c As Integerb = b + 1c = c + 1f = m * b * cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2sum=0For I = 1 To 3sum=sum+ f(a)Next Iprint sumEnd SubA:12 B:16 C:20 D:2497.在Visual Basic中最基本的对象是(),它是应用程序的基石,是其他控件的容器.A:文本框 B:命令按钮 C:窗体 D:标签98.当运行程序时,系统自动启动窗体的事件过程是().A:Load B:Click C:UnLoad D:GotFocus99.要获得用户在组合框输入的内容,应利用的组合框的属性是A:List B:Selected C:ListIndex D:Text100.要想从子过程调用后返回两个结果,下面子过程语句说明合法的是A:Sub f2(ByVal n%,ByVal m%) B:Sub f1(n%,ByVal m%)C:Sub f1(n%,m%) D:Sub f1(ByVal n%,m%)101.在顺序文件中______.A:文件中按每条记录的记录号从小到大排序B:文件中按每条记录的长度从小到大排序C:文件中按记录的某关键数据项的从小到大的顺序D:记录是按写入的先后顺序存放的,读出也是按写入的先后顺序读出102.在窗体上添加一个命令按钮，编写如下代码：Private Sub Command1_ClickDim Arr1(10) as Integer ,Arr2(10) As IntegerN=3For i=1 to 5Arr1(i)=iArr2(n)=2*n+iNext iPrint Arr2(n), Arr1(n)End Sub程序运行后，单击命令按钮，输出结果是A:11 3 B:3 11 C:13 3 D:3 13103.设菜单中有一个菜单项为"Open".若要为该菜单命令设置访问键,即按下ALT及字母O 时,能够执行Open命令,则在菜单编辑器中设置"Open"命令的方式是:A:把Caption属性设置为&Open B:把Caption属性设置为O&penC:把Name属性设置为&Open D:把Name属性设置为O&pen 104.为了使一个窗体从屏幕上消失但仍在内存中,所使用的方法或语句为().A:Show B:Hide C:Load D:UnLoad105.指令"Circle(1000,1000),500,8,-6,-3"将绘制A:画圆 B:椭圆 C:圆弧 D:扇形106.以下叙述错误的是:A:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见C:除分隔线外,所有菜单项都能接收Click事件D:内缩符号由4个点组成,它表明菜单项所在的层次107.下面程序运行时,内层循环的循环总次数是 .For m = 1 To 3For n = 0 To m - 1Next nNext mA:4 B:5 C:6 D:7108.Cls方法可清除窗体或图片框中的信息是 .A:Picture属性设置的背景图案 B:在设计时放置的控件C:程序设计时产生的图形和文字 D:以上方法都对109.在下面选项中,不能完成对顺序文件的读操作的是______.A:LineInput#语句 B:Input#语句 C:Input()函数 D:Get#语句110.设有如下变量声明Dim TestDate As Date为变量T estDate正确赋值的表达方式是A:TestDate=#1/1/2008# B:TestDate=#"1/1/2008"#C:TestDate=date("1/1/2008")D:TestDate=Format("m/d/yy","1/1/2008") 111.下面子过程语句说明合法的是().A:Sub f1(ByVal n%( )) B:Sub f1(n%) As IntegerC:Function f1%(f1%) D:Function f1%( ByVal n%)112.在窗体中添加两个文本框Text1和Text2,一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() x = 0Do While x < 10x = (x - 2) * (x + 3)n = n + 1LoopText1.Text = Str(n) : Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为()A:1 和 0 B:3 和 50 C:2 和 24 D:4 和 68113.在下列说法中,正确的是A:通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B:在列表框中不能进行多项选择C:在列表框中能够将项目按字母顺序从大到小排列D:框架也有Click和DblClick事件114.下来程序段执行结果为x = 5y = -6if not x > 0 then x = y - 3Else y = x + 3print x - y;y - xA:-3 3 B:5 -9 C:3 -3 D:-6 5115.下面程序段输出的结果是Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd SubA:X=210 B:X=218 C:X=50 D:X=58116.标签的()属性设置为True时,标签控件的大小随标题文字自动调整.A:AutoSize B:Caption C:Alignment D:BackStyle117.设x=4,y=6,则以下不能在窗体上显示出"A=10"的语句是A:Print A=x+y B:Print"A=";x+y C:Print "A="+Str(x+y)D:Print"A="&x+y118.下面程序段:Dim mm=Int((Rn((D)+1)+5Select Case mCase 6Print"优秀"Case 5Print"良好"Case 4Print"通过"Case ElsePrint"不通过"End Select显示的结果是A:优秀 B:良好 C:通过 D:不通过答案：A119.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click() Dim x, y, z As Integery = 7z = 0Text1.Text = ""Call P1(x, y, z)Text1.Text = Str(x) & Str(z)End SubSub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) a=a+1b=b+1c = a + bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是A:5 14 B:6 14 C:5 0 D:6 0120.表达式 15 Mod 4 + 13 \ 5 * 2 的值是A:0 B:2 C:4 D:7121.确定一个窗体或控件大小的属性是().A:Width 和Height B:Width 和T op C:T op 和right D:Top 和 Left 122.执行下面程序段后,变量x的值为______.x=5For I=1 To 20 step 2x=x+I\5Next IA:21 B:22 C:23 D:24123.设a=3,b=5,则以下表达式值为真的是().A:a>=b And b>10 B:(a>b)Or(b>0) C:(a<0)Eqv(b>0) D:(-3+5>a)And(b>0) 124.假定时钟控件的Interval属性为1000,Enabled 属性为True,并且有下面的事件过程,计算机将发出Beep声的次数是Sub Timer1_Timer()For i=1 To 10Next iEnd SubA:1000次 B:10000次 C:10次 D:以上都不对125.赋值语句:b=12+MID("1234",3,2)执行后,b变量中的值是A:"12334" B:123 C:34 D:46126.要判断"命令按钮"是否被鼠标单击,应在"命令按钮"的事件中判断.A:Chang B:KeyDown C:Click D:KeyPress127.下列循环能正常结束循环的是A:i=5Doi=i+1Loop Until i＜0B:i=1Doi=i+2Loop Until i=10C:i=10Doi=i+1Loop Until I＞0D:i=6Doi=i-2Loop Until I=1128.以下程序输出的结果是:Private Sub Form_Activate()Dim aa=Array(1,2,3,4,5)For i=Lbound(((A) To Ubound(((A)A(i)=i*a(i)Next iPrint i, Lbound(((A) , Ubound(((A) , a(i)End SubA:4 0 4 20 B:5 0 4 20 C:不确定 D:程序出错129.复选框的Value属性为1时,表示___.A:复选框未被选中 B:复选框被选中 C:复选框内有灰色的勾 D:复选框操作方式"错误" 130.在下列表达式中,非法的是______.A:a=b+c B:a>b+c C:a≠b>c D:a<b+c< p="">131.可以惟一标识控件数组中的每一个控件属性的是A:Name B:Caption C:Index D:Enabled132.有以下程序:Option Base 1Dim arr() As IntegerPrivate Sub Form_Click()Dim i As Integer,j As IntegerReDim arr(3,2)For i=1 To 3For j=1 To 2arr(i,j)=i*10+jNext jNext iReDimPreserve arr(3,4)For j=3 To 4arr(3,j)=10*j+5Next jPrint arr(3,2);arr(3,4)End Sub程序运行后,单击窗体,输出结果为A:0 22 B:31 35 C:32 45 D:0 0 133.以下程序Option Base 1Private Sub Command1 _Click() Dim a%(3,3)For j=1 To 3If j＞1 And i＞1 Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1 Elsea(i,j)=i*jEnd IfPrint a(I,j);"";Next jPrintNext iEnd Sub输出结果是A:1 2 32 3 13 2 3B:1 2 31 2 31 2 3C:1 2 32 4 63 6 9D:1 1 12 2 23 3 3134.在窗体上添加一个命令按钮，编写如下代码：Option Base 1 Private Sub Command1_ClickDim a(10) As Integer,p(3) As Integer k=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next ik=k+p(i)*2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是A:35 B:28 C:33 D:37135.已知A$="12345678",则表达式Val(Left$(A $,4)+Mid$(a $,4,2))的值为A:123456 B:123445 C:8 D:6136.为了给x,y,z这3个变量赋初值3,下面正确的赋值语句是A:x=3:y=3:z=3 B:x=3,y=3,z=3 C:x=y=z=3 D:xyz=3137.表达式Abs(-5)*5\5/5的值是A:-25 B:25 C:5 D:1138.假设在图片框Pictrue1中装入一个图形,为了清除该图形(不删除图片框),应采用的正确方法是: A:选择图片框,然后按Delete键. B:执行语句Pictrue1. Pictrue=LoadPictrue("")C:执行语句Pictrue1. Pictrue="" D:选择图片框,在属性窗口选择Pictrue1属性,然后安回车键139.下面4项中不属于面向对象系统三要素的是().A:变量 B:事件 C:属性 D:方法140.如下程序：Private Sub Command1_Click()Print p1(3,7)End SubPublic function p1!(x!,n%)If n=0 ThenP1=1ElseIf n Mod 2=1 ThenP1=x*p1(x,n\2)ElsePl=pl(x,n\2)\xEnd IfEnd IfEnd Function运行的结果是A:18 B:7 C:14 D:27141.表达式16/4-2^5*8/4MOD5\2的值为A:14 B:4 C:20 D:2142.引用列表框(List1)最后一个数据项应使用的语句是（）。
vb期末考试复习资料
vb期末考试复习资料VB是一门程序设计语言，也是许多大学计算机专业的必修课程。
随着期末考试的临近，各位同学需要投入更多的时间和精力来复习这门课程。
本文将为大家提供一些VB期末考试复习资料，帮助大家更好地备考。
一、教材和参考书VB语言的学习和掌握，最基础的方式就是阅读教材和参考书籍。
对于VB语言初学者来说，推荐使用《Visual Basic 6.0程序设计》一书进行学习。
这本书涵盖了VB基础知识、控件设计、文件操作、数据库编程等方面的内容，易于理解，并配有丰富的实例和练习题。
除此之外，还可以借助一些VB语言的在线资源，如百度百科、知乎等提供的编程专页，可以帮助同学们更好地掌握VB语言的的一些难点和技巧。
二、学习笔记学习笔记是复习的重要工具。
在学习VB语言的过程中，有必要将所学知识及时地进行记录。
这样可以帮助同学们掌握学习的重心，并且在期末考试前能够更好地回忆所学过的分类和技巧。
在记录学习笔记时，可以将VB语言的一些要点和难点进行总结，如语法规则、常用控件、窗体设计、事件处理等，帮助同学们更好地温故知新。
三、在线课程在线学习也是一种非常有效的方法。
通过观看VB语言的在线课程，同学们可以掌握VB语言的知识点和处理方法，不仅可以更好地巩固自己的VB基础知识，还可以让自己学会如何灵活使用VB语言进行编程。
常用的VB在线课程平台为mooc网、智联网等，同学们可以定期在线听课，并进行笔记的记录和整理，可以帮助同学们更好地备考，掌握重心。
四、编程练习编程练习是复习VB语言最重要的方法。
在学习VB语言的过程中，同学们可以利用大量的编程习题来巩固所学知识。
可以找一些基础的编程模板，在此基础之上往往要求同学达成一个相对较高的功能。
可以再次通过网页、工具完成一些较为初中级的编程练习，帮助同学增加应对期末考试的信心和考试技巧。
五、补遗其他资料在复习VB语言的过程中，还可以寻求其他的替代学习资料，如网络上大量的VB语言学习资源、视频课程等。
VB期末考试复习题目
如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。
类是对象的抽象，对象则是类的具体化。
在窗体上建立的一个控件称为。
能够获得一个文本框中被选取文本的内容的属性是。
以下属于Visual Basic合法的数组元素是。
设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。
VB有三种工作模式，它们分别是___________模式。
下列函数中，________函数返回的值是数值型的。
类是对象的抽象，对象则是类的具体化。
在窗体上建立的一个控件称为。
以下控件中没有Print方法是( )以下叙述中错误的是 ( )A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B）保存Visual Basic程序时，应分别保存窗体文件及工程文件C）Visual Basic应用程序只能以解释方式执行D）事件可以由用户引发，也可以由系统引发下列数组声明语句中的数组a包含了_________个数组元素。
( )Dim a(4,-1 to 1,0 to 3)复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( )主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义以下不属于Visual Basic系统的文件类型是。
A）.frm B）.bat C）.vbg D）.vbp按变量名的定义规则，是合法定义的变量名。
结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______执行以下程序段后，变量c$的值为________。
a$="Visual Basic Programming"b$="Quick"c$=b$ & UCase(Mid$(a$,7,6)) & Right$(a$,12)在一行中要写多条语句时,每个语句之间用_____符号分隔以下关于数组的说法，不正确的是__________。
vb第次考试复习题单选判断程序填空改错练习
vb第次考试复习题单选判断程序填空改错练习————————————————————————————————作者：————————————————————————————————日期：一、判断共19题（共计19分）第1题（1.0分）题号:684在窗体的form_load事件过程里定义的变量是局部变量。
第2题（1.0分）题号:380VB规定窗体文件的扩展名是 .vbp。
3题（1.0分）题号:681对于动态数组，在过程中可多次使用redim语句改变数组的大小。
第4题（1.0分）题号:285所有的控件在程序运行以后都是可见的。
第5题（1.0分）题号:677通常用show方法来显示通用对话框第6题（1.0分）题号:683控件数组中的各个元素由caption属性区分。
第7题（1.0分）题号:680通用对话框控件在运行的时候，是不可见的。
第8题（1.0分）题号:361设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2* A>C的值是 False。
第9题（1.0分）题号:313“菜单编辑器”中至少要填“名称”和“标题”这两个框，才能真确完成菜单栏的设计。
第10题（1.0分）题号:325VB若同一个工程有许多窗体，可以指定任一窗体为启始窗体。
第11题（1.0分）题号:335通过改变属性窗口中的Name属性，可以改变窗体上显示的标题。
第12题（1.0分）题号:324如果一个菜单项的Visible属性为False，则它的子菜单也不会显示。
第13题（1.0分）题号:678鼠标mousedown事件可以返回一个参数button用于判断用户按下的是鼠标的左键、右键、还是滑轮。
第14题（1.0分）题号:254有的对象属性既可在属性窗口中设定又可在程序代码中设定。
第15题（1.0分）题号:686时钟控件的interval属性的单位是毫秒。
第16题（1.0分）题号:248对象的可见性用enabled属性设置，可用性用visible属性设置。
vb考试试题及答案
vb考试试题及答案1. 介绍VB语言特点VB（Visual Basic）是一种基于事件驱动的可视化编程语言，最早由微软公司于1991年推出。
以下是VB语言的特点：简单易学：VB语言采用自然语言和图形化的界面，减少了繁杂的语法和代码编写，使得初学者能够迅速掌握。
可视化设计：VB提供了强大的可视化设计功能，开发者可以通过拖拽控件、设置属性等直观的方式创建用户界面。
面向对象编程：VB具备面向对象的编程特性，支持封装、继承和多态等概念，可以更好地组织和管理代码。
强大的控件库：VB拥有丰富的控件库，开发者可以通过调用这些控件实现各种功能，如按钮、文本框、列表框等。
易于与其他技术集成：VB能够与其他微软技术集成，如数据库、Office套件和网络等，方便开发者进行相关应用的开发。
2. VB考试试题1) VB语言中的变量命名规则是什么？2) VB中的条件语句有哪些？请列举并示例。
3) 如何在VB中实现错误处理？4) VB中如何定义函数和子过程？它们之间有什么区别？5) VB中常用的数据类型有哪些？请简要介绍。
6) 如何在VB中连接数据库，并执行相关操作？3. VB考试答案1) VB语言中的变量命名规则是以下几点：- 变量名由字母、数字和下划线组成，但不能以数字开头。
- 变量名区分大小写。
- 变量名不能与VB的关键字相同。
- 变量名应具有描述性，方便代码维护。
2) VB中的条件语句包括以下几种：- If语句：根据条件判断执行不同的代码块。
示例：```If condition Then' 执行语句块Else' 执行其他语句块End If```- Select Case语句：根据表达式的值选择执行对应的代码块。
示例：```Select Case expressionCase value1' 执行语句块1Case value2' 执行语句块2Case Else' 执行其他语句块End Select```3) 在VB中，可以使用Try...Catch...Finally块来实现错误处理。
vb测试题及答案
vb测试题及答案一、单项选择题（每题2分，共10分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 下列哪个函数用于计算两个数的和？A. SumB. AvgC. CountD. Max答案：A3. 在VB中，以下哪个关键字用于声明一个变量？A. DimB. ConstC. FunctionD. Sub答案：A4. 在VB中，以下哪个选项是正确的循环结构？A. ForB. WhileC. DoD. All of the above答案：D5. 在VB中，以下哪个选项是正确的条件语句？A. IfB. SelectC. CaseD. All of the above答案：D二、填空题（每题2分，共10分）1. 在VB中，声明一个整型变量并赋值为10，可以使用语句：Dim myVar As Integer; myVar = _______。
答案：102. VB中，用于输出信息到立即窗口的函数是 _______。
答案：Debug.Print3. 在VB中，要创建一个名为“myForm”的新窗体，可以使用语句：Form1. _______ "myForm"。
答案：Load4. VB中，要结束当前程序的执行，可以使用语句：_______。
答案：End5. 在VB中，要声明一个数组，可以使用语句：Dim myArray(10) As _______。
答案：Integer三、简答题（每题5分，共20分）1. 请简述VB中的事件驱动编程是什么？答案：事件驱动编程是一种编程范式，程序的执行流程由事件（如用户操作、系统消息等）触发，而不是由程序代码顺序执行。
2. 描述VB中如何使用If...Then...Else语句进行条件判断。
答案：在VB中，可以使用If...Then...Else语句进行条件判断，如果条件为真，则执行Then后面的代码块，如果条件为假，则执行Else 后面的代码块。
vb考试试题题库及答案
vb考试试题题库及答案VB（Visual Basic）是一种由微软公司开发的编程语言，广泛用于开发Windows应用程序。
以下是一些VB考试的试题题库及答案，供参考：一、单选题1. 在VB中，以下哪个是正确的数据类型？- A. Integer- B. Real- C. String- D. All of the above答案：D2. VB中的“Sub”过程与“Function”过程的区别是什么？- A. Sub过程可以返回值，Function过程不能- B. Function过程可以返回值，Sub过程不能- C. 两者都可以返回值- D. 两者都不能返回值答案：B3. 在VB中，以下哪个是正确的变量声明方式？- A. Dim x- B. Declare x As Integer- C. Both A and B- D. None of the above答案：C二、多选题1. VB中的控件可以具有哪些属性？- A. Name- B. Caption- C. Font- D. All of the above答案：D2. VB中，以下哪些是事件驱动的编程语言的特点？- A. 事件驱动的程序在事件发生时执行代码- B. 程序的执行顺序由事件的触发顺序决定- C. 程序可以同时响应多个事件- D. 程序必须等待事件的发生才能执行答案：A, B, C三、判断题1. VB是一种编译型语言。
- 正确- 错误答案：错误2. 在VB中，可以使用“Print”方法在文本框中显示文本。
- 正确- 错误答案：正确3. VB中的“Option Explicit”语句可以强制声明所有变量。
- 正确- 错误答案：正确四、简答题1. 简述VB中的事件和方法的区别。
答案：事件是用户或系统触发的动作，如点击按钮、键盘输入等。
方法是一种过程，可以包含代码来执行特定的任务或计算。
事件通常与控件相关联，并可以触发方法的执行。
2. 解释VB中“类”的概念。
VB程序设计考试(1)
VB程序设计考试（1）一、单选题（每题1分，共50题）1.Visual Basic 6．0集成环境的主窗口中不包括（ C ）。
正确A.标题栏B.菜单栏C.状态栏D.工具栏2.以下不属于Visual basic的工作模式的是（）模式。
正确答案：AA.编译B.设计C.运行D.中断3.如果文本框的Enabled属性被设置为False，则运行时（）。
正确答案：AA.文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容C.文本框中的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容4.控制名称都是系统的默认控件名，下列语句错误是（）。
正确答案：Dmand1.Caption=List1.Text;bel1.Caption=List1.List(1);C.List1.List(2)=List1.Text+Str(List1.ListIndex);D.Text1.Text=+Text1.Caption。
5.以下叙述中正确的是（）。
正确答案：A属性用来标识对象B.窗体Name属性值显示在标题栏中C.运行时对象Name属性可变D.对象的Name属性值可以为空6.Abc%，abc!，abc$，abc#分别声明abc是（）。
正确答案：AA.整型、单精度、字符串、双精度变量B.整型、整型、字符串、双精度变量C.单精度、整型、字符串、双精度变量D.整型、双精度、字符串、双精度变量7.Visual Basic的逻辑类型数据占（ A ）字节内存。
正确A.2B.4C.8D.168.如果逻辑与(AnD)运算的结果为真，与它所连接的两个条件必须是（ C ）。
正确A.前一个为真，后一个为假B.前一个为假，后一个也为假C.前一个为真，后一个也为真D.前一个为假，后一个为真9.设a=6，则执行 x=iif(a>5,-1,0)后，x 的值为（ D ）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
本卷共有4道大题:一、单项选择题（25道小题，共25分）1、VB中工程软件的扩展名为()（1分）A、dsB、frmC、vbpD、bas2、把字符串"abcdef"右边的空格去掉应使用()函数（1分）A、trimB、rtrimC、rightD、mid3、文本框text1的text属性的数据类型是()（1分）A、整数型B、字符串C、单精度D、双精度4、下列()属性决定窗体标题栏显示内容（1分）A、NameB、CaptionC、TextD、BackStyle5、命令按钮command1不具有下列哪个事件()（1分）A、ClickB、KeyPressC、GotFocusD、DblClick6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars属性设置为()（1分）A、0B、1C、2D、37、Dim D(3,1To10,1To15)语句中，数组的元素个数为()（1分）A、3*10*16B、3*11*16C、4*10*15D、4*11*158、如果整型变量c、d、x的值分别为8、6、0，则下列语句For I=c to d:x=x+i:Next I执行结束时，I的值为()（1分）A、8B、7C、6D、59、假定有以下循环结构Do Until条件循环体Loop 则正确的描述是()（1分）A、如果"条件"是一个为0的常数，则一次循环体也不执行B、如果"条件"是一个为0的常数，则至少执行一次循环体C、如果"条件"是一个不为0的常数，则至少执行一次循环体D、不论"条件"是否为"真"，至少要执行一次循环体10、"x是小于100的非负数"，用VB表达式表示正确的是()（1分）A、0<=x0r x<100B、0<=x<100C、0<=x And x<100D、0<=x,x<10011、下列语句错误的是()（1分）A、exit forB、exit doC、end subD、exit select12、Inputbox函数返回的数据类型为()（1分）A、整型B、逻辑型C、单精度D、字符串13、假定有以下程序段:For I=1To3:For j=1To5Step-1:Print I*j:Next j:Next I则语句Print I*j的执行次数是()（1分）A、15B、18C、10D、014、如果要清除在窗体中打印输出的文字，可以利用()语句（1分）A、InputB、LoadC、ClsD、Paint15、case<表达式表列>,其中的表达式表列不正确的为()（1分）A、Case100*aB、Case1000To2000C、Case Is<3000D、Case2000<Is<300016、下列说法错误的是()（1分）A、VB声明数组时既可指定上界也可指定下界B、数组元素类型可以是任意的VB数据类型C、数组元素的下标可以是数值，也可以是结果在上下界之间的数值表达式D、VB声明数组时必须指定下界17、下面的四个数组说明语句语法正确的是()（1分）A、DIM X[10]B、DIM EN fn(10)C、DIM X(20)D、DIM ENSION a[10]18、以下程序段:x=1:y=4:Do Until y>4:x=x*y:y=y+1:Loop执行后x的结果为()（1分）A、1B、4C、8D、2019、以下声明和命名标识符错误的是()（1分）A、必须以字母开头B、变量名的最后一个字符可以是类型声明字符C、长度不能超过8个字符D、不能与关键词同名20、下列说明错误的是()（1分）A、Const MyVar#=123B、Dim myname as stringC、dim a as integer,dim b as singleD、dim MyString="Hello,"+"My friend!"21、VB中允许出现的数据形式为()（1分）A、1.89E1.1B、.368C、D32D、2.5E22、设a=2,b=3,c=4,d=5,下列表达式a>b AND c<=d OR2*a>c的值是()（1分）A、TrueB、FalseC、-1D、123、语句6*6\6/6的输出结果是()（1分）A、6B、12C、36D、21624、给窗体form1加载背景图片，应使用()函数（1分）A、pictureB、ucaseC、loadpictureD、image25、字符串"河南农业大学现教部"的长度是()（1分）A、18B、10C、9D、16二、填空题（12道小题，共35分）1、设定系统当前日期是2004年5月12日，Month(date)= 52、设A$="Visual Basic",len(a$)函数返回值是123、在窗体的声明部分，语句Private x%语句，是将变量定义为窗体或模块级变量4、逻辑型数据只有True/False两个值5、顺序文件读操作用Input #语句。
6、一个工程可以包括多种类型的檔,其中扩展名为.frx的文件表报表文件7、Command1.Visible=False,是将命令按钮1设为隐藏8、当鼠标在控件上暂停时，显示提示信息，要用ToolTipText属性。
9、Texte1.SetFocus语句功能是把焦点移到Texte1 控件上。
10、Dim X As Currency是将变量X定义为货币型。
11、某次大奖赛，有6个评委打分，如下代码对一名参赛者，输入6个评委的打分分数，去掉一个最高分和一个最低分后，求出平均分，即为该参赛者的得分。
代码中aver变量存放平均分，max1变量存放最高分，min1变量存放最低分。
请在空线处补充使之完整。
Private Sub Command7_Click()Dim mark!,aver!,i%,max1!,min1!aver=0For i=1To6mark=InputBox("输入第"&i&"位评委的打分")If i=1Thenmax1=mark:min1=markElseIf mark<min1ThenMin1=markElseIf mark>max1ThenMax1=marKEnd IfEnd Ifaver=aver+markNextaver=(aver-min1-max1)/4Print averEnd Sub12、这是一个用户名校验程序。
用户名为“user”，密码为“1234”,单击按钮：（1）如果用户名和密码均正确，即输出"欢迎user来到欢乐世界！"字样（2）若用户名错误，则要求重新输入用户名（3）如果用户名正确，密码错误，则弹出“密码错误！”警告窗口，并直接退出程序。
Option ExplicitDim UserName As String,userpassword as stringDim inputName As String,inputpassword as stringPrivate Sub form_load()UserName="user":userpassword="1234"end subprivate sub command1_click()gt:inputName=InputBox("请输入用户：","用户名确认","")if Lcase(inputname)<>username Thenmsgbox"用户名错误，请重新输入……"goto gtelseinputpassword=InputBox("请输入密码：","密码验证","")if inputpassword<>userpassword thenExit sub msgbox"密码错误！":elseMsgBox"欢迎"&UserName&"来到欢乐世界！"End Ifend ifEnd Sub三、判断题（10道小题，共10分）1、False为字符型常量。
（1分）正确错误2、VB中请求对象执行某一操作的要求称为"方法"。
（1分）正确错误3、语句Print25*40执行时输出的结果是1000。
（1分）正确错误4、窗体的卸载使用Load语句。
（1分）正确错误5、表达式268="268"的结果为True。
（1分）正确错误6、语句if0then print"Hello"是错误的。
（1分）正确错误7、在for循环结构对循环变量的赋值中，终值可以大于初值，也可以小于初值。
（1分）正确错误8、将文本框Text1中的内容清除，可使用语句Text1.cls。
（1分正确错误9、文件名的命名规则同变量的命名规则一样。
（1分）正确错误10、InputBox函数返回值的类型是字符串类型。
（1分）正确错误四、编程题（4道小题，共60分）1、编写程序，计算并输出下面级数前n项(n=10)的部分和。
(要求用循环做，非循环不给分。
)1!+2!+3!+4!+……+n!Private Sub Form_Activate() ？？？？？？S = 0: T = 1For I = 1 To 10T = T * IS = S + TNext IPrint SEnd Sub2、编写程序，输出下列三角形：总行数在窗体单击事件通过键盘输入。
(要求用循环做，非循环不给分。
)1333555557777777Next i Private Sub Form_Activate()For i = 1 To 4Print Tab(15 - 2 * i); ？？？？？？tabFor j = 1 To 2 * i - 1Print Format(2 * i - 1, "!@@");Next jPrintEnd Sub3、编写程序，输出100～1000之间的所有质数，并给出100～1000之间质数的个数及其Private Sub Form_Activate()s = 0: t = 0For x = 100 To 1000flag = TrueFor i = 2 To Sqr(x)If x Mod i = 0 Then flag = False: Exit ForNext iIf flag Thens = s + 1t = t + xPrint x;If s Mod 10 = 0 Then PrintEnd IfNext xPrintPrint s, tEnd Sub4、编写程序，用牛顿切线法求方程f(x)=3x^3-4x^2-5x+13=0（其中^表示幂运算）在区间[1，2]上的近似实根r，迭代初值自选，精确到0.0001。