VB试题(三)

VB试题（三）一、概念填空题1在VisaulBasic中的常量分为两种，一种是文字常量一种是（）常量。符号常量2VB中每个对象都有自己的属性，（）属性决定控件是否允许可见。Visible3在VB对象的三要素中，可以把（）看作一个对象的性质，把（）看作对象的响应，把（）看作对象的动作。属性|事件|方法4VB中拥有多个窗体的程序可用（）语句窗体装入内存，用（）语句从内存中删除指定窗体。LOAD|UNLOAD5在VB中，当坐标系确定后，如果坐标值前加上关键字Step，则坐标值（X，Y）表示对象上的（）坐标。相对坐标6VB逻辑数据类型只有True与False两个值。当逻辑数据转换成整型数据时，True转换为（），False转换为（）。1|07VB中依据变量的作用范围将VB变量的作用范围分为三类，它们是：（）变量、（）变量和（）变量。局部变量|窗体模块级变量窗体模块变量|全局变量8VB中的控件分为内部控件、ActiveX控件和（）三类。可插入对象9货币类型的数据小数点的位置是固定的，精确到小数点后（）位。410A=7，B=3，C=4，则表达式AMOD3+B^3/C\5的值为（）。11根据变量的定义位置和所使用的变量定义语句不同，VB中的变量可以分为3类，即（）、模块变量和（）。局部变量|全局变量12字符串常量由任何ASCII字符组成，在程序中，它必须由（）括起来。双引号””13双击窗体中的对象后，VisaulBasic将显示的窗口是（）窗口。代码二、是非选择题1在VisaulBasic中，没有指针类型的变量。T2当向一个过程传递参数时，可以通过两种方式传递：引用传递和值传递。T3在VisaulBasic中，窗体最常见的必不可少的对象，一个窗体可以对应多个窗体模块。F4在VisaulBasic中，若在程序中使用字符串，则字符串必须用单引号或双引号将字符串括起来。F5在VisaulBasic中，常量分为直接常量和符号常量两种。T6在VisaulBasic的事件过程中，Private表示此过程只可以被本工程中的其它过程调用。F7在VisaulBasic中，工具箱中包含了所有的VB控件。F8在VisaulBasic中，控件数组可以由不同类型的控件组成。F9在VisaulBasic中，文本框的Autosize属性是根据文本内容自动调整文本框的大小。F10VisaulBasic中，当一个工程含有多个窗体时，其中的启动窗体是第一个添加的窗体。F三、概念选择题1VB可分为（C）。A)学习版、专家版和企业版B)中文版、英文版和学习版C)学习版、专业版和企业版D)内部版、正式版和测试版2实现字符串Unicode编码方式与ANSI编码方式相互转换的函数是（B）。A)StrB)StrconvC)TrimD)Mid3若要获得滚动条的当前值，可访问的属性是（B）。A)TextB)ValueC)MaxD)Min4若要将窗体从内存中卸载出去，其实现的方法是（B）。A)ShowB)UnLoadC)LoadD)Hide5下列关于For…Next语句的说法正确的是（A）。A)循环变量、初值、终值和步长都必须为数值型B)step后的步长只为正数C)初值必须小于终值D)初值必须大于终值6在用通用对话框的ShowOpen显示“打开”文件对话框时，若要指定其中的文件类型为文本文件，正确的描述格式是（A）A)“text(.txt)|(*.txt)”B)“文本文件(.txt)|(.txt)”C)“text(.txt)||(*.txt)”D)“text(.txt)(*.txt)”7若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置（C）。A)Text属性值为*B)Caption属性值为*C)password属性值为空D)Passwordchar属性值为*8下述的说法哪种是Windows的程序设计方法：（D）。A)面向对象、顺序驱动B)面向过程、事件驱动C)面向过程、顺序驱动D)面向对象、事件驱动9下列关于工具箱的说法正确的是(C)。A)工具箱中控件的数目是固定不变的。B)工具箱中包含了所有的VB控件。C)VB的内部控件不能从工具箱中移除。D)ActiveX控件不能添加到工具箱中。10当程序运行时,在窗体上单击鼠标,以下(C)事件是窗体不会接收到的。A)MouseDownB)MouseUpC)LoadD)Click11VisualBasic的三种工作模式是(B)。A)编辑、编译与运行B)设计、运行与中断C)中断、打开与关闭D)设计、编辑与编译12使用(C)方法可以进入代码编辑窗口。A)执行“文件”菜单中的“打开”命令。B)双击当前窗体的标题栏。C)执行“视图”菜单中的“代码窗口”命令。D)双击“工程资源管理器”。13编写如下事件过程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6AndButton=2ThenPrintHelloEndIfEndSub程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下(D)操作。A)同时按下Shift键和鼠标左按钮B)同时按下Shift键和鼠标右按钮C)同时按下Ctrl、Alt键和鼠标左按钮D)同时按下Ctrl、Alt键和鼠标右按钮14如果在立即窗口中执行以下操作：(CR是回车键，下同)a=8:b=9:printab则输出结果是(C)。A)-1B)0C)FalseD)True15以下语句的输出结果是(C)。PrintFormat$(32548.5,“000,000.00”)A)32548.5B)32,548.5C)032,548.50D)32,548.5016下列不能打开菜单编辑器的操作是(D)。A)按Ctrl+EB)单击工具栏中的“菜单编辑器”按钮C)执行“工具”菜单中的“菜单编辑器”命令D)按Shift+Alt+M17表达式4+5*7/8Mod9的值是(D)。A)4B)5C)6D)718假定Picturel和Textl分别为图片框和文本框的名称，下列不正确的语句是(C)。A)Print100B)Picturel.Print100C)Print.Text1D)Debug.Print2519下列可作为VisualBasic的变量名的是(B)。A)4*DeltaB)A1phaC)4ABCD)Ab20多分支结构执行哪一个分支的根据是(C)。A)Selectcase语句的“测试表达式”与Case语句的“变量值列表”同为false。B)Selectcase语句的“测试表达式”与Case语句的“变量值列表”同为true。C)Selectcase语句的“测试表达式”与Case语句的“变量值列表”相匹配。D)Selectcase语句的“测试表达式”与Case语句的“变量值列表”完全相等。四、程序选择题1下列程序段的执行结果为（A）。X=5Y=-20IfNotx0Thenx=y-3Elsey=x+3Printx-y;y-xEndIfA)-33B)5-8C)3-3D)25-252下列程序执行后，变量S的值为（B）。DimsAsLong,xAsIntegers=0Forx=1To10Step2s=s+xNextxText1.Text=sA)10B)25C)50D)1003下列程序段的执行结果为(B)。DimA(10,10)ForI=2To4ForJ=4To5A(I,J)=I*JNextJNextIPrintA(2,5)+A(3,4)+A(4,5)A)22B)42C)32D)524执行下列程序后，X的值为(C)。X=3y=6DoWhiley=6x=x*yy=y+1LoopA)3B)6C)18D)205下列程序段的执行结果为(C)。DimM(10)Fork=1To10M(k)=11-kNextkX=6PrintM(2+M(X))A)2B)3C)4D)56有如下程序段，执行该程序段，在输入对话框中输入数据4，该程序段的执行结果是(-10)。N=Val(InputBox(请输入大于零的偶数))s=0I=1c=1Dos=s+c*I*Ic=c*(-1)I=I+1LoopWhileI=NPrints五、阅读程序写结果1单击命令按钮时，下列程序代码的执行结果为(6)。PublicFunctionMyFunc(mAsInteger,nAsInteger)AsIntegerDoWhilemnDoWhilemnm=m-nLoopDoWhilemnn=n-mLoopLoopMyFunc=mEndFunctionPrivateSubCommand1_Click()PrintMyFunc(24,18)EndSub2以下程序的输出结果是(33)。OptionBase1PrivateSubCommand1_Click()Dima(10),p(3)AsIntegerk=5ForI=1To10a(I)=INextIForI=1To3p(I)=a(I*I)NextIForI=1To3k=k+p(I)*2NextIPrintkEndsub3在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：PrivateSubForm_Load()List1.AddItem357List1.AddItem246List1.AddItem123Listl.AddItem456Text1.Text=EndSubPrivateSubList1_DblClick(456789)a=List1.TextPrinta+Text1.TextEndSub程序运行后，在文本框中输入“789”，然后双击列表框中的456，则输出结果为(456789)。4假定有如下的Sub过程：SubS(xAsSingle,yAsSingle)t=xx=t*yy=t/yEndSub在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommandl_Click()DimaAsSingleDimbAsSinglea=5：b=4Sa,bPrinta;bEndSub程序运行后，单击命令按钮，输出结果为(201.25)。六、程序填空1以下程序代码实现单击命令按钮Command1时生成20个（0～100）之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。Int(Rnd*101)arr(k)50Dimarr(1To20)ForI=1To20arr(i)=(1)NextISum=0Fork=1to20If(2)ThenPrintTab(20);arr(k)Sum=Sum+arr(k)EndIfNextkPrintTab(20);Sum=;Sum2以下程序用来建立一个10*10矩阵，该矩阵两条对角线上的元素为1，其余元素为0，请补充完该程序。n=mn=11-mm=1To10PrivateSubForm_click()Dims(10,10)AsIntegerForn=1To10Form=1To10If(1)Or(2)Thens(n,m)=1Elses(n,m)=0EndIfNextmNextnForn=1To10For(3)Prints(n,m)NextmPrintNextnEndSub3窗体中有图片框(Picture)和计时器(Timer1)两个控件。运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下角移动，每次向左、向右移动100twip。PrivateSubForm_Load()Picture1_Picture=LoadPicture(c:\pic\mouth.ico)(1)Timer1.Interval=2000EndSubPrivateSubTimer1_Timer()Staticx,yAsIntegerx=x+100y=y+100Pictuer1.Movex,yEndSub4下列程序用来计算1+2+3……+10的值，请补充完程序。Dimt,kassingleK=0DoWhilek10K=k+1(1)t=t+k