11[单选题] 设工程文件中包名称分别为Forml、Form2的两个窗体，且Forml的菜单属性设置如下：
关于上述程序，以下叙述中错误的是
A.Index属性的值可以用来区分控件数组元素
B.Index为1的菜单项的标题可能会改变
C.两个名称均为Mnul的菜单项构成一个控件数组
D.语句Form2.Hide将Form2卸载
参考答案：D
参考解析：程序中菜单Mnul是一个控件数组，它们以In-dex属性值作为数组下标来区分各元素。在菜单单击事件中，Flag值为真时，显示Form2，同时把索引为1的菜单项标题改为“隐藏窗体2”，然后把Flag标志设为假;当Flag值为假时，隐藏Form2，同时把索引为1的菜单项标题改为“显示窗体2”，然后把Flag标志设为真。窗体Hide方法，只是将窗体隐藏，并没有从内容中卸载。因此D选项错。
12[单选题] 以下关于控件的叙述中，正确的是
A.标签控件能够获得焦点
B.不能对列表框中的列表项进行多项选择
C.命令按钮的外观可以被设置为图形
D.设置形状控件的Shape属性，可以使其呈现为直线
参考答案：C
参考解析：标签、框架、菜单、直线、形状、图像框、计时器都不能接收焦点，选项A.错误;列表框用于显示可供做单一或多个选择的列表项，选项B.错误;形状控件(Shape)提供了显示一些规则图形的简易方法，通过设置形状控件Shape属性值，可显示6种图形：0-矩形、1-正方形、2-椭圆、3-圆、4-圆角矩形、5-圆角正方形，选项D.错误。
13[单选题] 执行以下程序段：
a$=”Visual Basic Programmin9”b$=”C++”
c$：UCase(Left$(a$，7))&b$&Right$(a$，12)后。变量e$的值为( )。
A.Visual BASIC Programming
B.VISUAL C++Programming
C.visual C++Programming
D.VISUAL BASIC Programming--/--
参考答案：B
参考解析：UCase(Left(a$，7))是从字符串a的左边向右取出7个字符，然后再全部转换为大写字母，结果是：”VISUAL一”：Right$(a$，12)是从字符串a的右边向左取出12个字符，结果为”一Programming”，&是字符串连接符，把”VISUAL一”&”C++”&”一Programming”连接在一起，合成字符串”VISUAL—C++一Programming”，并把它赋给字符串变量C，所以字符串变量C的值就是合成的字符串。故B选项正确。
14[单选题] 命令按钮不支持的事件为
A.ClickB.DblClickC.GotFocusD.MouseMove
参考答案：B
参考解析：命令按钮支持的事件有Click，GotFocus和MouseMove，不支持DblClick事件，故选B.。
15[单选题] 为了使文本框只具有垂直滚动条，应先把MultiLine属性设置为True，然后再把ScmllBars属性设置为( )。
A.0B.1C.2 D.3
参考答案：C
参考解析：文本框的ScrollBars属性值：0表示无滚动条，1表示只有水平滚动条，2表示只有垂直滚动条，3表示水平和垂直滚动条都有。本题文本框只具有垂直滚动条，则ScroUBar属性值就设置为2，故C选项正确。
16[单选题]对于能够获得焦点的控件，若要使其不能接收焦点，应该
A.将TabStop属性值设为True
B.将TabStop属性值设为False
C.将TabIndex属性值设为0
D.将Enabled属性值设为False
参考答案：D
参考解析：TabStop属性是用来设置是否允许用户使用Tab键将焦点移到该控件上，默认情况下是允许的。若其值为True时，允许使用Tab键将焦点移到该控件;否则，就不允许。
TabIndex属性则是用来设置该控件的跳表顺序的，取值是一个整数，从0开始依次类推，该属性的值小的将先获取焦点。
Enabled是用来设置控件是否可用。
根据题意，选项D.正确。
17[单选题] 设窗体上有2个直线控件Linel和Line2，若使两条直线相连接，需满足的条件是
参考答案：A
参考解析：直线控件的Xl、Yl和X2、Y2属性分别表示直线两个端点的坐标，即(xl，Yl)和()(2，Y2)。如果要使两条直线相连，显然这两条直线的某一端点的坐标相同才行。
18[单选题] 编写如下程序：
程序运行后，单击命令按钮Commandl，输出结果为
A.TrueB.FalseC.1D.-1
参考答案：B
参考解析：ff…Else语句对b进行操作。a*b=6，<10，所以执行b=b+1=3。Print语句中，b-a=0，条件为假。选B.。
19[简答题] 在名称为Forml的窗体上添加两个命令按钮(见图l)，其名称分别为Cmdl和Cmd2，编写适当的事件过程。程序运行后，单击命令按钮Cmdl，则可使该按钮移到窗体的左上角(只允许通过修改属性的方式实现);单击命令按钮Cmd2，则可使该按钮在长度和宽度上各扩大到原来的2倍。程序的运行情况如图2所示。
要求：不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sit2.vbp，窗体文件名保存为sjr2.frm。
参考解析：
在窗体上建立控件后，先设置控件的属性，再编写事件过程。
单击命令按钮触发Click事件。利用按钮的Height和Width属性来改变按钮的大小;利用按钮的Left和Top属性来改变按钮的位置。
【操作步骤】
步骤l：建立界面，并设置控件的属性。程序中用到的控件及属性见表3。
10[简答题] 在考生文件夹下有一个工程文件sjr4.vbp，运行情况如图所示。程序的功能是计算下列表达式的值：z=(x+2)^2+(X+3)^3+(X+4)^4+…+(X+N)^N其中N和X的值通过键盘分别输入到文本框Textl、Text2中。之后如果单击标题为“计算”、名称为Commandl的命令按钮，则计算表达式的值2，并将计算结果显示在名称为Labell的标签中。
在给出的窗体文件中已经添加了全部控件和程序，但程序不完整。要求去掉程序中的注释符，把程序中的?改为正确的内容。
注意：考生不得修改窗体文件中已经存在的程序。程序中不得使用^运算符，而应使用函数xn进行幂运算。程序至少运行一次，按照下图输入数据，使X=10，N=5，单击“计算”按钮，计算z的值，并将结果显示在标签Labell中，否则没有成绩。最后.程序按原文件名存盘。
参考解析：
【解题思路】通过For循环语句实现xn()的幂运算;Click事件过程中通过Val()函数实现字符类型向数值型的转换，通过循环语句及调用xn()函数，获得函数返回值，实现表达式的运算结果;运用Call语句调用SaveResuh函数对结果进行保存，涉及文件的Open、Cbse和Output操作，最后将结果保存在文件夹下的out,*.dat文件中。
【操作步骤】
步骤1：打开本题工程文件。
步骤2：分析并编写程序代码。
参考答案
Private Function xn(a As Single，m As Integer)
Dim i As Integer
tmp=1
For i=1 TO m
tmp=__tmp*a________´求ai的结果
Next
xn=_____tmp_____´返回计算结果
End Function
Private Sub Command1_Click()
Dim n As Integer
Dim i As Integer
Dim t As Single
Dim S，X As Single
n=Val(Text1.Text)’将数字字符转换为数值
x=Val(Text2.Text)'读取n.xm值
z=0
For i=2 To n
t=x+i
z=z+__________调用xn函数求ti
Next
Label1.Caption=__________´将结果显示在Labell
Call SaveReSult
End Sub
Private Sub SaveReSult()
Open App.Path&"\out4.dat"For Output
As#1
Print #1，Labell1.Caption
Close #1
End Sub
步骤3：按照题目要求调试并运行程序，如图3.15所示。
步骤4：关闭程序后，按照题目要求保存工程和窗体。
【易错提示】对于xn(t，i)函数调用的理解，弄清楚两个变量各代表的函数值的意义，正确调用函数。
相关推荐：
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
