VB程序设计考试题库

VB程序设计考试（2）一、单选题（每题1分，共50题）.关于VisualBasic应用程序，正确的叙述是（未填）。错误 正确答案:AA.VisualBasic程序运行时，总是等待事件被触发B.VisualBasic程序设计的核心是编写事件过程的程序代码C.VisualBasic程序是以线性方式顺序执行的D.VisualBasic的事件可以由用户随意定义，而事件过程是系统预先设置好的.可视化编程的基本过程主要有3步，这3个步骤是（未填）。错误正确答案：CA.创建工程、设计界面、编写代码.创建工程、编写程序、保存程序C.设计界面、设置属性、编写代码D.设计界面、编写代码、调试程序.窗体上有一个按钮和一个文本框，程序执行后，在文本框中输入12345,单击按钮后的输出结果为（未填）。PrivateSubCommand1_Click（）DimAAsInteger，BAsIntegerText1.SelStart=2Text1.SelLength=2A=Val（Text1.SelText）B=Len（Text1.Text）PrintA*BEndSub错误 正确答案：CA.68B.115C.170D.1170.VB中可用（未填）语句产生一消息框。 错误 正确答案：DA.InputBoxB.ShiftC.BothD.MsgBox.在窗体Form1的标题栏中显示“VisualBasic窗体〃的命令是（未填）。 错误 正确答案：CA.Form1.Name="VisualBasic窗体”B.Form1.Title="VisualBasic窗体”C.Form1.Caption="VisualBasic窗体”D.Form1.Text="VisualBasic窗体.以下（未填）是VisualBasic中合法的函数使用。错误 正确答案：Bexp.xexp（x）cos[x]sinx.下面（未填）是不合法的单精度常数。错误正确答案：DA.100!B.100.0C.1E+2D.100.0D+2.满足当x的值是偶数时为真，奇数时为假要求的表达式是（未填）。 错误 正确答案：DA.xMod2=0.NotxMod2<>0C.x\2*2-x）=0D.Not（xMod2）函数Len（str（val（〃-135.6〃）））的值是（未填）错误正确答案：B11658.在一个语句内写多条语句时，每个语句之间用（未填）符号分隔。错误正确答案：BA.。B.：C.*D.；.语句X=X+1的正确含义是（未填）。 错误 正确答案：CA.变量X的值与X+1的值相等B.将变量X的值存到X+1中去C.将变量X的值加1后赋给变量XD.变量X的值为112.触发文本框Change事件的操作是（未填）错误 正确答案：AA.改变文本框的内容B.改变文本框的大小C.文本框获得焦点D.文本框失去焦点13.下面是一个窗体的单击事件过程：PrivmeSubForm_Click（）IfCommandl.EnabledThenLabel1.Caption=〃命令按钮可以使用！〃ElseLabel1.Caption=〃命令按钮不可以使用！〃EndIfEndSub该窗体事件的功能是（未填）。错误正确答案：BA.判断命令按钮是否可见，以便在标签上显示不同的信息B.判断命令按钮是否可用，以便在标签上显示不同的信息C.判断命令按钮是否设置了默认按钮，以便在标签上显示不同的信息D.If语句中的条件不合法，事件过程错误，不能执行。.以下程序的输出结果是（未填）。OptionBase1PrivateSubCommand1_Click()Dima(10),p(3)AsIntegerk=5ForI=1To10a(I)=INextIForI=1To3p(I)=a(I*I)NextIForI=1To3k=k+p(I)*2NextIPrintkEndsub错误正确答案：AA.33B.28C.35D.37.数学表达式3Wx<l0在VB中的逻辑表达式为(未填)。错误 正确答案：D3<=x<103<=xANDx>10x>=3Orx<10x>=3ANDx<1016.下列Case语句中，错误的是(未填)。 错误正确答案：CA.Case1to10B.CaseIs>50C.Caseto100D.Case“Xie”.修改文本框的内容触发（未填）事件。错误正确答案：BModifyChangeChangeDataAutoSize.为了描述x>y和y>z同时成立，则下述选项中，正确的是（未填）。错误正确答案：DA.x>y.And.Y>zB.x>y>zC.x>yAnd>zD.x>yAndy>z.对窗体上的文本框Text1编写如下事件过程：PrivateSubText1_KeyPress（KeyAsciiAsInteger）IfChr（KeyAscii）>"Z"OrChr（KeyAscii）<"A"ThenKeyAscii=0EndIfEndSub运行时，文本框中能输入的字符是（未填）错误 正确答案：BA.字母B.大写字母C.大写字母外的其它字符D.不能输入字母.下列Case语句中，错误的是（未填）。错误正确答案：CA.Case1to10B.CaseIs>50C.Caseto100D.Case“Xie”.执行x=MsgBox（〃数据类型不匹配〃,VbOKCancel,“出错提示!〃），然后单击消息框的“取消”按钮，x的值是（未填）错误正确答案：DTrueFalse12.执行下面的程序段后，a的值为（未填）。a=1Fori=1To12Step2a=a+iMod8Nexti错误 正确答案：B151721.下列关于VB编码规则的叙述，错误的是（未填）错误正确答案：D一条语句可以分多行书写B.可以用“Rem”注释单行语句C.注释可以放在语句之前D.可以用“；”作为语句的结束符.执行下列程序段后，输出的结果是（未填）。Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3Nextk2Nextk1Printy错误 正确答案：CA.90B.60C.40D.10.设有如下程序，执行结果为(未填OptionBase1PrivateSubForm_Click()DimADimiAsIntegerA=Array(1,2,3,4,5,6,7,8,9)Fori=1To4PrintA(4+i);NextEndSub错误 正确答案：CTOC\o"1-5"\h\zA. 1 2 3 42 3 4 55 6 7 86789.用复制、粘贴的方法建立一个命令按钮数组Commandl,以下对该数组的说法错误的是：(未填)错误 正确答案：BA、命令按钮的所有Caption属性都是CommandlB、在代码中访问任意一个命令按钮只需要使用名称CommandlC、命令按钮的大小都相同D、命令按钮共享相同的事件过程.下面程序的输出结果是(未填)。Dimaa=Array(1,2,3,4,5,6,7)Fori=Lbound(A)toUbound(A)a(i)=a(i)*a(i)NextiPrinta(i)错误正确答案：BA.36B.程序出错C.49D.不确定28.在程序运行过程中，单击窗体时，以下程序的输出结果为(未填)。PrivateSubForm_Click()Dimxx=Array(“Basic“，"Pascal“，"Foxpro”「Database”)PrintUcase(Mid(x(2),Len(x(2))-3))EndSub错误 正确答案：DA.scalB.SCALC.xproD.XPRO.在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click()DimcAsInteger,dAsIntegerd=0c=6x=Array(2,4,6,8,10,12)Fori=1To6Ifx(i)>cThend=d+x(i)Elsed=d-cEndIfNextiPrintdEndSub程序运行后，如果单击命令按钮，则在窗体上输出的内容为(未填)。 错误正确答案：CA.10B.16C.12D.20.下列语句中（假定变量n有值），能正确声明可调数组的是（未填）。 错误 正确答案：AA.Dima()AsInteger<换行〉ReDima(n)Dima()AsInteger<换行〉ReDima(n)AsStringC.Dima()AsInteger<换行〉ReDima(3,4)<换行〉ReDimPreserveD.Dima(10)AsInteger<换行〉ReDima(n+10).假设有如下过程：PublicSubsfun(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗体中添加一个命令按钮(名为Commandl)，编写如下事件过程：PrivateSubCommand1_Click()DimaAsSingleDimbAsSinglea=5:b=4Callsfun(a,b)MsgBoxa&Chr(10)+Chr(10)&bEndSub打开窗体运行后，单击命令按钮，消息框中有两行输出，内容分别为(未填)_。 错误正确答案：B1和11.25和11.25和45和4.在窗体上添加一个名称为Command1的命令按钮，再添加两个名称分别为Label1、Label2的标签，然后编写如下程序代码：PrivatexAsIntegerPrivateSubCommand1_Click()a=6:b=4Callsub1(a,b)Label1.Caption=aLabel2.Caption=bEndSubPrivateSubsub1(ByValxAsInteger,ByValyAsInteger)a=x*xb=y*yEndSub程序运行后单击命令按钮，则两个标签中显示的内容分别是（未填）。 错误正确答案：B36和46和436和86和8.下列程序段的执行结果为（未填）。K=5y=-20IfNotx>0Thenx=y-3Elsey=x+3Printx-Y；Y-x错误 正确答案：AA.-33B.58C.33D.25-25.有如下函数：Functionfun（aAsInteger,nAsInteger）AsIntegerDimmAsIntegerWhilea>=na=a-nm=m+1Wendfun=mEndFunction该函数的返回值是（未填）。 错误 正确答案：Da加b的和a减n的差a乘以n的乘积a除以n的商（不含小数部分）.下面程序的输出结果是（未填）：PrivateSubproc（chAsString）s=""Fork=Len（ch）To1Step-1s=s&Mid（ch,k,1）Nextkch=sEndSubPrivateSubCommand1_Click（）ch$="ABCDEF"procchPrintchEndSub错误正确答案：CABCDEFAFEDCBAF.可以执行“工具”菜单中的（未填）命令来建立通用过程。 错误正确答案：CA.添加过程B.通用过程C.添加模块D.添加窗体.在窗体（Name属性为Form1）上画两个文本框（Name属性为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：PrivateSubCommand1_Click（）a=Textl.text+Text2.textPrintaEndSubPrivateSubForm_Load()Textl.text="”Text2.text="”EndSub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321,然后单击命令按钮，则输出结果为(未填)。 错误 正确答案：CA.444B.321123C.123321D.132231.决定标签内显示内容的属性是(未填)。错误 正确答案：DA.TextB.NameC.AlignmentD.Caption.关于Image控件和Picturebox控件的说明，其中错误的是(未填)。错误正确答案：BA.Image控件和Picturebox控件都有Picture属性B.Image控件和Picturebox控件都支持Print方法C.Image控件和Picturebox控件都可以用LoadPicture函数把图形文件装入控件中D.Image控件和Picturebox控件都能在属性窗口装入图形文件，也都能在运行期间装入图形文件.下列四组控件属性中，属性值的类型不相同的一组是（未填）。错误确答案：BLabel控件的Enabled属性与TextBox控件的Enabled属性OptionButton控件的Value属性与CheckBox控件的Value属性Command控件的Default属性与Command控件的Cancel属性Command控件的Visible属性与Form控件的Visible属性.要使图像框可以自动调整大小以适应图形的大小，则需要设置属性（未填）。错误 正确答案：BAutoSizeStretchAppearanceAutoRedraw.程序段的功能是：依次自动将列表框List2中所有列表项目移人列表框List1中并将移入List1中的项目从List2中删除。程序空白处填入：（未填）DoWhileList2.ListCount（）List2.RemoveItem0Loop错误 正确答案：AA.List1.AddltemList2.List（0）B.List1.AddltemList2.TextC.List2.AdditemList1.List（0）D.List2.AddltemList1.Text.以下叙述中错误的是（未填）。错误 正确答案：DA.下拉式菜单和弹出式菜单都用菜单编辑器建立B.在多窗体程序中，每个窗体都可以建立自己的菜单系统C.除分隔线外，所有菜单项都能接收Click事件D.如果把一个菜单项的Ena