VB考试题目1分析

1、窗体顶端一、单选题（每题1分，共76题）1.以下关于窗体的描述中错误的是 （）A. 在VB中每次运行时可以指定不同的启动窗体 B. 要让窗体以最大化方式打开，应设置MaxButton属性值为TrueC. 窗体第一次显示时也会发生Resize事件D. 第一次显示时窗体的位置可以不是设计时所指定的位置2.执行多窗体应用程序时， （）A. 打开一个窗体后，其他窗体都会被关闭B. 允许同时打开多个窗体C. 打开一个窗体后，其他窗体都会被隐藏起来D. 在某一时刻只能打开一个窗体3.程序中要在文本框文本中插入一段文字，应当使用的属性是 （）A. SelTextB. NameC. TextD. Captio

2、n4. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（）A. 方法 B. 属性C. 事件D. 工程5.当一个工程中含有多个窗体时，其中的启动窗体是 （）A. 启动VB时建立的窗体B. 第一个添加的窗体C. 最后一个添加的窗体D. 在工程属性窗口中指定的窗体6.当新建一个工程并启动Visual Basic后，工具箱中的控件是 （）A. 内部控件B. Active X控件C. 内部控件和Active X控件D. 内部控件或Active X控件7.启动Visual Basic后，就意味着要建立一个新的 （）A. 窗体B. 程序C. 工程D. 文件8.下面 是字符串数据的类型声明字符（）A

3、. %B. $C. &D. !9.对象是将数据和操作 起来的逻辑实体（）A. 封装 B. 串接C. 连接D. 伪装10.下面 属性用于显示对象的标题（）A. TextB. CaptionC. Name(名称)D. ForeColor11.根据“属性窗口”中的 属性来区分窗体中的控件（）A.TextB.Name(名称)C.CaptionD.Index12.如果希望一个窗体在显示的时候没有边框，应该 （）A. 将窗体的Caption属性设置成空字符B. 将窗体的Enabled属性设置成FalseC. 将窗体的BorderStyle属性设置成NoneD. 将窗体的ControlBox属性设置成Fal

4、se13.下面 变量名是错误的（）A. 姓名B. aC. a123D. a.114.下列关于窗体的叙述中错误的是 （）A. 窗体是Visual Basic的一种对象B. 各种控件对象必须建立在窗体上C. 可以用鼠标改变窗体的大小，所以窗体没有属性D. 可以把窗体看作是一个对象的容器15.当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的 属性为True（）A. AutoSizeB. WordWrapC. EnabledD. Visible16.Visual Basic窗体在整个生命周期中有四种状态，它们依次是 （）A. 创建(Initialize)、加载(Load)、可见(A

5、ctivate等)和卸载(Unload等) B. 加载(Load)、创建(Initialize)、可见(Activate等)和卸载(Unload等)C. 加载(Load)、可见(Activate等)、创建(Initialize)和卸载(Unload等)D. 创建(Initialize)、可见(Activate等)、加载(Load)和卸载(Unload等)17.当文本框的ScrollBars属性设置为非零值时却没有效果，原因是 （）A. 文本框中没有内容B. 文本框的MultiLIne属性值为FalseC. 文本框的MultiLIne属性值为TrueD. 文本框的Locked属性值为True18

6、.如果要改变窗体的标题，需要设置窗体对象的 属性（）A. captionB. NameC. BorderStyleD. Title19.若要求在文本框中输入密码时只显示“#”号，则应在此文本框的属性窗口中设置 （）A. Text属性值为#B. Caption属性值为#C. Passwordchar属性值为#D. Password属性值为True20.想要显示一个输入框，它的标题栏上显示“示例”，提示信息是“请输入一个正整数”，输入框内默认内容为“1”，其语句是 （）A. A=InputBox(“请输入一个正整数”,”示例”,”1”)B. A=InputBox(”示例”,“请输入一个正整数”,”

7、1”)C. A=InputBox(”1”,”示例”,“请输入一个正整数”)D. A=InputBox(“请输入一个正整数” ,”1”,”示例”)21.以下窗口中 可用来在设计时修改窗体的默认运行位置（）A. 本地窗口B. 立即窗口C. 窗体布局窗口D. 工程资源管理器窗口22.下列 是窗体对象的方法而不是属性（）A. Name B. MoveC. CaptionD. Enabled23.下面变量名称正确的是 （）A. x.1B. integerC. x_1_yD. x,y24.表达式为4+56*7/8 mod 9的值是 （）A. 4B. 5C. 6D. 725.运行下面程序，单击窗体后在窗体上

8、显示的内容是 Private Sub Form_Click()Dim x As Integer, y As Integerx = 1: y = 0Do While x 3y = x + yx = x + 1LoopPrint x; yEnd Sub（）A. 1 0B. 3 3C. 5 3D. 3 526.下列程序段执行结果为 X=2Y=1IF X*Y0（）A. TrueB. FalseC. -1D. 127.以下哪个是可以判断变量a，b均不等于0的逻辑表达式 （）A. a0 or b0B. a+b0C. a*b0D. a mod b028.在窗体上放置一个命令按钮Command1和一个文本框T

9、ext1，把Text1的Text属性设置为空，运行下面的事件过程代码：Private Sub Command1_Click()Dim a,bA=InputBox(“输入一个整数”)B=Text1.TextText1.Text=a+bEnd Sub运行程序，在Text1文本框中输入456，单击按钮Command1，然后在出现的输入框中输入123，单击【确定】按钮，在Text1中显示的内容是 （）A. 579 B. 123C. 123456D. 45629.以下 语句可以跳出Do UntilLoop循环（）A. EndB. Exit LoopC. Exit DoD. Exit For30.表达式2

10、+3*45-SIN(X+1)/2中最先进行的运算是 （）A. SINB. 45C. 3*4D. X+131.函数Int(Rnd*20)是在 范围内的整数（）A. (0,2）B. (1,20）C. (0,19）D. (1,9）32.下列 是日期常量（）A. “2/1/02”B. 2/1/02C. #2/1/02#D. 2/1/0233.赋值语句A=123 + Mid( “123456”,3,2 )执行后，A的值是 （）A. 157B. 12334C. 123D. “12334”34.下面 变量名是错误的（）A. 姓名B. aC. a123D. a.135.在窗体中放置一个命令按钮Command1

11、和一个文本框Text1，并编写如下程序：Private Sub Command1_Click()x=”A” : y=”B” : z=”C”For i =1 To 3 Step -1x=y : y=z : z=xNext iText1.Text=x+y+zEnd Sub单击按钮后，文本框显示的结果是 （）A. ABCB. BCAC. BCBD. CBC36.关于多分支结构的Case语句，下列写法中错误的是 。（）A. Case 1,5,Is10B. Case 0 to 10C. Case Is10 And Is 1037.x是小于100的非负数，用vb表达式正确的是 （）A. 0 B. 0=x=

12、0 AND x100D. 0=x OR x10038.下面的运算符中优先级最高的是 （）A. NotB. C. D. *39.运行下面程序：Private Sub Form_Click()a = 1b = 1N = InputBox(n=)For I = 2 To N Step 1c = a + ba = bb = cNextForm1.ClsPrint bEnd Sub单击窗体输入3后，窗体上的显示结果为： （）A. 1B. 3C. 5D. 740.运算符“”两边的操作数若类型不同，则先 再运算（）A. 取整数为Byte类型B. 取整数为Integer类型C. 四舍五入为整型D. 四舍五入为

13、Byte类型41.如果变量赋值为str1=”练习”，var1=5，则语句Print ”第”& var1 &”次” & str1 输出的结果为 （）A. 第5次练习B. 第5次str1C. 第var1次练习D. 第var1次str142.下列程序执行后，整型变量C的值为 A=328B=24Select Case B100Case 0C=A+BCase 1C=A*10+BCase 2C=A*100+BCase 3C=A*1000+BEnd Select（）A. 24B. 328C. 568D. 35243.设置一个单选按钮所代表选项的选中状态，应当在属性窗口中改变的属性是 。（）A.Caption

14、B.TextC.ValueD.Name44.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码：Private Sub M1_Click(Index As Integer)Form1.Caption=”Myform2”End Sub运行时，单击控件数组中的第一个按钮，则窗体标题为 。（）A.Form1B.M1C.Myform1D.Myform245.把字符串“123”转换成数值123时应该使用的函数是 。（）A.StrB.LenC.ValD.Rnd46.以下叙述中正确的是 。（）A.组

15、合框包含了列表框的功能B.列表框包含了组合框的功能C.列表框和组合框的功能无相近之处D.列表框和组合框的功能完全相同47.要使控件和框架捆绑在一起，以下操作正确的是 。（）A.在窗体不同位置上分别画一个框架和控件，再将控件拖动到框架上B.在窗体上画好控件，再画框架将控件框起来C.在窗体上画好框架，再在框架上画控件D.在窗体上画好框架，再双击工具箱中的控件48.建立一个俱乐部会员信息输入界面，要求选择会员的性别、职业(工程师、公务员、教师、医生、其他)及爱好(共10种，如一个人既喜欢足球，又喜欢旅游)。应如何在窗体上如何实现 。（）A.用一组17个复选框来实现B.将10种爱好用一组10个复选框来

16、实现，性别和职业用7个单选按钮来实现C.将10种爱好用一组10个单选按钮来实现，性别和职业用7个复选框来实现D.将10种爱好用一组10个复选框来实现，性别用2个单选按钮来实现，职业用一个框架和5个单选按钮来实现49.要使每次单击滚动条两端滚动按钮时变化值为10，应设置 属性。（）A.SmallChangeB.MinChangeC.MaxChangeD.LargeChange50.当组合框的Style属性设置为1时，其表现形式是 。（）A.下拉列表框B.下拉组合框C.简单组合框D.文本框51.在窗体上放置一个按钮Command1，程序如下：Private Sub Command1_Click()

17、Dim a(1 To 4) As IntegerDim i As Integera(1) = 5 : a(2) = 6 : a(3) = 7 : a(4) = 8subp a()For i = 1 To 4Print a(i)Next iEnd SubSub subp(b() As Integer)Dim i As IntegerFor i = 1 To 4b(i) = 2 * iNext iEnd Sub运行程序，单击按钮在窗体上显示 。（）A.2回车4回车6回车8B.5回车6回车7回车8C.10回车12回车14回车16D.出错52.下列程序段的执行结果为 。Dim A(10,10)For

18、i=2 to 4For j=4 to 5A(i,j)=i*jNext jNext iPrint A(2,5)+A(3,4)+A(4,5) （）A.22B.42C.32D.5253.在窗体上放置两个标签Label1，Label2和一个命令按钮Command1，编写程序如下：Private Sub Command1_Click()Dim a As Singlea=val(Label2.Caption)Call Func(Label1,a)Label2.Caption=aEnd SubSub Func(L As Label, ByVal a As Integer)L.Caption= 1234a=a

19、*aEnd SubPrivate Sub Form_Load()Label1.Caption=ABCDLabel2.Caption=10End Sub运行程序，单击按钮，在两个标签中分别显示 。（）A.ABCD和10B.1234和100C.ABCD和100D.1234和1054.可以同时删除字符串前导和尾部空白的函数是 。（）A.LTrimB.RTrimC.TrimD.A和C55.阅读下面的程序，选择运行结果 。Option Base 1Private Sub Form1_Load()Dim a(10) As Integer, p(3) As IntegerDim i As Integer,

20、k As IntegerK=5For i=1 to 10a(i)=iNextFor i=1 to 3P(i)=a(i*i)NextFor i=1 to 3K=k+p(i)*2NextPrint kEnd Sub（）A.35B.28C.33D.3756.下列程序段的执行结果为 。Dim M(10)For I=0 to 10M(I)=2*INext IPrint M(M(3) （）A.12B.6C.0D.457.函数过程与SUB过程必须用关键字Private或Public声明。（）A.对B.错58.要让窗体以最大化方式打开，应设置Windowstate属性值为2。（）A.对B.错59.让复选框不可

21、用，可设置其Enabled属性为False或设置Value属性为2。 （）A.对B.错60.一个工程文件中可以包含多个标准模块文件。（）A.对B.错61.消息对话框函数MsgBox的前3个参数分别表示默认按钮、按钮样式及图标样式。（）A.对B.错62.赋值语句的功能是计算表达式值并转换为相同类型数据后为变量或控件属性赋值。（）A.对B.错63.过程中的静态变量是局部变量，当过程再次被执行时，它的值将被重新置0。（）A.对B.错64.一个VB工程文件包含窗体文件、标准模块文件、类模块文件等。（）A.对B.错65.在Visual Basic中通过Forecolor 属性来设置字体颜色。（）A.对B

22、.错66.标签(Label)控件的AutoSize属性值为True时，标签的宽度、高度会自动调整以显示标签中所有的内容。（）A.对B.错67.子程序定义时使用Private表示此子程序只可以被本工程中的其他过程调用。（）A.对B.错68.对象是将数据和操作封装起来的逻辑实体。（）A.对B.错69.For/Next语句中，循环控制变量只能是整形变量。（）A.对B.错70.通过文本框的Setfocus属性可以获得当前文本插入点所在的位置。（）A.对B.错71.定时器(Timer)控件在运行时是不可见的，因此在设计时可将其放在窗体中的任意位置。（）A.对B.错72.用面向对象的编程思想观点来看，一只

23、黑色的台球被打进袋内，则台球是对象、黑色是方法。（）A.对B.错73.调用过程时的实参必须与对应形参的类型相同。（）A.对B.错74.要从Function过程中退出，使用 Exit Do语句。（）A.对B.错75.复选框的Value属性用于决定该复选框是否被选中。（）A.对B.错76.一个应用程序可以有多个窗体，使用工程菜单下的添加窗体命令，可以添加一个新的窗体。（）A.对B.错二、多选题（每题6分，共4题,每大题只能选四个选项,依次从四个选项中选取正确答案,超过4个选项将按照选项数倒扣分数,后果自负）1.编程实现：利用输入对话框不断输入数字，直到输入-1结束，然后显示它们的总和。程序代码如下

24、，请在空白处选择最佳答案。Private Sub Form_Load()Dim valueDim sum As Integer_1_ DoValue=InputBox(“输入数字：”)If IsNumeric(value) ThenValue=CInt(value)_2_ End IfLoop _3_ _4_ MsgBox “总和是：” & sumEnd Sub（）A. value=0B. sum=0C. value=-1D.sum=-1E. value= sumF. sum=valueG. value=value+sumH. sum=sum+valueI. Until value-1J. While value -1K. Until value=1L. While value=-1M. sum=sum+valueN. sum=sum+1O. sum=sum-1P. sum=value2.求的近似值，可利用公式/41 - 1/3 + 1