1[简答题] 在名称为Forml的窗体上添加一个名称为Pl的图片框,请编写适当的事件过程,使得程序在运行时,每单击一次图片框,就在图片框中输出“单击图片框”,每单击图片框外的窗体一次,就在窗体中输出“单击窗体”,运行时的窗体如图所示。要求在程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjr2.vbp,窗体文件名保存为sjt2.frm。
参考解析:
【考点分析】本题考点有:图片框的Name属性、Print方法和Click事件以及窗体的Print方法和Click事件。
【解题思路】通过图片框Name属性设置图片框的名称,运用图片框Print方法,使图片框上显示字符,运用窗体Print方法,使窗体上显示字符。
【操作步骤】
步骤1:新建一个窗体,按照题目要求建立控件并设置其属性,如图3.13所示。
步骤2:打开代码编辑窗口,在指定位置编写如下代码。
参考答案
Private Sub Form_Click()
Forml.Print"单击窗体"
End Sub
Private Sub P1_Click()
P1.Print"单击图片框"
End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
2[单选题] 以下关于过程及过程参数的描述中,错误的是( )。
A.调用过程时可以用控件名称作为实际参数
B.用数组作为过程的参数时,使用的是“传地址”方式
C.只有函数过程能够将过程中处理的信息传回到调用的程序中
D.窗体(Form)可以作为过程的参数
参考答案:C
参考解析:过程定义时,形参除了可以是整型、单精度、双精度等数据类型外,还可以是控件或窗口等对象型。相对应的调用过程时实参也可以是一般数据类型、控件名或窗体。故A、D选项正确。
调用过程时,如果过程的参数是数组,则实参传给形参的是地址,这个地址是用数组名表示的一个符号地址,是数组的起始地址,形参和实参用的是同一个地址,在过程中形参的改变会引起实参的改变。故B选项正确。
在过程调用时,不只是函数过程能把过程中处理的信息传回到调用程序中,Sub过程也可以。Sub过程中形参声明时前|面有关键字ByRef或省ByRef(默认)时,实参和形参之间传j递的是地址,Sub过程中形参的变化也会引起实参的变化,这样Sub过程中处理的信息也可以传回调用程序中=教c选,1说法错误。
3[单选题] 计算下面分段函数的正确语句是( )。
A.Y:nf(x>0。x+1,iIf(x<0,x一1,0))
B.Y=IIf(x=0,0,IIf(x>0,x一1,x+1))
C.y:IIf(x>0,x+1,IIf(x<0,0,x一1))
D.Y=IIf(x=0,0,x一1,x+1)
参考答案:A
参考解析:
IIF是条件函数,它的语法格式是:
Ilf(<条件表达式>,<表达式为True时的取值>,<表达式为False时的取值>)
B选项中,内层的HF函数中,当X>0时,X+1,否则X一1,所以应该是IIf(X>0,X+1,X一1)。
C选项中,内层的IⅡ函数中,当x<0时,x一1,否则0,所以应该是IIf(X<0,x一1,O)。
D选项中IIf函数中有4个参数不对,应该有3个参数。故B、C、D选项均错误,A选项正确。
4[单选题] 已知图片框Picturel中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是
A.在设计阶段选择图片框Pieturel,并按Delete键
B.在运行期间执行语句Picturel.Picture=LoadPicture("")
C.在运行期间执行语句Pieturel.Picture=""
D.在设计阶段先选中图片框Picturel,再在属性窗口中选择Picture属性,最后按Enter键
参考答案:B
参考解析:如果图片框已装入了一个图形,在不删除图片框的前提下要想清除该图形有两种方法。一是在设计阶段在图片框的属性窗口中删除图片框控件Picture属性行后边的”(Bitmap)”,另一种方法是在程序运行阶段使用LoadPic-ture("")装一个空文件,这样也能清除图形。
5[单选题] 窗体上有一个名称为Combol的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是( )。
A.Private Sub Comlbol—KeyDown(KeyCode As Integer,Shift As Integer)IfKeyCode=13 ThenComb01.Addltem Comb01.TextErldⅡEnd Sub
B.Private Sub Combol—KeyDown(KeyCode As Integer,Shift As Integer)IfKeyCode=13 ThenComb01.Addhem Textl.Text,EIldIfEnd Sub
C.Private Sub Combol—Click( )Comb01.Addltem Comb01.Text·End Sub
D.Private Sub Combol—Click( )Comb01.Addhem Textl.TextEnd Sub
参考答案:A
参考解析:在组合框中的输入的文本保存在它的Text属性中,根据程序要求,只要判断按下了回车键后,使用组合框的Addhem方法把Text中的字符添加到列表中即可。选项C和D没有判断是否按下回车键,所以排除。而选项B中使用Addhem方法添加的是Textl.Text的值,不是组合框Com—bol的Text值,所以也不对。
6[单选题] 为把圆周率的近似值3.14159存放在变量pi中,应
该把变量pi定义为
A.DimpiAsIntegerB.Dimpi(7)AsIntegerC.DimpiAsSingleD.DimpiAsLong
参考答案:C
参考解析:单精度Single或双精度Double型的变量能够保存浮点型小数,整型Integer和长整型Long的变量只能保存整型数据。本题中圆周率为3.14159,小数,可定义一个Single或Double型变量来保存。故选C.。
7[单选题] 为计算a“的值,某人编写了函数power如下:
在调试时发现是错误的,例如Print power(5,4)的输出应该是625,但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的,错误的一个是( )。
A.
B.
C.
D.
参考答案:B
参考解析:程序中计算a“的算法有误,由于已经将a的值赋给了p,在后边的F缸循环中再乘n次a显然就多乘了一次a,因此,要改正此程序或者将P=a改为P=1,或者将fork=1 to n改成fork=1 to n一1或fork=2to n。而B)选项将P=p 8 a改为P=pn将会导致P=pn执行n次,得不到正确结果。
8[单选题] 能正确表述“X为大于等于5并且小于20的数”的VisualBasic表达式是
A.X>=5Andx<20B.X>=5Orx<20C.5<=X<20D.5<=x<=20
参考答案:A
参考解析:选项B.表述的是X为大于等于5或者小于20的数,不符题意;选项C.、选项D.的表达式不符合VB的逻辑表达式方式,是错误的。
9[简答题] 在名称为Forml的窗体上添加一个名称为Shapel的形状控件,添加两个名称分别为Commandl、Command2,标题分别为“圆形”、“红色边框”的命令按钮。将窗体的标题设置为“图形控件”,如图1所示。请编写适当的事件过程,使得程序在运行时,单击“圆形”按钮将形状控件设为圆形。单击“红色边框”按钮.将形状控件的边框颜色设为红色(&HFF&),如图2所示。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下,工程文件名保存为sja.vbp,窗体文件名保存为sjt2.frm。
参考解析:
根据题意,通过命令按钮的Name、Caption属性设置命令按钮的名称和标题。‘在单击命令按钮事件过程中,通过设置形状控件的BorderColor和Slmpe属性,将形状控件的边框颜色设为红色和将形状控件设为圆形。
【操作步骤】
步骤l:建立界面,并设置控件的属性。程序中用到的控件及属性见表2。
步骤2:编写程序代码。
Private Sub Commandl—Click()Shapel.Shape=3
End Sub、‘
Pl'ivate Sub Command2_click()Shapel.BorderColor=&HFF&End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
10[简答题] 在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出l~1000范围内能被7整除或被5整除的整数的个数,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算能被7整除或能被5整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun( )和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
参考解析:
本题要求的是l000以内能被5或7整除的数的个数。在Visual Basic中,使用Mod运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能整除。
相关推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |