窗体东师2020年春季-《VB-程序设计(高起专)》离线考核---不是原文件

离线文件  时间:2021-03-14  阅读:()

离线考核

《VB程序设计》

答领答案关注V信 weimingjiaxc

满分100分

一、填空题每空2分共20分。 

1 VB有3种工作模式,即__________________模式、运行模式和中断模式。

2.下列程序段的执行结果为__________________。

Dim x(3,5)

For i=1 to 3

For j=1 to 5x(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.若要禁止窗体被移动则可设置窗体的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显示文字为“测试文字”。

要求以上所有功能均通过代码实现包括属性设置试写出必要的过程代码。

答领答案关注V信 weimingjiaxc

LOCVPS全场8折,香港云地/邦联VPS带宽升级不加价

LOCVPS发布了7月份促销信息,全场VPS主机8折优惠码,续费同价,同时香港云地/邦联机房带宽免费升级不加价,原来3M升级至6M,2GB内存套餐优惠后每月44元起。这是成立较久的一家国人VPS服务商,提供美国洛杉矶(MC/C3)、和中国香港(邦联、沙田电信、大埔)、日本(东京、大阪)、新加坡、德国和荷兰等机房VPS主机,基于XEN或者KVM虚拟架构,均选择国内访问线路不错的机房,适合建站和远程办...

搬瓦工VPS:高端线路,助力企业运营,10Gbps美国 cn2 gia,1Gbps香港cn2 gia,10Gbps日本软银

搬瓦工vps(bandwagonhost)现在面向中国大陆有3条顶级线路:美国 cn2 gia,香港 cn2 gia,日本软银(softbank)。详细带宽是:美国cn2 gia、日本软银,都是2.5Gbps~10Gbps带宽,香港 cn2 gia为1Gbps带宽,搬瓦工是目前为止,全球所有提供这三种带宽的VPS(云服务器)商家里面带宽最大的,成本最高的,没有第二家了! 官方网站:https...

virmach:3.23美元用6个月,10G硬盘/VirMach1核6个月Virmach

virmach这是第二波出这种一次性周期的VPS了,只需要缴费1一次即可,用完即抛,也不允许你在后面续费。本次促销的是美国西海岸的圣何塞和美国东海岸的水牛城,周期为6个月,过后VPS会被自动且是强制性取消。需要临时玩玩的,又不想多花钱的用户,可以考虑下!官方网站:https://www.virmach.comTemporary Length Service Specials圣何塞VPS-一次性6个...

离线文件为你推荐
网罗设计计算机网络设计主要干什么12306崩溃12306网站显示异常,什么原因啊access数据库access数据库的组成是什么杰景新特我准备在网上买杰普特711RBES长笛,10700元,这价格合理吗?还有,这是纯银的吗,是国内组装的吗?www.haole012.com阜阳有什么好的正规的招聘网站?www.kanav001.com翻译为日文: 主人,请你收养我一天吧. 带上罗马音标会更好wwwhao.rising.cn瑞星强制篡改主页 HTTP://HAO.RISING.CN 各位有什么办法可以解决吗?dpscycle寻求LR 高输出宏猴山条约猴山条约是怎么回事啊?有知道的吗?m.yushuwu.comhttp www.jiaoyucard.com用户名怎么填
如何查询ip地址 台湾服务器 香港机房托管 sub-process 国内php空间 韩国网名大全 免费智能解析 昆明蜗牛家 支付宝扫码领红包 网购分享 东莞服务器托管 浙江服务器 酸酸乳 免备案cdn加速 碳云 dns是什么意思 国内云主机 dell服务器论坛 好看的空间留言 电脑主机声音很大 更多