6[单选题] 以下说法中正确的是( )。
A.当焦点在某个控件上时,按下一个字母键,就会执行该控件的KeyPress事件过程
B.因为窗体不接受焦点,所以窗体不存在自己的KeyPress事件过程
C.若按下的键相同,KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同
D.在KeyPress事件过程中,KeyAscii参数可以省略
参考答案:A
参考解析:B选项错误原因:窗体有自己的KeyPress事件过程;c选项错误原因:KeyPress事件过程中的KeyAscii参数返回按键的ASCIl码值,大小写字母返回值不同;而KeyDown事件过程中的KeyCode参数返回的是按键代码,大小写字母返回值相同。故按下的键相同时,keyAscii和KeyCode参数不一定返回相同值;D选项错误原因:KeyPress事件中的KeyAscii参数不能省。A选项正确。
7[单选题] 窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程:
Private Sub Optionl_Click(Index As Integer)End Sub
下面关于此过程的参数Index的叙述中,正确的是( )。
A.Index为1表示单选按钮被选中,为0表示未选中
B.Index的值可正可负
C.Index的值用来区分哪个单选按钮被选中
D.Index表示数组中单选按钮的数量
参考答案:C
参考解析:
Index参数值返回的是单选按钮数组中各单选按钮的索引值,用它来区分各单选按钮。故A、D选项错误,C选项正确;
Index的值只能是非负数,故B选项错误。
8[单选题] 窗体上有l个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序:
程序运行后,单击命令按钮Command1,并输入“Happynewyear”,则在Listl中显示的内容为
参考答案:A
参考解析:Listl.Addltem可以为列表框添加列表项。For循环中通过Mid函数从字符串中倒序取出字符,碰到空格时添加新列表项。选A.。
9[简答题](1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。本程序只有一个窗体,当把鼠标光标移到窗体上时,每双击一次鼠标,就变换一种鼠标光标的形状,依次显示鼠标光标的15种属性。程序运行后的窗体如图59-4所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符“'”,但不能修改其他部分。存盘时不得改变文件名和文件夹。
(2)在考生文件夹下有工程文件sj4.vbp,窗体文件sj4.frm,该程序是不完整的。在窗体上已经画出一个图像框,名称为Image1;一个水平滚动条,名称为HScroll1。要求考生不改动Image1的Height与Width属性。当运行程序时,图像框中加载考生文件夹下的图片test.bmp。滚动水平滚动条中的滚动块时,图片会随着滚动条的滚动进度逐渐显露出来,如图59-5所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符“'”,但不能修改其他部分。修改后的工程及窗体文件,均以原名保存在考生文件夹下。
参考解析:
(1)本题主要考查考生对鼠标的MousePointer属性的掌握情况。
MousePointer属性用于设置鼠标经过某对象时光标的形状类型,既可以在属性窗口设置,也可以通过代码设置。MousePointer属性值可以是0~15的任一整数,不同的值代表不同的形状。MousePointer属性值通过代码设置的一般格式为:对象名.MousePointer=n(n为0~15的整数)。
根据题意,将两个标签添加到窗体中,名称分别为Label1和Label2、Caption属性分别为“当前鼠标形状为:”和“1”,并设置MousePointer属性为1。双击Form1进人代码窗口,补充后的具体代码如下:
(2)窗体加载时触发Form_Load事件。滚动条的事件主要有Scroll和Change事件。当在滚动条内拖动滑块时触发Scroll事件(单击滚动箭头或滚动条时不发生Scroll事件),而改变滑块的位置后会触发Change事件。Scroll事件用于跟踪滚动条中的动态变化,Change事件则用来得到滚动条最后的值。加载图片可以在属性窗口的Picture属性中设置,也可以在代码中通过LoadPicture(“图像文件路径”)图片加载函数加人图片。
根据题意,将一个水平滚动条控件和一个图像控件添加到窗体中,水平滚动条的名称为HScroll1、Min属性为400、Max属性为2295,Image的名称为Image1,并在其Pic-ture属性中加载考生文件夹下的“test.bmp”图片。双击HScroll1进入代码窗口,编写如下代码:
10[简答题] 在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Textl中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签Label3中显示。
给出的窗体文件中已经有了全都控件,如图所示。程序不完整,要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
参考解析:
通过文件操作和“&”连接符将文件ins.txt中的文本读出并显示在文本框1钮1中,在C0㈣dl eli&事件过程中,在文本框Text2中输入一个英文字母,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果显示在标签Imbel3中。
【操作步骤】
步骤l:打开本题工程文件。步骤2:分析并编写程序代码。程序提供代码
Privale Sub Fonn_lJ0ad()
Open App.Path&”\in4.瞰”For Input As嚣1
Line Input{I}1.S’Textl.Text=?Close#l
End Sub
Privatd Sub Commandl—Click()
Dim n AsIntegerS=Textl.Text
sl=RTrim(Text2.Text、Do
p=Instr(?)
IfP<>0 Then n=n+1s=Mid(S,P+I)
Loop While P?0
Labels.Caption=?
End Sub
程序结束
参考答案
第1个?处填人:S.第2个?处填入:S,sl
第3个?处填入:<>第4个?处填入:n
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
相关推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |