《VisualBasic程序设计教程》自学指导书
《Visual Basic程序设计教程》自学指南 作业及答案: 1，选择题
1。为了使文本框显示滚动条，必须首先设置的属性是()
a . autosize b . alignment c . multiline d . scroll bar 2。若要更改控件在窗体中的上下位置，应该修改控件的()属性。A.topb.left c. width d. height 3。当form1表单启动时，为了使form1.text1文本框首先获得焦点，可以在表单的form1_Load事件期间添加()语句
a . text 1 . index = 0b . text 1 . tabindex = 0c . text 1 . appearance d . text 1 . tag = 0.4。将命令按钮命令1设置为不可见，并修改命令按钮的()属性A.可见b .值c .标题d. enabled
5。摇动以更改标签控件中文本的颜色，可以设置标签控件的()属性。A.font color b . fill color c . fore color d . back color 6。执行后将删除文本1中选定文本的语句是()a . text 1 . text = “ b . text 1 . sel text = “ c . text 1 . clear = d . text 1 . sel text . clear = 7。下列控件没有标题属性() a。标签框b .文本框c .框架d .命令按钮8。复选框对象是否被选中由其()属性决定a .选中b .值c.enabled.selected
9。要使列表框单击或按空格键进行检查，属性MultSelect的值应设置为()a.1b.2c.3
10。以下控件不允许用户在程序运行时输入文本
a。文本框b .下拉组合框c .简单组合框d .下拉列表框11。不能通过
()删除列表框中的选择
a .列表属性B .移除项方法C .清除方法D .文本属性
12.3组合框的不同样式:下拉组合框、简单组合框和下拉列表框由()属性确定a . style b . boder style c . fill style d . draw style
13。单击滚动条两端的滚动箭头将触发滚动条的()事件A.滚动b .向下键c .更改d . drago over
14。要增加计时器控件的宽度设置，以下语句是正确的()A.设置定时器的宽度属性。设置定时器的左属性
c。设置计时器的高度属性。无法设置计时器15的宽度。设计动画时，时钟控制()通常用于控制动画速度可以使用SetFocus方法的控件是() a . frame b . label c . formd . timer 17 .不能响应Click事件的控件是() a . listbox b . picture box c . formd . timer
18 .计时器的interval属性以()为单位指定计时器事件之间的间隔A.分钟b .秒c .毫秒d .微秒ii，问题ii，填写问题 1。功能程序用于完成特定功能和_ _ _ 1
2。子流程是_ _的函数也经常被称为子过程在事件过程或其他子过程中，过程可以称为_ _ _ _。
3。在事件过程或其他过程中，函数过程可以称为_ _ _ _。4.函数过程_ _ _ _ _返回值
5。VB代码存储在模块中VB中提供了三种类型的模块:_ _ _ _、_ _ _
和_ _ _6.菜单控制只包括一个事件_ _，当鼠标点击或键盘选择后按下“回车”键时触发。除了分隔条之外，所有菜单控件都可以识别该事件。 7。使用菜单编辑器创建弹出菜单时，_ _ _ _ _ _，不可见，可见属性设置为False8.8之间最根本的区别。子流程和功能流程是_ _ _ 9。一般程序可以通过执行工具菜单中的_ _ _ _ _命令来建立 10。当用公共常量语句声明一个全局符号常量时，该语句应该放在_ _ _三、问题
1。什么是多语言界面？(计量吸入器)2。什么是文件？ 3。文件管理系统的功能是什么？4.文件系统有什么控制？
5。当磁盘驱动器列表改变时，如何通知目录列表？6.目录列表更改后如何通知文件列表？7.文件根据其数据存储方式分为几种类型。8.如何打开序列文件？9.如何关闭序列文件？ 10。如何读写数据到磁盘？11.讨论PathName属性
12。顺序文件、随机文件和二进制文件的特点和用途是什么？13.什么是工程？14.什么是过程？
15。选择一个表单，启动菜单编辑器的三种方法是什么？16.什么是动态菜单？
17。众所周知，弹出菜单的名称是aa。填写弹出菜单的代码 18。现在使用菜单编辑器来设计弹出菜单。菜单第一项(制作顶层菜单项)的标题为“弹出菜单”，名称为:“aa”，不选择“可见”，并填写弹出菜单代码4.编程问题
1。写一个程序来计算1+2+3+4+…+100
2。中国现有人口12亿，年增长率为1%。写一个程序来计算多少年后它会增加到16亿3.给定三角形三条边的长度，计算三角形的面积编写程序时，首先判断给定的三条边是否可以形成三角形，如果可以，计算并输出三角形的面积，否则需要重新输入当输入-1时结束程序 4。税务部门征收所得税的方式如下:(1)XXXX的年收入增长率为1%。写一个程序来计算多少年后它会增加到16亿答:程序如下:
私有子窗体_ click () dimp为双dimr为单dimn为整数p = 1 xxxx年后，全国人口为:“；P End Sub
运行程序，点击表格，输出是:29年后，全国人口为1601404641 3。给定三角形三条边的长度，计算三角形的面积编写程序时，首先判断给定的三条边是否可以形成三角形，如果可以，计算并输出三角形的面积，否则需要重新输入当输入-1时结束程序
解决方案:几何显示三角形的两条边之和大于第三条边因此，如果输入三角形的三条边的两条边之和小于或等于另一边的长度，就不能形成三角形。在这种情况下，会给出适当的信息并要求重新输入。如果可以形成三角形，则输出三角形的面积程序如下: 私有子窗体_ click()马頔，b，c，s，T作为单个开始: a = inputbox(“请输入边长”)a = val (a) ifa =-1然后结束
b = inputbox(“请输入边长”)b = val (b)
c = inputbox(“请输入边长c”)c = val请重新输入“如果 s =(a+b+c)/2
t = SPR(s *(s-a)*(s-b)*(s-c))打印，则转到起始端”三角形区域:；在T End Sub
程序运行后，点击表格显示三个输入对话框，一个接一个。在三个对话框中，分别输入三角形的三个边长。程序首先判断输入边长是否能形成三角形，然后确定后续操作。信息框用于显示信息 6
或输出三角形的面积当输入1、2和3时，将显示一个信息框，要求重新输入；如果输入8，7，6，输出结果是:三角形面积为20.33316 4。税务机关征收所得税如下:(1)200元以内的收入免征；
(2)收入在200~400元之间，超过200元的按3%征税；(三)收入超过400元的，税率为4%；
(4)当收入达到5000元或以上时，4%的税率将改为5%编程实现上述操作答:程序如下:
私有子窗体_ click () r = inputbox(“请输入您的收入”)r = val (r) 如果r elseif r > 200且r elseif r > 400且r 程序运行后，点击表格并在输入对话框中输入收入金额。该程序将输出税额。5.编程，打印如下所示的“数字金字塔”:1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1。。。
1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1回答:程序如下: 私有子窗体_ click()用于I = 1至9 用于j = 1至30-3 * I打印\\下一个j 用于k = 1至I打印k；下一个k
对于k = I—1到1步骤—1打印k； 7
下一个k打印下一个I结束子
6。从键盘输入两个正整数m和n，找出最大的公共因子答:程序如下: 私有子窗体_ click () dimm。Nasinteger
m = inputbox(“请输入m的值”)m = val (m) m1 = m n = inputbox(“请输入n的值”)n = val(n)n1 = n Do While n 0提醒= m Mod n m = n n =提醒循环
打印m1；和的最大公因数是:\\结束子
。这个程序通过轮换除法找到两个正整数的最大公因数。程序运行后，在输入对话框中分别输入96和64，输出结果为:96和64的最大公因数为:32
7。从键盘输入学生的学号和考试结果，然后输出学生的学号和结果。并且根据结果，按照以下规定，学生的评语将被输出:
分数80~100 60~79 50~59 40~49 0~39评语私有子窗体_ click () n = inputbox(“请输入学生编号”)s = inputbox(“请输入分数”)如果s > = 50则
msgbox \\学生编号\\分数\\ MsgBox \\学生编号\\分数\\ ElseIf s >= 50
《VisualBasic程序设计教程》自学指导书
