搜索
密2009-2010-1学期第1页共8页4の西南财经大学天府学院试卷(A卷)考试科目：VB与动态网页设计_本年级层次教学班姓名：学号：记分表试题号一二三四五六总分考分阅卷人注意：1、本次考试为闭卷考试，考试时间120分钟。2、请将答案依次写在专用答题纸上。3、全卷共两部分，满分为100分。一、单项选择题（共40题，每题1分，共计40分）1、VisualBasic是一种面向对象的程序设计语言，（C）不是面向对象系统所包含的三要素。A、属性B、事件C、变量D、方法2、在设计窗体时双击窗体的任何地方，可以打开的窗口是（A）。A、代码窗口B、属性窗口C、工具箱窗口D、工程资源管理器窗口3、以下说法正确的是（B）。A、工程文件的扩展名是.frmB、一个窗体对应一个窗体文件C、VB中的一个工程只包含一个窗体D、VB中的一个工程最多可以包含256个窗体4、设置窗体标题栏上的图标可通过（D）属性来实现。A、ImageB、PictureC、MouseIconD、Icon5、如果要实现当鼠标暂时停留在一命令按钮上时，显示提示信息，应设置此命令按钮的（B）属性。A、TextB、ToolTipTextC、CaptionD、HelpContextId6、如果要实现窗体从内存中卸载，其实现的方法是（D）。A、ShowB、LoadC、HideD、UnLoad7、当文本框的MaxLength属性值取（C）时，该文本框能容纳的字符数最多。A、512B、256C、0D、-18、使文本框获得焦点的方法是（C）。A、ChangeB、GotFocusC、SetFocusD、LostFocus9、下列的（C）对象不支持DblClick事件。A、文本框B、命令按钮C、标签D、窗体10、下列4个选项中，不是VB数值常量的是（B）。A、2E8B、2E1.4C、1234D、1.8E-511、下面的变量名不合法的是（B）。A、Mark_2B、M-dC、constAD、Tempval12、表达式321&100+200的值是（C）。第2页共8页A、321300B、621C、321300D、32110020013、VB6.0中执行下面的4个语句时出现错误的是（B）。A、x=Cos(0)B、x=Sqr(-4)C、x=Log(2)D、x=Sin(0)14、设有如下声明：DimxAsInteger如果Sgn(x)的值为-1，则x的值是（D）。A、整数B、大于0的整数C、等于0的整数D、小于0的数15、以下关于VB的叙述中正确的是（A）。A、数组下标的下界在默认情况下从0开始B、Dima，bAsInteger变量声明语句将a、b声明为整型C、在VB中一个西文字符占一个字节，一个汉字占两个字节D、当Boolean类型的值转换为数值类型的数时，False转化成0，而True转换成116、在VB中声明了Variant变量，但未赋值，则系统默认其初始化值为（C）。A、NullB、0C、EmptyD、False17、确定字符串str2在字符串str1中起始位置的函数是（D）。A、LeftB、MidC、StringD、Instr18、表达式#9/10/2009–5的运算结果是（A）。A、2009-9-5B、2009-4-10C、2004-9-10D、无法运算19、表达式Int(Rnd*30+2)的取值范围为（A）。A、[2，29]B、[2，30]C、[2，31]D、[2，32]20、运行下面的程序后，单击命令按钮，则在窗体上输出（B）。PrivateSubCommand1_Click()PrintFormat(4123.479，###.##%)EndSubA、412347.9B、412347.9%C、4123.48%D、4123.47%21、执行下列程序，单击命令按钮后在窗体上输出结果是（C）。PrivateSubCommand1_Click()DimAAsIntegerA%=456:A=232.45B=235PrintA%，AEndSubA、456232.45B、232.45232.45C、232232D、显示出错信息22、执行以下程序段a$=“abbacddcba”Fori=6To1Step-2X=Mid(a,i,i)Y=Left(a,i)Z=Right(a,i)第3页共8页Z=UCase(X&Y&Z)NextiPrintZ输出结果为（B）。A、ABAB、BBABBAC、ABBABAD、AABAAB23、如下程序：PrivateSubCommand1_Click()x1=InputBox(请输入)Printx1+111;x1+“111”EndSub运行程序，单击命令按钮并输入123，则在窗体上输出结果是（B）。A、123111234B、234123111C、123111123111D、显示出错信息24、下列关于MsgBox函数的说法中，正确的是（B）。A、MsgBox函数的第二个参数是Prompt，表示在对话框中要显示用户的信息B、MsgBox函数的第三个参数是Title，表示对话框的标题显示在对话框窗口顶部的标题栏区C、MsgBox函数的必须有Title参数D、MsgBox函数的可以不要Prompt参数25、对象.cls方法对（B）控件有效。A、窗体、图像框B、窗体、图片框C、屏幕、窗体D、图像框、图片框26、若想使时钟控制每隔0.25秒触发一次Timer()事件，则可将Interval属性值设为（C）。A、0.25B、25C、250D、250027、若希望分成两组使用多个OptionButton控件，能完成这一功能的控件是（C）。A、PictureBoxB、ImageBoxC、FrameD、Shape28、在窗体上画一个名称为Check1的复选框，在程序运行的过程中，若选中复选框，则Check1.Value的值是（D）。A、TrueB、2C、0D、129、每次单击滚动条两端箭头时，滚动条输出的变化值是5，应设置它的（A）属性。A、SmallChangeB、LargeChangeC、ValueD、Fast30、引用列表框List1最后一个数据项应使用（C）。A、List1.List(ListCount)B、List1.List(ListCount-1)C、List1.List(List1.ListCount-1)D、List1.List(List1.ListCount)31、窗体的MouseDown事件过程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)有4个参数，关于这些参数，正确的描述是（B）。A、Shift参数只能用来确定是否按下Shift键B、通过Button参数判定当前按下的是哪一个鼠标键C、Shift参数只能用来确定是否按下Alt和Ctrl键D、参数X、Y用来设置鼠标当前位置的坐标32、在一个列表框List1中已按序放入ONE、TWO、THREE、FOUR、FIVE、SIX6个字符串数据项，执行下面的程序后：PrivateSubForm_Click()第4页共8页Fori=1To3List1.RemoveItemiNextiEndSub列表中的数据项是（D）。A、ONE、FIVE、SIXB、TWO、FOUR、SIXC、FOUR、FIVE、SIXD、ONE、THREE、FIVE33、DoUntil…Loop循环命令的功能是（C）。A、先进入循环执行语句段落后，再判断是否再进入循环B、先进入循环执行语句段落后，再判断是否不再进入循环C、执行前先判断是否不满足条件，若不满足才进入循环D、执行前先判断是否不满足条件，若满足才进入循环34、执行下面的程序后，x的值为（A）。x＝50Fori=1To20Step2x=x+i\5NextiA、66B、16C、68D、6935、如下程序：PrivateSubForm_Click()c=4x=Val(InputBox(请输入一个数))Whilex-999IfxcThenc=xx=Val(InputBox(请输入一个数))WendPrintc;Abs(x)EndSub运行后，单击窗体并输入9，8，2，-999，输出的结果是（C）。A、98B、92C、9999D、299936、在窗体上画两个名称分别是Text1、Text2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimxAsInteger,nAsIntegerx=1n=0DoWhilex20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)EndSub程序运行后，单击命令按钮，在两个文本框中显示的值分别是（B）。A、15和1B、27和3第5页共8页C、195和3D、600和437、如下程序：Fori=1To3Forj=5To1Step-1Printi*jNextjNexti运行程序，则语句Printi*j的执行次数及i、j的值分别是（A）。A、1540B、1631C、1740D、183138、将当前页面跳转到Test.asp的ASP代码是（C）。A、Response.GotoTest..aspB、Request.GotoTest.aspC、Response.RedirectTest.aspD、Request.Redirect“Test.asp”39、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)Fori=1ToUBound(a)a(i)=a(i)+i-1NextiPrinta(3)EndSubB程序运行后，单击命令按钮，则在窗体上显示的内容是（B）。A、4B、5C、6D、740、如下程序：PrivateSubForm_Click()DimaAsInteger,bAsIntegera=8b=3Calltest(6,a,b+1)Print主程序,6,a,bEndSubSubtest(xAsInteger,yAsInteger,zAsInteger)Print子程序,x,y,zx=2y=4z=9EndSub当运行程序后，显示的结果是（）。A、子程序643B、主程序643C、主程序684D、子程序684主程序684子程序684子程序643主程序643二、填空题（共30空，每空1分，共计30分）1、InputBox函数返回值的类型为__________，MsgBox函数返回值的类型为__________。2、表达式6^4Mod34\3^2的值是__________，表达式3\3*3\3Mod3的值是__________。3、D盘根目录下的一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框（Picture1），应执行的语句是______________________________________________。4、在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动事件是__________。第6页共8页5、按照VB默认规定，数组声明Dimmarray(2,1To3,5)共有_______54___个元素。6、VB中，若要设定每个数组默认的下界固定为1，其声明的语句是____________________。7、下面程序的功能是：输出100以内能被3整除且个位数为4的所有整数。请在下划线处填入适当内容，将程序补充完整。PrivateSubCommand1_Click()Fori=0To____9______j=i*10+4If___jmod3=0_______ThenPrintjEndIfNextIEndSub8、对于窗体上的菜单按钮，如果不允许进行操作，应通过__________属性进行设置。9、命令按钮Command1_Click事件中的程序为：PrivateSubCommand1_Click()StaticaAsIn