1[简答题]在名称为Form1,标题为“滚动条属性设置”的窗体上画一个名称为VScroll1的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其位置值为30;窗体刚显示时,滚动块处在中间位置,如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
参考解析:
【解题思路】垂直滚动条的最大刻度值和最小刻度值分别由Max和Min属性设置,垂直滚动条位置值由Value属性设置。
【操作步骤】
步骤1:新建一个窗体,按照题目要求添加一个垂直滚动条控件,并按表4.4在属性窗口中设置相应属性,如图4.4所示。
步骤2:调试并运行程序,关闭程序后按题目要求存盘。
2[单选题] 窗体上有一个名称为Commandl的命令按钮,并有如下程序代码:
运行程序,单击命令按钮,窗体上显示的是
A.133B.134C.233D.234
参考答案:B
参考解析:子函数Subf(ByValx,ByRefy,z)中x值通过值传递,y,z是传引用,子函数执行后b,C值会被加1,而a值维持不变。选B.。
3[简答题]在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮,一个名称为Textl的文本框,两个标签控件,如图所示。
程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容(该文件中含有不超过800个英文单词,单词之问用1个空格隔开)显示在Textl文本框中;
②单击“统计”按钮,则自动统计Textl中所有5字母单词的个数,并显示在右下角的Labell标签中。“读数据”按钮的Click事件过程已经给出,“统计”按钮的Click事件过程不完整,函数GetWords的功能是从字符串s中分离出每个单词,依次放入数组words的数组元素中,返回值为单词的总数目。
要求:请将程序中的注释符去掉,把?改为正确的内容;补全“统计”按钮Click事件过程中的代码,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“统计”,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
参考解析:
【解题思路】从文件中读取一串文本到文本框中,将文本框中的内容划分到数组中,遍历数组中的内容,如果字符串长度等于5,长度为5的单词个数增加1。
【操作步骤】
步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符“´”,将问号改为正确的内容,并在指定位置编写代码。
参考答案(阴影部分是需考生填入的内容)
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
4[单选题] 以下叙述中错误的是( )。
A.续行符与它前面的字符之间至少要有一个空格
B.Visual Basic中使用的续行符为下划线(一)
C.以撇号( )开头的注释语句可以放在续行符的后面
D.Visual Basic可以自动对输入的内容进行语法检查
参考答案:C
参考解析:续行符“一”与前面的内容至少要保留一个空格,并且续行符只能出现在行尾,后面不能有注。故j项C错误。
5[单选题] 设窗体上有一个标签Labell和一个计时器Timerl,Timerl的Interval属性被设置为l000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是( )。
A.Private SUb Timed_Timer( )Labell.Caption=TrueEnd Sub
B.Private Sub Timerl_Timer( )Labell.Caption=Time$End Sub
C.Private Sub Timerl Timer( )labell.Interval=lEnd Sub
D.Private Sub Timed_Timer( )For k=1 To Timerl.IntervalLabell.Caption=TimerNext k End Sub
参考答案:B
参考解析:Timerl的Interval属性值是l000,Enabled属性为True,说明定时器开始工作,每隔1000毫秒(即1秒)触发一次Timer事件,从而执行一次Timer事件过程。要想每秒在标签中显示一次系统时间,则在Timer事件过程中把系统时间赋给标签的Caption属性就能实现。故选B。
相关推荐:
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |