vb考试题库MicrosoftWord文档.doc

07 DY4娄亚坤一、单项选择题（25道小题，共25分）1、VB中工程软件的扩展名为(c )A、ds B、frmC、vbp D、bas2、把字符串abcdef 右边的空格去掉应使用( b)函数A、trim B、rtrimC、right D、mid3、文本框text1的text属性的数据类型是(b )A、整数型B、字符串C、单精度D、双精度4、下列( b)属性决定窗体标题栏显示内容（1分）A、NameB、CaptionC、TextD、BackStyl5、命令按钮command1不具有下列哪个事件(d )（1分） A、ClickB、KeyPressC、GotFocusD、DblClick6、为了使文本框同时具有水平和垂直滚动条，应先将MultiLine属性设置为True,然后再把ScrollBars 属性设置为( d)（1分）A、0B、1C、2D、37、Dim D(3,1 To 10,1 To 15)语句中，数组的元素个数为(c )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的值为(a )（1分）A、8B、7C、6D、59、假定有以下循环结构 Do Until 条件 循环体 Loop 则正确的描述是( b)（1分）A、如果条件是一个为0的常数，则一次循环体也不执行B、如果条件是一个为0的常数，则至少执行一次循环体C、如果条件是一个不为0的常数，则至少执行一次循环体D、不论条件是否为真，至少要执行一次循环体10、x是小于100的非负数，用VB表达式表示正确的是(c )A、0 = x 0r x 100B、0 = x 100 C、0 = x And x 100D、0 =x , x 100 11、下列语句错误的是( d)A、exit forB、exit doC、end subD、exit select 12、Inputbox函数返回的数据类型为( d)A、整型B、逻辑型C、单精度D、字符串13、假定有以下程序段: For I= 1 To 3: For j = 1 To 5 Step -1: Print I*j: Next j: Next I 则语句Print I*j 的执行次数是( d)（1分）A、15B、18C、10D、0 14、如果要清除在窗体中打印输出的文字，可以利用( c)语） A、InputB、LoadC、ClsD、Paint15、case ,其中的表达式表列不正确的为(d )（1分）A、Case 100*aB、Case 1000 To 2000C、Case Is3000D、Case 2000Is4: x = x * y: y = y +1: Loop 执行后x的结果为( b) A、1B、4C、8D、20 19、以下声明和命名标识符错误的是( c)A、必须以字母开头B、变量名的最后一个字符可以是类型声明字符C、长度不能超过8个字符D、不能与关键字同名 20、下列说明错误的是(d )（1分）A、Const MyVar#=123B、Dim myname as stringC、dim a as integer,dim b as singleD、dim MyString=Hello,+My friend!21、VB中允许出现的数据形式为(b )A、1.89E1.1B、.368C、D32D、2.5E22、设a=2,b=3,c=4,d=5,下列表达式ab AND cc的值是( b)A、TrueB、False C、-1D、123、语句6 * 66/6的输出结果是( c)A、6B、12C、36D、21624、给窗体form1加载背景图片，应使用(c ) A、pictureB、ucase C、loadpictureD、image25、字符串河南农业大学现教部的长度是(c )A、18B、10C、9D、16二、填空题（12道小题，共35分）1、设定系统当前日期是2004年5月12日，Month(date)=5。2、设A$=Visual Basic,len(a$)函数返回值是12。3、在窗体的声明部分，语句Private x% 语句，是将变量定义为 窗体模块 级变量。4、逻辑型数据只有 true false 两个值。5、顺序文件读操作用 open 语句。6、一个工程可以包括多种类型的文件,其中扩展名为.frx的文件表示 frm 文件。 7、Command1.Visible=False,是将命令按钮1设为 把它设置为隐藏 。8、当鼠标在控件上暂停时，显示提示信息，要用属性 ToolTipText 属性。9、Text1.SetFocus语句功能是把焦点移到上 Text1。10、Dim X As Currency 是将变量X定义为 货币 型。三、判断题（10道小题，共10分）1、VB中请求对象执行某一操作的要求称为方法。（1分）正确2、False为字符型常量。（1分） 错误3、语句Print 25*40 执行时输出的结果是1000。（1分） 正确4、窗体的卸载使用Load 语句。（1分）错误5、表达式 268=268 的结果为True。（1分）错误6、语句 if 0 then print Hello 是错误的。（1分）错误7、在for循环结构对循环变量的赋值中，终值可以大于初值，也可以小于初值。（1分）正确8、将文本框Text1中的内容清除，可使用语句 Text1.cls。错误9、文件名的命名规则同变量的命名规则一样。（1分）正确 10、InputBox函数返回值的类型是字符串类型。（1分）正确Private Sub Command1_Click()Dim mark!, aver!, i%, max1!, min1!aver = 0For i = 1 To 6 mark = InputBox(输入第 & i & 位评委的打分) If i = 1 Then max1 = mark: min1 = mark Else If mark max1 Then max1=mark End If End If aver=aver+mark Nextaver = (aver-min1-max1)/4 Print averEnd Sub1、以下叙述中错误的是( b )（1分） A、在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B、控件的名称可以由编程人员设定 C、窗体文件包含该窗体及其控件的属性 D、Visual Basic 中控件的某些属性只能在运行时设置 2、以下关于窗体的描述中,错误的是( d)（1分） A、窗体的Load事件在加载窗体时发生 B、当窗体的Enabled属性为False时,通过鼠标和键盘对窗体的操作都被禁止 C、窗体的Height、width属性用于设置窗体的高和宽 D、执行Unload Form1语句后,窗体Form1消失,但仍在内存中 3、用Static M (60 to 90) As Integer语句定义的数组的元素个数是(c )（1分） A、60 B、30 C、31 D、90 4、如果整型变量a、b的值分别为3和1,则下列语句中For I=a to b : Print I : Next I 循环体的执行次数是(c)（1分）A、3 B、2 C、1 D、0 5、关于语句If x=1 Then y=1 下列正确的说法是(c )（1分） A、x=1和y=1均为赋值语句 B、x=1和y=1均为关系表达式 C、x=1为关系表达式,y=1为赋值语句 D、y=1为关系表达式,x=1为赋值语句 6、用情况选择语句Select Case X,选择|X| 10情况的语句为Case(c )（1分） A、Not (-10 To 10) B、10 To -10 C、Is 10 D、ABS(X) 10 7、下列哪条语句是错的( c )（1分） A、RTrim() B、Exit Function C、Exit While D、Exit Do 8、在Visual Basic中下面的四个数组声明语句,正确的是( c)（1分） A、Dim a10 B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、阅读下面的程序段For i=1 To 3:For j=1 To i:For k=j To 3 :a=a+2:Next :Next:Next 执行上面的三重循环后,a 的值为( c)（1分） A、26 B、27 C、28 D、29 10、下面说法错误的是( b )（1分） A、对象的性质和状态值称为属性 B、请求对象执行某一操作的要求称为消息 C、改变对象的一个或多个属性值的操作称为事件 D、对象发生某事件所执行的程序称为事件驱动程序 11、若使用文本框Text1,为对用户输入内容进行立即检查,应对Text1的哪个事件编程( a )（1分） A、Change B、Interval C、Left D、Top 12、如果数据包含小数,则不应定义为下列哪种类型(c )（1分） A、Double B、Single C、Byte D、Currency 13、下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i50 then s=s+i else s=s-i 运行后s的结果为( )（1分） A、167 B、139 C、144 D、155 14、有如下程序,m$ =ABCDE:MID(m$, 1 ,5)=abcde:Print m$,运行后的输出结果是( a )（1分） A、abcdeABCDE B、ABCDEabcde C、abcde D、ABCDE 15、在下列四个式子中,非法的Visual Basic表达式是( c)（1分） A、a=b+e B、53+3 C、a=exp D、55 16、表达式INT(6*RND+1)*(INT(6*RND1)值的范围是( b )（1分） A、-6,18 B、-6,24 C、-3,24 D、-3,18 17、字符串计算机技术基础的长度是,应使用下列(c )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为( b )（1分） A、false B、true C、0 D、-1 19、下列叙述中正确的是(c )（1分） A、在窗体的Form_Load事件过程中定义的变量是全局变量 B、局部变量的作用域可以超出所定义的过程 C、在某个Sub 过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程 D、在调用过程时,所有局部变量被系统初始化为0或空符串 20、下面的变量名合法的是(c )（1分） A、 B、k%name C、name D、k-name 21、在Visual Basic中,下面四个数据,数据形式错误的是(b )（1分） A、3.456# B、236! C、1.23D-23 D、1.89E1.1 22、已知CD,ST,正确表示它们之间关系的式子是( c)（1分） A、Sgn(D-C)-Sgn(S-T)0 B、Sgn(D-C)-Sgn(S-T)=-2 C、Sgn(D-C)-Sgn(S-T)=0 D、Sgn(D-C)-Sgn(S-T)=1 23、表达式Int(Rnd*11)+100的值的范围是( b)（1分） A、11,111 B、100,110 C、11,100 D、100,111 24、下列关于属性设置的叙述正确的是(d )（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、Visual Basic中没有提供下列( d)事件（1分） A、MouseDown B、MouseUp C、MouseMove D、MouseExit 二、填空题（12道小题，共35分） 1、可视化Visual Basic语言是 公司推出的程序开发语言。2、双击某个对象时，最终引发该对象的事件 执行。3、程序流程中被重复执行的程序段叫 循环体 。4、将对象设置为允许用户操作，并对操作作出响应，是将它的Enabled属性值设为 True。5、在Visual Basic6.0中，用Font.StrikeThtouth属性设置 。6、表示单精度型数据的单一字符是 !。 7、Rnd函数的含义是 。8、Chr$(数值)函数返回 该数值表示的字符。9、在窗体各过程中均有效的变量是 全局变量 。10、在Print方法中，句尾有符号时，是 换行 执行下一个Print语句11、下列程序段将十进制数转换为十六进制数，要求十进制数为非负整数。单击窗体，弹出InputBox对话框，让用户输入一个十进制数；单击“确定”后，在Label1上显示出十六进制数的结果。如果输入的不是十进制数，在标签Label1上显示出你输入的不是十进制数，退回到对话框状态，让用户重新输入。 Private Sub Form_Click() Dim sHex As String, Ys As Integer Dim n As String, nd As Integer, Ai As String sHex = n = InputBox(请输入一个十进制整数) If Not IsNumeric(n) Or Left(n, 1) = 0 Or _ Int(Val(n) Val(n) Then MsgBox 你输入的不是十进制整数！ End Else nd = Val(n) Do While nd = 10 Ys = nd Mod 16 Select Case Ys Case 10 Ai = A Case 11 Ai = B Case 12 Ai = C Case 13 Ai = D Case 14 Ai = E Case 15 Ai = F Case 0 To 9 Ai = Ys End Select sHex = Trim(Ai) & sHex nd = nd 16 Loop Label1 = nd & sHex End If End Sub12、在窗体上有两个命令按钮和一个文本框，名称分别为 cmdstart（“开始”）、cmdend（“结束”）和txt。程序开始运行时，要求文本框txt中的字符个数不超过300个，“结束”按钮成灰色，单击“开始”按钮后，“开始”按钮不可用，同时使“结束”按钮能响应,单击“结束”按钮结束程序。 Private sub form_load() =300 Cmdend.enabled=false End sub Private sub cmdstart_click() cmdstart.enabled=false =true end sub private sub cmdend_click() end end sub ?/三、判断题（10道小题，共10分） 1、通过 label1.cls 可以清除由label1所显示的内容。（1分） 错误 2、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分） 错误 3、设a5，则语句 print a5的运行结果为True。（1分） 正确 4、能够改变窗体背景颜色的属性是BackColor。（1分） 正确 5、在VB的表达式中，加入括号有时可以改变运算符的优先级。正确 6、在 if then 结构中，条件可以是逻辑表达式或关系表达式。（1分） 正确7、在 For To Step 结构中，步长可以取任意值。（1分） 错误 8、可以用Text1.text= 来清除Text1中的内容。（1分） 正确9、在VB中可以同时打开多个工程。（1分）正确 10、在定义了一个函数后，可以象调用任何一个VB内部函数一样使用它，即可以在任何表达式、语句或函数中引用它。（1分） 错误 四、编程题（4道小题，共60分） 1、求公式：e=1/1!+1/2!+1/3!+1/n! 直到最后一项小于10(-6)时e的值。(保留小数点后9位)(注：程序代码写在命令按钮Command1的Click事件中。)Private Sub Command1_Click()e = 0s = 1i = 1Do Until s 10情况的语句为Case( )（1分） A、Not (-10 To 10) B、10 To -10 C、Is 10 D、ABS(X) 10 7、在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,对应的事件过程是( a )（1分） A、Private Sub Text1_GotFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub B、Private Sub Text1_LotFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub C、Private Sub Text1_Change( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub D、Private Sub Text1_SetFocus( ) : Text1.SelStart=0 : Text1.SelLength=Len(Text1.text) : End Sub 8、在Visual Basic中下面的四个数组声明语句,正确的是( )（1分） A、Dim a10 B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、假设有以下程序段For I=1 to 3:For j=7 to 1 Step -1:Print I*j:Next j:Next I则语句 Print I*j 的执行次数以及I、j的值分别是( )（1分） A、21 3 0 B、21 4 0 C、20 3 0 D、20 4 0 10、如果Form1是启动窗体,并且Form1的Load事件过程中有Form2.Show,则程序启动后( c )（1分） A、发生一个运行时错误 B、发生一个编译时错误 C、在所有的初始化代码运行后Form1是活动窗体 D、在所有的初始化代码运行后Form2是活动窗体 11、以下控件中可以入选为容器控件的是( b)（1分） A、Image图像框控件 B、PictureBox图片框控件 C、TextBox文本框控件 D、ListBox列表框控件 12、假设变量bool_x是一个布尔型(逻辑型)的变量,则下面正确的赋值语句是( b )（1分） A、bool_x=False B、bool_x=.False. C、bool_x=#False# D、bool_x=False 13、下列程序段If (2 * 2 = 5) 3+3 C、a=exp D、55 16、表达式INT(4*RND+2)*(INT(4*RND2)值的范围是( )（1分） A、-10,8 B、-4,8 C、-10,5 D、4,8 17、要统计出字符串计算机技术基础visual basic的长度,应使用下列( )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式253 mod 3.2*int(2.5)的值为( )（1分） A、1 B、2 C、3 D、5 19、Dim b1,b2 as boolean语句显式声明变量( d )（1分） !A、b1和b2都为布尔型变量 B、b1是整型,b2是布尔型变量 C、b1和b2都为是可变型变量 D、b1是可变型,b2是布尔型变量 20、下列哪一个是Visual Basic合法变量名( d )（1分） A、IF B、7AB C、AB7 D、AB7 21、用变量a存放数据888666.666888,应将变量a的类型定义为( )（1分） A、Long B、Integer C、Single D、Double 22、下面逻辑表达式值为真的是( )（1分） A、A a B、9 a C、That Thank D、1212.1 23、函数String(n,str)的功能是( )（1分） A、把数值型数据转换为字符串 B、返回由n个字符组成的字符串 C、从字符串中取出n个字符 D、从字符串中第n个字符的位置开始取子字符串 24、如果希望一个窗体在显示的时候没有边框,应该设置的属性是( b )（1分） A、将窗体的Caption设成空字符 B、将窗体的BorderStyle置成None C、将窗体的Enabled属性置成False D、将窗体的ContalBox置成False 25、( b )对象能使用print方法（1分） A、文本框 B、图片框 C、命令按钮 D、标签 二、填空题（12道小题，共35分） 1、从机器的执行角度来说，程序设计语言可分为高级语言和 两大类。2、双击某个对象时，最终引发该对象的事件。3、程序流程是按一定条件重复多次执行一段程序的结构是 结构。4、将对象设置为禁止用户操作，是将它的Enabled属性值设为。5、在Visual Basic6.0中，用Font.Italic属性设置 。6、长整型变量的关键字是 。7、三角函数是以为 单位。8、Chr$(13)为 huiche 。9、在整个工程的所有模块中均有效变量是 全局变量 。10、方法用于在窗体、图片框、调试窗中、打印机等对象上输出文本11、下列程序段是用于在一个字符串变量中查找red，并用信息输出框给出找到的个数或没有找到的查找结果。Private Sub Form_Click() Dim Str1 As String, Length As Integer, Sum As Integer, I As Integer Str1 = InputBox(请输入一个字符串) Length = I = 1 Sum = 0 Do While I =length-3 If = red Then Sum = Sum + 1 End If I = I + 1 Loop If Then MsgBox 没有找到！ Else MsgBox 找到了 & Str(Sum) & 个 End IfEnd Sub12、在窗体上画一个标签（名称为Label1）和一个计时器（名称为Timer1），然后编写如下几个事件过程：Private Sub Form_Load()Timer1.Enabled = FalseTimer1.Interval = End SubPrivate Sub Form_Click()Timer1.Enabled = End SubPrivate Sub Timer1_Timer()Label1.Caption = time()End Sub程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换一次（如见下图）。14:54:41三、判断题（10道小题，共10分） 1、立即窗口既可显示程序调试时新产生的信息，也可执行一行代码。错误 2、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。（1分） 错误 3、语句a=7:print：a=8:print a 可以输出a的两个值。4、可以在运行期间改变对象的Name属性的值。（1分） 错误 5、字符串AB 与ab是两个相等的字符串。（1分） 6、在 if then 结构中，条件必须是逻辑表达式或关系表达式。（1分） 7、在 For To Step 结构中，可以写成 For a=x to z 。（1分） 8、计时器（Timer）控件的Interval属性的单位是毫秒，即若将此属性值设为10，则每0.01秒产生一次Timer事件。（1分） 9、窗体文件的扩展名是 .frm。（1分） 10、在VB中，int(rnd*90)+10的取值范围是10,99。（1分） 四、编程题（4道小题，共60分） 1、输入一串数字，求其中各位数字之和。例如输入123456，则求123456。必须将本题程序最后的运行结果填入下面的框中。否则，该题以零分计! 请将你解答本题所写的源程序粘贴到下面或者上载源程序 2、勾股定理中三个数的关系是：a2 + b2 =c2 编写程序，输出100以内满足上述关系的整数组合，例如3，4，5就是一个整数组合。（本题不要求填写运行结果） 请将你解答本题所写的源程序粘贴到下面或者上载源程序 3、编写程序，用普通迭代法求方程f(x)=x+lgx-1.7=0的近似实根r，迭代初值为1.5，精确到0.0001。提示：必须把方程f(x)=0化成其等价形式x=g(x)。（允许使用其他迭代法）必须将本题程序最后的运行结果填入下面的框中。否则，该题以零分计! 请将你解答本题所写的源程序粘贴到下面或者上载源程序 4、编写程序，输出下列三角形： (要求用循环做，非循环不给分。) G FG EFG DEFG CDEFG BCDEFG ABCDEFG（本题不要求填写运行结果） 请将你解答本题所写的源程序粘贴到下面或者上载源程序 1、以下叙述中错误的是(b )（1分） A、一个工程中可以包含多个窗体文件 B、在一个窗体文件中用Private定义的通用过程能被其他窗体调用 C、若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体 D、事件可以由用户引发,也可以由系统引发 2、在设计阶段,当双击窗体上的某个控件时,所打开的窗口是( )（1分） A、工程资源管理器窗口 B、工具箱窗口 C、代码窗口 D、属性窗口 3、用Static M (60 to 90) As Integer语句定义的数组的元素个数是( )（1分） A、60 B、30 C、31 D、90 4、如果整型变量c、d的值分别为10和5,则下列语句中For I=c to d : Print I : Next I 循环体的执行次数是( )（1分） A、6 B、5 C、1 D、0 5、a和b中有且只有一个为0,可以用以下的表达式来表示( )（1分） A、a=0 or b=0 B、a*b=0 and a+b0 C、a*b=0or a+b0 D、a=0 and not b=0 and b=0 and not a=0 6、用情况选择语句Select Case X,选择|X| 10情况的语句为Case( )（1分） A、Not (-10 To 10) B、10 To -10 C、Is 10 D、ABS(X) 10 7、设a=10,b=5,c =1,执行语句 a b c结果是( )（1分） A、True B、False C、1 D、出错信息 8、在Visual Basic中下面的四个数组声明语句,正确的是( )（1分） A、Dim a10 B、Def fn(10) C、Dim a(10) D、Dimension a(10) 9、假设有以下程序段For I=1 to 3:For j=5 to 1 Step -1:Print I*j:Next j:Next I则语句 Print I*j 的执行次数以及I、j的值分别是( )（1分） A、12 3 0 B、13 3 1 C、12 4 0 D、13 4 1 10、创建Visual Basic应用程序的主要步骤是：创建应用程序界面 设置控件 设置属性 编写代码,其中正确的步骤是( d )（1分） !A、 B、 C、 D、 11、为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )（1分） A、Value B、Default C、Cancel D、Enabled 12、如果数据包含小数,则不应定义为下列哪种类型( )（1分） A、Double B、Single C、Byte D、Currency 13、下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i50 then s=s+i else s=s-i 运行后s的结果为( )（1分） A、167 B、139 C、144 D、155 14、有如下程序For x=1 TO 2:For y=0 TO x-1:Print x*y:Next:Next,内层循环的循环体的总执行次数是( )（1分） A、1 B、2 C、3 D、4 15、在下列四个式子中,非法的Visual Basic表达式是( )（1分） A、a=b+e B、53+3 C、a=exp D、55 16、表达式INT(4*RND+2)*(INT(4*RND2)值的范围是( )（1分） A、-10,8 B、-4,8 C、-10,5 D、4,8 17、要统计出字符串计算机技术基础visual basic的长度,应使用下列( )函数（1分） A、TAB B、STR C、LEN D、INSTR 18、表达式(not true or true) and (true or false)的值为( )（1 A、false B、true C、0 D、-1 19、下列哪个关键字声明的局部变量在整个程序运行中一直存在( c A、Dim B、Public C、Static D、Private 20、下面的变量名合法的是( )（1分） A、 B、k%name C、name D、k-name 21、Visual Basic中不允许出现的数据形式为( )（1分） A、4.56E-3 B、.368 C、D32 D、0.258 22、设a=2,b=4,c=6,下列表达式值为真的是( )（1分） A、ab And cb Or ca C、aa D、bc Or ca 23、要使变量x赋值为1到100间(含1,不含100)的一个随机整数,正面语句正确的是( )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 24、下列关于属性设置的叙述正确的是( d )（1分） A、所有的对象都有同样的属性 B、控件的属性只能在设计时修改,运行时无法改变 C、控件的属性都有同样的默认值 D、引用对象属性的格式为：对象名称.属性 25、使文本框获得焦点的方法是( )（1分） A、Change B、GotFocus C、SetFocus D、LostFocus 二、填空题（12道小题，共35分） 1、可视化Visual Basic以结构化 Object pascal 语言为基础。2、一个工程可以包括多种类型的文件,其中窗体文件的扩展名为。3、程序流程中被重复执行的程序段叫 循环结构 。4、将对象设置为不可见的，是将它的属性值设为False。5、在Visual Basic6.0中，用Font.Size属性设置。6、表示货币型数据的单一字符是。7、Int(x)函数的含义是。8、设A$=Visual Basic是一种可视化编程语言,mid$(A$,8,5)函数返回值是。9、逻辑值转变为数值时，False为 0 。 10、在Print方法中，输出项用逗号分隔是按 标准 格式输出。11、下列程序段是用于在一个字符串变量中查找Rose，并用信息输出框给出找到的个数或没有找到的查找结果。Private Sub Form_Click() Dim Str1 As String, Length As Integer, Sum As Integer, I As Integer Str1 = InputBox(请输入一个字符串) I = 1 Sum = 0 Do While I =length-4 If = Rose Then Sum = Sum + 1 End If I = I + 1 Loop If Then MsgBox 没有找到！ Else MsgBox 找到了 & Str(Sum) & 个 End IfEnd Sub12、在窗体上画一个标签（名称为Label1）和一个计时器（名称为Timer1），然后编写如下几个事件过程：Private Sub Form_Load()Timer1.Enabled = Timer1.Interval = 1000End SubPrivate Sub Form_Click()Timer1.Enabled = End SubPrivate Sub Timer1_Timer()Label1.Caption = time()End Sub程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换一次（如见下图）。22:40:20 三、判断题（10道小题，共10分） 1、在VB中，注释语句也是可执行语句。（1分）错误 2、在VB中，变量可以直接使用（即不声明就使用） 正确 3、要想以标准方式显示变量a,b,c的值，可以写成 print a，b，c4、要想修改在窗体上输出的字体的颜色，可以修改窗体的F