VisualBasic程序设计作业题解形成性考核作业二

一、选择题1．按照变量的作用域可将变量划分为（）。

A公有、私有、系统B.全局变量、模块级变量、过程级变量C.动态、常态、静态D . Public、Private 、Protected答案：B2．可获得字符的ASCII 码的函数是（）。

A．Val B ．Fix C ．Asc D．Chr答案：D3.要退出Do-Loop循环，可使用的语句是（）。

A．Exit B ．Exit For C ．End Do D ．Exit Do答案：D4．把数值型转换为字符串型需要使用的函数是（A．Val B ．Str C ．Asc D．Chr答案：B5．关于语句行，下列说法正确的是（）。

A 一行只能写一条语句B •一条语句可以分多行书写C •每行的首字符必须大写D•长度不超过255 个字符答案：b6 ．表达式6 + 10 Mod 4 * 2 + 1 的值是（）。

A．9 B ．11 C ．1 D ．3答案：A7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（）。

A．SIN B．COI C．COS（X）D．X（-1 ）答案：B8 .表达式Abs（-5）+Len（“ABCD”）的值是（）。

A．5ABCDE B．-5ABCDE C．10 D．0答案：C9．在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续。

A —个空格加一个下划线字符（_）B .一个下划线字符（_）C .直接回车D .一个空格加一个连字符（-）答案：A10. Sub 过程与Function 过程最根本的区别是（）。

A. Sub 过程可以使用Call 语句或直接使用过程调用，而Function 过程不可以B . Function过程可以有参数，Sub过程不可以C .两个过程参数的传递方式不同 D . Sub过程的过程名不能返回值，而Function 过程能够通过过程名返回值答案：D11.“x是小于80的非负数”，用VB表达式表示正确的是（）。

A 0<x<80 B. 0<=x<80 C. 0<=x And x<80 D . 0<=x Or x<80答案：C12．在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（）。

A .加号（+）B .减号（-）C .星号（*）D .感叹号（！）答案：B13. 如果要在程序中显示一个弹出式菜单，那么要调用Visual Basic 中提供的方法是（）A. Print B . Move C. Refresh D . PopupMenu答案：D14. 下列可以用来存储图像供其它对象使用的控件是（）。

A. ToolBar B . StatursBar C . ImageList D . TreeView答案：C15. 当单击工具栏上的按钮时，会触发的事件是（）。

A. ButtonClick B . Change C. Load D . KeyPess答案：A16．要利用公共对话框控件来显示"打开文件"对话框，需要调用控件的（）方法。

A ．ShowPrintB ．ShowOpen C．Load D．ShowColor答案：B17．对于窗体级变量，下列说法中错误的是（）。

A .所在窗体的各子程序都可以访问B .其它窗体的子程序不能访问C .所在窗体的各子程序都不能访问用Private定义的窗体级变量D .一定要在所在窗体的通用区内定义答案：C18.从一个字符串中的第3个字符开始，获取5 个字符，应使用（）。

A. Len 函数B . Mid 函数C. Left 数D . Right 函数答案：B19．用下面的语句所定义的数组的元素个数是（）。

Dim A （-3 To 5 ）As Integer A．6 B．7 C．8 D．9答案：D20．有如下程序段：Dim str1 As String * 5 Str1= ”Visual Basic ” 当该程序段执行时，变量str1 的之值是( )A．”Visual ” B ．” Visua ” C．”V” D．”Visual Basic ”答案：B二、填空题1．菜单一般有( ) 和( ) 两种基本类型。

答案：下拉式菜单弹出式菜单2．通用对话框控件可显示的常用对话框有( ) 、( ) 、( ) 、( ) 、( ) 。

答案：打幵(Open) 保存(Save) 颜色(Color ) 字体(Font) 打印(Print )3．组合框具有( ) 和( ) 两种控件的基本功能。

答案：文本框. 列表框4．要使数组的默认下标从“ 1“开始，则应在窗体或标准模块代码的声明部分使用语句( )答案：4．Dim 数组名（ 1 To 上界）5. 调用Sub过程时，使用（）语句，该语句用于把程序控制传送到一个Visual Basic的Sub 过程。

答案：过程名参数1,参数2, ..............6. 若已建立了Forml和Form2两个窗体，默认启动窗体为Forml。

通过（）菜单（）命令的（）选项卡，可将启动窗体设置为Form2o在程序中若要显示Forml窗体，则执行（）语句。

答案：“工程” “工程属性” “工程属性” Form1.Show7. 列表框中项目的序号是从（）幵始的。

°答案：08. Sub过程与Function 过程最根本的区别是（）。

答案：不会用过程名返回一个值9. VB的代码存储在模块中，在VB中提供了三种类型的模块：（）、（）和（）答案：窗体模块标准模块类模块10 .使用Hide方法会隐藏被调用的窗体，但在调用Hide方法之后不会把窗体() ;被调用的窗体中的属性等已处于（）。

答案：移出内存无效的状态2cos er sin m11.将下列函数式子写成Visual Basic 表达式。

（1）二:( )(2 )(3) sin45o :( )0答案：：(1) 2*cos( a )*sin( a )/(2* a ) (2) sqr(s*(s-a)*(s-b)*(s-c)) (3) sin(45/180)12 .将下列各条件与成Visual Basic逻辑表达式。

(1) 1<XV 12：() (2)A+B> C 或a- c< c: （）（3）a和b都为正数或同为负数：（）答案：1) 1<=x and x<12 (2) A+B>=C or a-c<=c (3) a>0 and b>0 or a<0 and b<0 13 .设A=2, B=3, C=4, D=5,表达式Not A<=C Or 4*C=B A2 And B<>A+C 的值为()。

答案：False14 .在Visual Basic 语言中有三种形式的循环结构。

其中若函数的次数可以事先确定，可使条件答案：For …Next Do [{While I Un til}] 条件式…Loop Do- Loop [{While I U ntil}]式15．以下语句的输出结果是（）。

a%=3.14159 Print a%答案：3（因为变量 a 被声明为整型变量——%表示整型变量）三、阅读下列程序，写出程序的运行结果1．Private Sub Form_Click（）Static Sum As IntegerFor I = 1 To 100Sum = Sum + INext IPrint Sum End Sub答案：编程人员只需针对某个事件编写程序代码称为可视化编程。

应用程序是在响应不同的事件时执行不同的代码片段称为事件驱动。

2．Private Sub Form_Click()A = 10: b = 15: c = 20: d = 25Print A; Spc(5); b; Spc(7); cPrint A; Spc(8); b; Space$(5); cPrint c; Spc(3); "+"; Spc(3); d;Print Spc(3); "="; Spc(3); c + d End Sub答案：窗体和控件是创建应用程序所使用的对象，方法是对象的动作，事件是对象的响应，属性可看作对象的性质。

3．Private Sub Form_Click()For i% = 1 To 3For j% = 1 To iPrint LTrim(Str(i%)) + "*" + LTrim(Str(j%)) + "="; i% * j%;Next j%Print Next i%End Sub答案：传统编程方式是结构化程序设计，它从系统的功能入手，按照工程的标准和严格的规范将系统分解为若干功能模块，系统是实现功能模块的函数和过程的集合。

事件驱动编程则是从所处理的数据入手，以数据为中心而不是以服务(功能)为中心来描述系统。

它把编程问题视为一个数据集合，数据相对于功能而言，具有更强的稳定性。

事件驱动编程与传统编程方式相比，最大的区别在于：前者首先关系关心的是所要处理的数据，而后者首先关心的是功能。

4．Private Sub Command1_Click()Dim a, bAs Integer a = 3.4b = 3.4Text1.Text = aText2.Text = bEnd Sub答案：答：事件驱动的工作过程为： 1. 启动应用程序，装载和显示窗体。

2. 窗体或窗体上的控件等待事件的发生。

3. 当某个事件发生后，执行其对应的事件过程代码。

4. 重复执行第 2 和第 3 步，直到遇到End 语句或单击结束按钮停止程序的运行。

5、Private Sub Form_Click()For i = 1 To 5Print Tab(11 - i);For J = 1 To i * 2 - 1Print "*";NextNext iEnd Sub答案：答：事件驱动的工作过程为： 1. 启动应用程序，装载和显示窗体。

2. 窗体或窗体上的控件等待事件的发生。

3. 当某个事件发生后，执行其对应的事件过程代码。

4. 重复执行第 2 和第 3 步，直到遇到End 语句或单击结束按钮停止程序的运行。

四、程序设计题1．购物优惠程序。

某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4） 500元以上者，按七折优惠。