东师范2020年春季 《VB 程序设计（高起专）》离线考核【答案】参考
作业答案 联系QQ:3326650399 微信:cs80188
离线考核
《VB程序设计》
更多答案下载：熊猫奥鹏（www.188open.com）100分
一、填空题（每空2分，共20分。）
1．VB 有 3 种工作形式,即_____________________ 形式、运转形式和中止形式。
2. 下列程序段的履行成果为_____________________ 。
Dimx(3,5)
Fori=1to3
Forj=1to5
x(i,j)=i+j
Nextj
Nexti
Printx(3,4)
3.以下循环的履行次数是_____________________ 。
K=0
Do While K<=10
K=K+1
Loop
4.程序中要求弹出"保留文件"的对话框，假如用通用对话框 dlgSave 来完结，其句子为_____________________ 。
5.在窗体上画一个列表框 List1 和一个文本框 Text1，然后编写如下两个事情过程：
PrivateSubForm_Load()
List1.AddItem "单位"
List1.AddItem "政工部"
List1.AddItem "财政科"
List1.AddItem "学生处"
a=list1.listcount
List1.listindex=1
Text1.Text=List1.list(list1.listindex)
EndSub
程序运转后，a=______________ ，Text1.text=__________________。
6.在过程界说顶用_________________ 关键词，能够完成形参按值传递。
7.VB 工程文件的拓展名为____________ ,规范模块文件的拓展名为___________ ,窗体文件的拓展名为_____________ 。
二、答案来历：熊猫奥鹏（www.188open.com）（更多答案下载：熊猫奥鹏（www.188open.com）2分，共20分。)
12345678910
( )1. 若要制止窗体被移动，则可设置窗体的 Move 特点为 False 来完成。
( )2. 表明 x 是 5 的倍数或是 9 的倍数的逻辑表达式为:xMod5=0ORxMod9=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，则表达式（XMod10)*10+X/10的成果为 82。
( )8. 在 VB 中具有 Print 方法的对象只要窗体对象。
( )9. MsgBox 函数回来的值是数值型。
( )10.Date( )+4 的功用是计算当时系统日期加上 4 天后的日期。
三、编程题(更多答案下载：熊猫奥鹏（www.188open.com）30分，共60分。)
1、在窗体上有一个名为“统计”的按钮（cmdStatic），单击按钮则发生10个小于100(不含100) 的随机正整数并在窗体上逐行打印，并统计其间5的倍数所占份额，然后在窗体上打印出来。写出包括正确过程名的代码。
2、设窗体上有标签Label1和计时器Timer1两个控件，编写相应的事情过程，要求运转程序时，用计时器完成每隔2秒标签中字体的巨细扩大到本来的1.5倍，假如字体巨细超越100，则康复初始巨细，Label1中文字初始字体为宋体，巨细为10，显现文字为“测试文字”。
要求以上一切功用均经过代码完成（包含特点设置），试写出必要的过程代码。
作业答案 联系QQ:3326650399 微信:cs80188
离线考核
《VB程序设计》
更多答案下载：熊猫奥鹏（www.188open.com）100分
一、填空题（每空2分，共20分。）
1．VB 有 3 种工作形式,即_____________________ 形式、运转形式和中止形式。
2. 下列程序段的履行成果为_____________________ 。
Dimx(3,5)
Fori=1to3
Forj=1to5
x(i,j)=i+j
Nextj
Nexti
Printx(3,4)
3.以下循环的履行次数是_____________________ 。
K=0
Do While K<=10
K=K+1
Loop
4.程序中要求弹出"保留文件"的对话框，假如用通用对话框 dlgSave 来完结，其句子为_____________________ 。
5.在窗体上画一个列表框 List1 和一个文本框 Text1，然后编写如下两个事情过程：
PrivateSubForm_Load()
List1.AddItem "单位"
List1.AddItem "政工部"
List1.AddItem "财政科"
List1.AddItem "学生处"
a=list1.listcount
List1.listindex=1
Text1.Text=List1.list(list1.listindex)
EndSub
程序运转后，a=______________ ，Text1.text=__________________。
6.在过程界说顶用_________________ 关键词，能够完成形参按值传递。
7.VB 工程文件的拓展名为____________ ,规范模块文件的拓展名为___________ ,窗体文件的拓展名为_____________ 。
二、答案来历：熊猫奥鹏（www.188open.com）（更多答案下载：熊猫奥鹏（www.188open.com）2分，共20分。)
12345678910
( )1. 若要制止窗体被移动，则可设置窗体的 Move 特点为 False 来完成。
( )2. 表明 x 是 5 的倍数或是 9 的倍数的逻辑表达式为:xMod5=0ORxMod9=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，则表达式（XMod10)*10+X/10的成果为 82。
( )8. 在 VB 中具有 Print 方法的对象只要窗体对象。
( )9. MsgBox 函数回来的值是数值型。
( )10.Date( )+4 的功用是计算当时系统日期加上 4 天后的日期。
三、编程题(更多答案下载：熊猫奥鹏（www.188open.com）30分，共60分。)
1、在窗体上有一个名为“统计”的按钮（cmdStatic），单击按钮则发生10个小于100(不含100) 的随机正整数并在窗体上逐行打印，并统计其间5的倍数所占份额，然后在窗体上打印出来。写出包括正确过程名的代码。
2、设窗体上有标签Label1和计时器Timer1两个控件，编写相应的事情过程，要求运转程序时，用计时器完成每隔2秒标签中字体的巨细扩大到本来的1.5倍，假如字体巨细超越100，则康复初始巨细，Label1中文字初始字体为宋体，巨细为10，显现文字为“测试文字”。
要求以上一切功用均经过代码完成（包含特点设置），试写出必要的过程代码。
作业答案 联系QQ:3326650399 微信:cs80188
