VB语言试卷1及答案.docVIP

《VB语言程序设计》期末试卷A及答案 一、选择题：（20分，每题2分） 1、下面______是不合法的整型常数。　（A）123% （B）123 　（C）O123 （D）%123 2、下列函数中______， 函数返回的值是数值型的。　（A）Intr （B）Mid　（C）Spc （D）Chr 下面______不是类型说明符。　（A） （B） $ 　（C） * （D） @ 对于窗体，下面______属性在程序运行时其属性设置起作用。　（A）MaxButton （B）BorderStyle 　（C）Name 　　 （D）Left 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为______。　 （A）对象 　　（B）容器 　 （C）实体 　　（D）类 若要使标签控件显示时不覆盖其背景内容，要对______属性进行设置。　（A）BackColor （B）BorderStyle 　（C）ForeColor （D）BackStyle用一个程序段对一对象被单击(或双击)作出响应，从而实现指定的操作，称为______。　（A）可视画化程序设计 （B）事件驱动编程机制 　（C）过程化程序实际方法 （D）非过程化程序设计语言 文本框没有______属性。　（A）Enabled （B）Visible 　（C）BackColor （D）Caption不论何控件，共同具有的是______属性。　（A）Text （B）Name 　（C）ForeColor （D）Caption要使Form1窗体的标题栏显示欢迎使用VB，以下______语句是正确的。　（A）Form1.Caption=欢迎使用VB 　（B）Form1.Caption=欢迎使用VB 　（C）Form1.Caption=欢迎使用VB　（D）Form1.Caption=欢迎使用VB 表示x是5的倍数或是9的倍数的逻辑表达式为。产生一个C～L范围内的大写字符表达式为。 取字符变量S中，第5个字符起的6个字符的表达式为。 表示10≤x＜20的关系表达式为。要分配存放12个元素的整型数组，下列数组声明(下界若无，按默认规定)哪些符合要求？(1) n=12 Dim a(1 To n) As Integer 　 (2) Dim a%( )　　n=11 　　ReDim a(n) (3) Dim a%[2,3](4) Dim a(1,1,2) As Integer ? (5)　Dim a!( )　　ReDim a(3,2) As Integer ?程序运行后的结果　　Private Sub Command1_Click()　　　Dim x$, n%　　　n = 20　　　x=　　　Do While n 0　　　　a = n Mod 2　　　　n = n \ 2　　　　x = Chr(48 + a) x　　　Loop　　　Print x　　End SubPrivate Sub Command1_Click() A = 0 For M = 1 To 10 A = A + 1 B = 0 For J = 1 To 10 A = A + 1 B = B + 2 Next J Next M Print A; B End Sub 结果： 五、问答题：（20分，每题5分） 叙述建立一个完整的应用程序的过程。将数字字符串转换成数值，用什么函数？取字符串中的某几个字符，用什么函数？大小写字母间的转换用什么函数？ 答 案 一、选择：D A C B A D B D B A 二、根据条件写出相应的VB表达式。（20分，每题5分） 1、 表示x是5的倍数或是的倍数的逻辑表达式为。 x mod 5 = 0 or x mod 7 =0 2、产生一个C～L范围内的大写字符表达式为。 取字符变量S中，第5个字符起的6个字符的表达式为。Mid (s$, 5 , 6) 4、 表示10≤x＜20的关系表达式为。要分配存放12个元素的整型数组，下列数组声明(下界若无，按默认规定)哪些符合要求？(1) Dim a(1 To n) As Integer n 不能为变量 　 (2) Dim a%( )　　n=11 　　ReDim a(n) (3) Dim a%[2,3] 不能用[ ] (4) Dim a(1,1,2) As Integer 符合要求 ? (5)　Dim a!( )　　程序运行后的结果　　叙述建立一个完整的应用程序的过程。将数字字符串转换成数值，用什么函数？取字符串中的某几个字符，用什么函数