奥鹏答案网-奥鹏作业答案-奥鹏在线作业答案-奥鹏离线作业答案-奥鹏毕业论文-专业奥鹏作业答案辅导网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 211|回复: 0

东师范2020年春季 《VB程序设计》离线考核答案参考

[复制链接]

2万

主题

2万

帖子

6万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
64471
发表于 2020-9-8 11:50:13 | 显示全部楼层 |阅读模式
离线考核
《VB程序设计》

100分
一、填空题(每空2分,共20分。)
1.VB 有 3 种工作模式,即_____________________ 模式、运行模式和中断模式。
2. 下列程序段的执行结果为_____________________ 。
Dim  x(3,5)
For  i=1  to  3
For  j=1  to  5
x(i,j)=i+j
Next  j
Next  i
Print  x(3,4)
3.以下循环的执行次数是_____________________ 。
K  =  0
Do    While    K<=10
K=K+1
Loop
4.程序中要求弹出"保存文件"的对话框,如果用通用对话框 dlgSave 来完成,其语句为_____________________ 。
5.在窗体上画一个列表框 List1 和一个文本框 Text1,然后编写如下两个事件过程:
Private  Sub  Form_Load  ()
List1.AddItem    "办公室"
List1.AddItem    "政工部"
List1.AddItem    "财务科"
List1.AddItem    "学生处"
a  =  list1.listcount
List1.listindex=1
Text1.Text=  List1.list(list1.listindex)
End  Sub
程序运行后,a=______________ ,  Text1.text=__________________。
6.在过程定义中用_________________ 关键字,可以实现形参按值传递。
7.VB 工程文件的扩展名为____________ ,标准模块文件的扩展名为___________ ,窗体文件的扩展名为_____________ 。

二、2分,共20分。)
1        2        3        4        5        6        7        8        9        10
                                                                        

(      )1. 若要禁止窗体被移动,则可设置窗体的 Move 属性为 False 来实现。
(      )2. 表示 x 是 5 的倍数或是 9 的倍数的逻辑表达式为:x  Mod  5=0  OR  x  Mod  9=0。
(      )3. 执行  Print  "A123"+123  语句,系统会给出出错提示。
(      )4. 在 Visual Basic 中,Integer 是合法的变量名。
(      )5. 已知 A$="87654321",则表达式 Val(Left$(A$,4)+Mid$(A$,4,2))的值是:876554。
(      )6. Public 可以用来定义变量,但必须出现在通用声明段,而不能出现在过程中。
(      )7. X=28,则表达式(X  Mod  10)*10+X/10  的结果为 82。
(      )8. 在 VB 中具有 Print 方法的对象只有窗体对象。
(      )9. MsgBox 函数返回的值是数值型。
(      )10.Date( )+4 的功能是推算当前系统日期加上 4 天后的日期。
三、编程题(30分,共60分。)
1、在窗体上有一个名为“统计”的按钮(cmdStatic),单击按钮则产生10个小于100(不含100) 的随机正整数并在窗体上逐行打印,并统计其中5的倍数所占比例,然后在窗体上打印出来。写出包含正确过程名的代码。
2、设窗体上有标签Label1和计时器Timer1两个控件,编写相应的事件过程,要求运行程序时,用计时器实现每隔2秒标签中字体的大小放大到原来的1.5倍,如果字体大小超过100,则恢复初始大小,Label1中文字初始字体为宋体,大小为10,显示文字为“测试文字”。
要求以上所有功能均通过代码实现(包括属性设置),试写出必要的过程代码。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 价格公开

  • 优质服务

  • 专属客服

  • 信息开放

  • 担保交易

 
 
客服一号
客服二号
客服三号
客服四号
点击这里给我发消息
官方微信扫一扫
快速回复 返回顶部 返回列表