窗体东师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

A400互联37.8元/季,香港节点cn2,cmi线路云服务器,1核/1G/10M/300G

A400互联怎么样?A400互联是一家成立于2020年的商家,A400互联是云服务器网(yuntue.com)首次发布的云主机商家。本次A400互联给大家带来的是,全新上线的香港节点,cmi+cn2线路,全场香港产品7折优惠,优惠码0711,A400互联,只为给你提供更快,更稳,更实惠的套餐,香港节点上线cn2+cmi线路云服务器,37.8元/季/1H/1G/10M/300G,云上日子,你我共享。...

PacificRack:洛杉矶KVM月付1.5美元起,1G内存套餐年付12美元起

PacificRack在本月发布了几款特价产品,其中最低款支持月付仅1.5美元,基于KVM架构,洛杉矶机房,PR-M系列。PacificRack简称PR,QN机房旗下站点,主要提供低价VPS主机产品,基于KVM架构,数据中心为自营洛杉矶机房,现在只有PR-M一个系列,分为了2个类别:常规(Elastic Compute Service)和多IP产品(Multi IP Server)。下面列出几款秒...

GigsGigsCloud($26/年)KVM-1GB/15G SSD/2TB/洛杉矶机房

GigsGigsCloud新上了洛杉矶机房国际版线路VPS,基于KVM架构,采用SSD硬盘,年付最低26美元起。这是一家成立于2015年的马来西亚主机商,提供VPS主机和独立服务器租用,数据中心包括美国洛杉矶、中国香港、新加坡、马来西亚和日本等。商家VPS主机基于KVM架构,所选均为国内直连或者优化线路,比如洛杉矶机房有CN2 GIA、AS9929或者高防线路等。下面列出这款年付VPS主机配置信息...

离线文件为你推荐
摩拜超15分钟加钱怎么领取摩拜单车免费卷小度商城小度在家智能屏Air性价比高吗?懂行的进~云爆发什么是蒸汽云爆炸?要具备那些条件?安徽汽车网中国汽车十大品牌李子柒年入1.6亿将55g铁片放入硫酸铜溶液中片刻,取出洗净,干燥后,称重为56.6g,问生成铜多少g??求解题步骤及答案www.jjwxc.net有那个网站可以看书?www.99cycy.com谁在这个http://www.sifangmall.com网站上买过东西?www.haole012.com012.qq.com是真的吗8090lu.com8090看看电影网怎么打不开了www.zjs.com.cn中国快递公司排名
shopex虚拟主机 m3型虚拟主机 堪萨斯服务器 bandwagonhost 秒解服务器 表单样式 godaddy 193邮箱 169邮箱 共享主机 什么是服务器托管 metalink 常州联通宽带 in域名 联通网站 万网主机管理 中国域名 杭州电信 重庆联通服务器托管 学生机 更多