VB二级笔试模拟试题200809
全国计算机二级《VB》练习题及答案
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行,目前处于紧张的备考阶段,以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案,供参考练习,预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后,VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中,VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中,要将一个窗体装载到内存进行变量初始化等预处理,但没有显示该窗体,应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段:a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后,单击命令按钮,在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
计算机二级VB考试题及答案
计算机二级VB考试题及答案为了使广大考生在备战计算机等级考试时,更快的掌握相应知识点,下面是搜索的计算机二级VB考试题及答案,供参考练习,预祝考生们考出自己理想的成绩!1.在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程:Private Sub Command1_Click( )n = Val(Text1.Text)If n2 = n/2 Thenf = f1(n)Elsef = f2(n)End IfPrint f; nEnd SubPublic Function f1(ByRef x)x=x*xf1=x+xEnd FunctionPublic Function f2(ByVal x)x=x*xf2=x+x+xEnd Function程序运行后,在文本框中输入3,然后单击命令按钮,窗体上显示的是(D)(单)A.72 36B.108 36C.72 6D.27 32.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )c = "1234"For i = 1 To 4c1 = Trim(Str( ))Print c1Next iEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容 121231234则在下划线处应填入的内容为(B)(单)A.Right(c1,i)B.Left(c1,i)C.Mid(c1,i,1)D.Mid(c1,i,i)3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:Private Sub Command1_Click( )n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j >Sqr(i) Then Print iNext iEnd Sub该事件过程的功能是(C)(单)A.输出n以内的奇数B.输出n以内的偶数C.输出n以内的素数D.输出n以内能被j整除的数4.在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1_Click( )Dim i As Integers = 0For i = 1 To 5s = s + f(i)NextPrint sEnd Sub程序运行后,单击命令按钮,在窗体上显示的是(C)(单)A.11B.10C.9D.85.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是(D)(单)A.15B.14C.13D.126.Visual Basic应用程序中标准模块文件的扩展名是【BAS 或.BAS】(注意不要写点)。
计算机等级考试二级VB笔试模拟试卷1(含答案)
计算机等级考试二级VB笔试试卷(含参考答案)一、选择题((1)—(20)每小题2分,(21)—(30)每小题3分,共70分)(1) 设窗体上有一个文本框,名称为text1,程序运行后,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是:A)text1.maxlength=0 B)text1.enabled=flaseC)text1.visible=flase D)text1.width=0(2) 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是A) ="VisualBasic窗体"B) Form1.Title="VisualBasic窗体"C) Form1.Caption="VisualBasic窗体"D) Form1.Text="VisualBasic窗体”(3) 在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min 和Max属性分别为0和100。
程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示:以下能实现上述操作的程序段是A) Private Sub HScroll_Change()Text1.Text=HScroll1.ValueEnd SubB) Private Sub HScroll_Click()Text1.Text=HScroll1.ValueEnd SubC) Private Sub HScroll_Change()Text1.Text=HScroll.CaptionD) Private Sub HScroll_Click()Text1.Text=HScroll.CaptionEnd Sub(4) 设菜单中有一个菜单项为"Open"。
若要为该菜单命令设计访问键,即按下Alt及字母O 时,能够执行"Open"命令,则在菜单编辑器中设置“Open"命令的方式是A) 把Caption属性设置为&OpenB) 把Caption属性设置为O&penC) 把Name属性设置为&OpenD) 把Name属性设置为O&pen(5) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=InputBox("Input")Select Case xCase 1,3Print "分支 1"Case Is >4Print "分支 2"Case ElsePrint "Else 分支 "End SelectEnd Sub程序运行后,如果在输入对话框中输入2,则窗体上显示的是A)分支1 B)分支2 C) Else分支 D) 程序出错(6) 以下关于MsgBox的叙述中,错误的是A) MsgBox函数返回一个整数B) 通过MsgBox函数可以设置信息框中图标和按钮的类型C) MsgBox语句没有返回值D) MsgBox函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数量(7)在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是A)Timer1.InterVal=0.5 B) Timer1.Interval=5C) Timer.Interval=50 D) Timer1.Interval=500(8) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2NextPrint x,yEnd Sub程序运行后,连续三次单击Command1按钮后,窗体上显示的是A) 4 2 B) 12 18 C) 12 30 D) 4 6(9) 以下关于多重窗体程序的叙述中,错误的是A)用Hide方法不但可以隐藏窗体,而且能清除内存中的窗体B)在多重窗体程序中,各窗体的菜单是彼此独立的C)在多重窗体程序中,可以根据需要指定启动窗体D)对于多重窗体程序中,而且单独保存每个窗体(10)以下关于文件的叙述中,错误的是A)顺序文件中的记录一个接一个地顺序存放B)随机文件中记录的长度是随机的C)执行打开文件的命令后,自动生成一个文件指针D)LOF函数返回给文件分配的字节数(11) 以下叙述中错误的是A)事件过程是响应特定事件的一段程序B)不同的对象可以具有相同名称的方法C)对象的方法是执行指定操作的过程D)对象事件的名称可以由编程者指定(12) 以下合法的Visual Basic标识符是A) ForLoop B) Const C) 9abc D) a#x(13) 当一个复选框被选中时,它的Value属性的值是A) 3 B) 2 C) 1 D) 0(14) 表达式 5 Mod 3+3\5*2的值是A) 0 B) 2 C)4 D) 6(15) 设x=4,y=8,z=7,以下表达式的值是x<y And (Not y>z) Or z<xA) 1 B) -1 C) True D) False(16) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a$="VisualBasic"Print String(3,a$)End Sub程序运行后,单击命令按钮,在窗体上显示的内容是A) VVV B) Vis C) sic D) 11(17) 设有如下程序段:x=2For i=1 To 10 Step 2Next运行以上程序后,x的值是A) 26 B) 27 C) 38 D) 57(18) 以下叙述中错误的是A) 在KeyPress事件过程中不能识别键盘的按下与释放B) 在KeyPress事件过程中不能识别回车键C) 在KeyDown和KeyUp事件过程中,将键盘输入的"A"和"a"视作相同的字母D) 在KeyDown和KeyUp事件过程中,从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符资料来源:东方教育网全国计算机等级考试频道 (19) 执行如下两条语句,窗体上显示的是a=9.8596Print Format(a,"$00,00.00")A) 0,009.86 B) $9.86 C) 9.86 D) $0,009.86(20)在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。
2008年二级VB模拟试题及答案
(19) 在Visual Basic中,要使标签的标题栏居中显示, 则将其Alignment属性设置为 A) 0 B) 2 C) 1 D) 3
解析:本题考查的是标签的Alignment属性的设置。 Alignment属性用来设置标签中标题的位置,可将其
设置为0,1,2,作用如下: 0:标题靠左显示(默认)。 1:标题靠右显示。 2:标题居中显示。
燕子老师 2008.9
(28) 下列程序段的执行结果为
a=75 If a > 60 Then I=1 If a > 70 Then I=2 If a > 80 Then I=3 If a < 90 Then I=4 Print "I="; I A) I=1 B) I=2 C) I=3
D) I=4
解析:此题为If Then 结构的条件语句,如果a > 60 , 则I = 1;如果a > 70 ,则I = 2;如果a > 80 ,则 I = 3;如果 a < 90,则I = 4;本题的条件是a= 75,所以输出结果应该是I = 4。
燕子老师 2008.9
(21) 当滚动条位于最左端或最上端时,Value属性被设
置为
A) Min
B) Max
C) Max和Min之间 D) Max和Min之外
解析:一般情况下,垂直滚动条的值由上往下递增, 最上端代表最小值,最下端代表最大值;水平滚动 条的值从左到右递增,最左端代表最小值,最右端 代表最大值。因此当滚动条位于最左端或最下端时, Value属性被设置为Min。
燕子老师 2008.9
(16) 根据变量的作用域,可以将变量分为3类,分别为 A) 局部变量、模块变量和全局变量 B) 局部变量、模块变量和标准变量 C) 局部变量、模块变量和窗体变量 D) 局部变量、标准变量和全局变量
全国计算机等级考试二级VB笔试试题及参考答案
全国计算机等级考试二级VB笔试试题(1)一、单项选择题(每小题2分,共70分)1. 设在菜单编辑器中定义了一个菜单项,名为menu1。
为了在运行时显示该菜单项,应使用的语句是( )。
A.menu1.Enabled=TrueB.menu1.Enabled=FalseC.menu1.Visible=TrueD.menu1.Visible=False 【答案】: C【解析】:显示是将属性Visual设置为True2. 以下合法的Visual Basic标识符是( )。
A.DoWhileB.DoC.56dD.A#BC【答案】:A【解析】:DoWhile是两个关键字拼接,从而变成非关键字,直接选择A。
B是关键字,丽C 以数字开头,D中间夹带字符“#”,均属于不允许之列。
3. 数据结构作为计算机的一门学科,主要研究数据的逻辑结构、对各种数据结构进行的运算,以及( )。
A.数据的存储结构B.计算方法C.数据映象D.逻辑存储【答案】:A4. 以下语句正确的是( )。
monDialog.Filter=All Files i*.*IPictures(*.bmp)|*.bmpmonDialog.Fliter="AllFileS"|"*.*"|"Pictures(*.bnlp)|"*.bmp"monDialog.Filter=="AllFiles|*.*|Pictures(*.bmp)|*.bmp"monDialog.Filter={ All Files |*.*| Pictures(*.bmp)|*.bmp}【答案】:C【解析】:这是概念题,答案为C。
可以这样解题:Filter属性要求的是字符串,所以只能从B和C中选择。
不会使用像B那样的混乱方式,由此可以判定应该选择C。
5. 下述关于数据库系统的叙述中正确的是( )。
A.数据库系统中数据的一致性是指数据类型一致B.数据库系统比文件系统能管理更多的数据C.数据库系统减少了数据冗余D.数据库系统避免了一切冗余【答案】:C【解析】:C和D两者的描述对象一样,结果必然在这两者之中。
2020年二级VB模拟试题及答案
(19) 在Visual Basic中,要使标签的标题栏居中显示, 则将其Alignment属性设置为 A) 0 B) 2 C) 1 D) 3
燕子老师 2008.9
(12) 下列可以启动Visual Basic的方法是 A) 打开"我的电脑",找到存放Visual Basic所在系统文件
的硬盘及文件夹,双击"VB6.exe"图标 B) 在DOS窗口中,键入Visual Basic的路径,执行Visual
Basic可执行文件 C) 利用"开始"菜单中的"程序"命令可启动Visual Basic D) A) 和C)
燕子老师 2008.9
(14) 在运行程序时,在文本框中输入新的内容,或在 程序代码中改变Text的属性值,相应会触发到什么 事件?
A) GotFocus B) Click C) Change D) DblClick
解析:在本题的四个选项中,GotFocus是设置焦点 事件,所以选项A)不合题意;Click是单击事件, 不合题意;DblClick是双击事件,也不合题意; Change是改变文本框内容事件,只要文本框中的 内容改变就会触发,故选项C)是本题的答案。
.vbp是Visual Basic Project的缩写,表示工程文件。 .frm是Form的缩写,表示窗体文件。 .frx是窗体的二进制数据文件。 .cls是class的缩写,表示类模块文件。 .bas是Basic的缩写,表示标准模块文件。 .ocx表示ActiveX控件的文件。 .res是resource的缩写,表示资源文件。
燕子老师 2008.9
(15) 如果一个变量未经定义就直接使用,则该变量的 类型为
计算机等级考试二级VB全真模拟试题考试
计算机等级考试二级VB全真模拟试题考试大全一、选择题:35题,2分/题,共70分下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。
1.当运行程序时,系统自动执行启动窗体的某个事件过程。
这个事件过程是()A)Load B)Click C)Unload D)GotFocus2.无论何控件,都具有一个共同属性。
这个属性是()A)Text B)Font C)Name D)Caption3.在一行内写多条语句时,语句之间要用某个符号分隔。
这个符号是()A), B); C)、 D):4.表达式3∧2*2+3 MOD 10\4的值是()A)18 B)1 C)19 D)05.下面的变量名合法的是()A)k_name B)k ame C)name D)k-name6.设有如下变量声明Dim time1 As Date,为变量time1正确赋值的表达式是()A)time1 = #11:34:04 # B)time1 = Format(Time,"yy:mm:dd")C)time1 = #"11:34:04"# D)time1 = Format("hh:mm:ss",Time)7.表达式12000 + "129" & 200的值是()A)12329 B)"12129200" C)"12000129200" D)"12329"8.若设a = 4,b = 5,则下列表达式值为真的是()A)(True+a)>0 And b>10 B)a>b Or b>10-aC)(False-b< 0) Eqv (a>b) D)a>b Xor b+3>59.当窗体上的文字或图形被覆盖或最小化后能恢复原貌,需要设置窗体的属性是()A)Appearance B)Visible C)Enable D)Autoredraw10.在窗体上画一个名称为Command1的命令按钮,编写以列程序:Private Sub Command1_Click( )Dim a As IntegerStatic b As Integera = a + bb = b + 4Print a,bEnd Sub程序运行后,单击该命令按钮三次,屏幕上显示的值是()A)4 12 B)0 4 C)4 8 D)8 1211.Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是()A)属性、控件和方法 B)属性、事件和方法C)窗体、控件和过程 D)控件、过程和模块12.下列程序段错误的是()A)Dim a As Integera = array(1,2,3,4)B)Dim a(),b()a = array(1,2,3,4):b = aC)Dim a As Varianta = array(1,"asd",true)D)Dim a() As Varianta = array(1,2,3,4)13.表达式String(1,"I am student") + Replace("am harass","rass","ppy") & "!"的值是()A)"I am happy!" B)"I am student I am s am harass studentam happy!"C)"I am student am harass!" D)"I am student am happy!"14.下列程序段中,能正常结束循环的是()A)I = 1DoI = I + 2Loop Until I = 10B)I = 5DoI = I + 1Loop Until I < 0C)I = 10DoI = I + 1Loop Until I > 0D)I = 6DoI = I - 2Loop Until I = 1 [Page]15.引用列表框(List1)最后一个数据项应使用的表达式是()A)List1.List(List1.ListCount) B)List1.List(List1.ListCount-1)C)List1.List(ListCount) D)List1.List(ListCount-1)16.有如下程序:Option Base 1Private Sub Command1_Click()Dim x,y(3,3)x = Array(1,2,3,4,5,6,7,8,9)For i = 1 To 3For j = 1 To 3y(i,j) = x(i*j)If(j > = i) Then Print y(i,j);Next jPrintNext iEnd Sub运行时输入出的结果是()A)1 2 32 4 64 6 8B)1 2 32 4 63 6 9C)12 43 6 9D)1 2 34 6917.在窗体上画一个名称为Command1的命令按钮,编写如下程序:Private Sub Command1_Click()Print pl(3,7)End SubPublic Function pl(x As Single,n As Integer) As SingleIf n=0 Thenpl=1ElseIf n Mod 2=1 Thenpl=x*x+nElseP1=x*x-nEnd IfEnd IfEnd Function程序运行后,单击该命令按钮,屏幕上显示的结果是()A)2 B)1 C)0 D)1618.以下属性和方法中,可重定义坐标系的是()A)DrawStyle属性 B)DrawWidth属性 C)Scale方法 D)ScaleMode属性19.在窗体上画一个文本框,然后编写如下事件过程:Private Sub Form_Load()Text1.Text = ""Text1.SetFocusFor i = 1 To 5Sum = Sum +iNext iText1.text = SumEnd Sub上述程序的运行结果是()A)在文本框中输出15 B)在文本框中输出0C)在文本框中输出不定值 D)出错 [Page]20.已知x代表某个百分制成绩,下列程序段用于显示对应的五级制成绩,正确的是()A)If x > = 60 ThenPrint "及格"ElseIf x > = 70 ThenPrint "中"ElseIf x > = 80 ThenPrint "良"ElseIf x > = 90 ThenPrint "优"ElsePrint "不及格"End IfB)If x < 90 ThenPrint "良"ElseIf x < 80 ThenPrint "中"ElseIf x < 70 ThenPrint "及格"ElseIf x < 60 ThenPrint "不及格"ElsePrint "优"End IfC)If x > = 90 ThenPrint "优"ElseIf x > = 80 ThenPrint "良"ElseIf x > = 70 ThenPrint "中"ElseIf x > = 60 ThenPrint "及格"ElsePrint "不及格"End IfD)Select Case xCase x > = 90Print "优"Case x > = 80Print "良"Case x > = 70Print "中"Case x > = 60Print "及格"Case ElsePrint "不及格"End Select21.下面说法不正确的是( )A)滚动条的重要事件是Change和ScrollB)框架的主要作用是将控件进行分组,以完成各自相对独立的功能C)组合框是组合了文本框和列表框的特性而形成的一种控件D)计时器控件可以通过对Visible属性的设置,在程序运行期间显示在窗体上22.在窗体上画一个名称为Check1复选框,在程序运行的过程中,若选中复选框,则Check1.value的值是()A)True B)2 C)0 D)123.在下列关于菜单的说法中,错误的是()A)每一个菜单项都是一个控件,与其他控件一样都有自己的属性和事件B)除了Click事件之外,菜单项还能响应其他的如 DblClick等事件过程C)菜单项的快捷键不可以任意设置D)在程序执行时,如果菜单项的Enabled属性为False,则该菜单项变成灰色,不能被用户选择[Page]27.下列关于过程叙述不正确的是()A)过程的传值调用是将实参的具体值传值递给形参B)过程的传址调用是将实参在内存的地址传递给形参C)过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的D)无论过程传值调用还是过程传址调用,参数传递都是双向的28.执行了下面程序后,组合框中数据项的值是()Private Sub Form_Click()For i=1 to 6Combo1.AddItem iNext iFor i= 1 to 3Combo1.RemoveItem iNext iEnd SubA)1 5 6 B)1 3 5 C)4 5 6 D)2 4 629.若在Shape 控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条颜色由FillColor属性指定,非线条的区域由Back Color属性填充,则应()A)将Shape控件的FillSte属性设置为2至7间的某个值,BackStyle属性设置为1B)将 Shape控件的FillSte属性设置为0或1,BackStyle属性设置为1C)将Shape控件的FillSte属性设置为2至7间的某个值,BackStyle属性设置为0D)将Shape控件的FillSte属性设置为0或1,BackStyle属性设置为030.下列程序的执行结果是()Private Sub Form_Activate()Dim score(3) As Integer, total As IntegerDim aa_score As Variantscore(1)=50: score(2) =14:score(3)=36tota=0: i=0For Each aa_score In scorei=i+1total=tota + aa+_scorePrint i,aa_score,totalNextEnd SubA)1 0 02 50 503 14 644 36 100B)1 50 502 14 643 36 100C)0 50 501 14 642 36 100D)0 0 01 50 502 14 643 36 10031.在Activate 事件过程中,写入下面的程序:Option Base 1Private Sub Form_Activate()Dim t As IntegerDim a( ) As Varianta=Array (2,4,6,8,10,1,3,5,7,9)For i=1 to 10\2t= a(i)a(i)=a(10 - i + 1)a(10 - i + 1)=tNext iFor j= 1 to 10Print a(j);Next jEnd Sub运行程序后,显示的结果是()A)2 4 6 8 10 1 3 5 7 9 B)1 3 5 7 9 2 4 6 8 10C)9 7 5 3 1 10 8 6 4 2 D)10 8 6 4 2 9 7 5 3 132.在Activate 事件过程中,写入下面的程序:Private Sub Form _Activate()Dim S As String, a As String, b As Stringa= "*" : b =" $"For i= 1 to 4If i / 2= Int(i / 2) ThenS=String(Len (a)+i , b)ElseS=String(Len(a) + i, a)End IfPrint S;Next iEnd Sub运行程序后,显示结果是()A)$$ ***$$$$***** B)*$$**$$***$$$****$$$$C)**$$$****$$$$$ D)$*$$**$$$***$$$$****33.在窗体上设置相应的控件,并在代码窗口编写下列程序:Printe Sub Form_Click()Dim a As Long ,b As Longa=InputBox("请输入若干个整数")Call P(a,b)Print bEnd SubPrivate Sub P(x As Long, y As Long)Dim n As Integer, j As String*1, s As Stringk=Len(Trim(Str(x)))s=""For i= K To 1 Step -1j=Mid(x,i,1)s=s+jNext iy=Val(s)End Sub运行程序,在InputBox框中输入123456,然后单击"确定"按钮,则输出结果是()A)123456 B)654321 C)135246 D)24613534.设定文本框内的文字内容是否允许修改的属性是()A)Text B)Locked C)PasswordChar D)Multiline35.要建立一个学生成绩的随机文件,如下定义了学生的记录类型,由学号、姓名、三门课程成绩(百分制)组成,下列程序段正确的是()A)Type studlno As Integername AS Stringscore(1 to 3) As SingleEnd TypeB)Type studlno As Integername As String *10score() As SingleEnd TypeC)Type studlno As Integername As String *10score(1 to 3) As StngleEnd TypeD)Type studlno As Integername As Stringscore(1 to 3) As StringEnd Type [Page]二、填空:每空2分,共30分。
二级VB笔试试卷集(10套)
二级(VB)笔试试卷1一、选择题(每题1分,共30分)1.根据ISO定义,下列有关“信息”与“数据”的描述正确的是。
A.数据是指对人们有用的信息B.信息包括数据C.信息是指对人们有用的数据D.信息仅指加工后的数值数据2.十进制3×512+7×64+4×8+5的运算结果用二进制数表示为。
A.10111100101 B.11111100101C.111101001010 D.1111110111013.中文Windows95/98能支持GBK编码标准,GBK所采用的汉字字符集包含个汉字。
A.6000多B.20000多C.60000多D.3000多4.组成“教授”(拼音为JIAO SHOU)、“副教授”(拼音为FUJIAO SHOU)、“讲师”(拼音为JIANG SHI)这三个词组的汉字均属于GB2312-80字符集中的一级汉字,则按机内码这三个词组从小到大排序有结果为。
A.教授、副教授、讲师B.副教授、教授、讲师C.讲师、副教授、教授D.副教授、讲师、教授5.不同的计算机其指令系统通常有所不同,这主要取决于。
A.所用的操作系统B.系统的总线结构C.所用的CPU D.所用的程序设计语言6.用高级语言编写程序时,子程序调用语句中的实在参数必须与子程序说明中的形式参数在上保持一致。
A.个数、类型、顺序B.个数、类型、名称C.个数、顺序、名称D.个数、格式、顺序7.下面是数据库系统中有关的一些说法,其中不正确的是。
A.数据的完整性是指数据的正确性和一致性B.数据的安全性是指保护数据,防止非法使用C.数据的冗余度是指相同数据重复出现D.数据的独立性是指不同应用程序使用的数据彼此无关8.为了使计算机能有效地加工、处理、传输感觉媒体而在计算机内部采用的二进制编码表示形式称为。
A.存储媒体B.表现媒体C.传输媒体D.表示媒体9.因特网(Internet网)由这三级组成。
A.主干网、地区网和校园网B.广域网、局域网和校园网C.国际网、中家网和校园网D.中际网、地区网和校园网10.在Windows95/98中,不是合法的文件名形式。
国家二级VB机试(上机操作)模拟试卷209(题后含答案及解析)
国家二级VB机试(上机操作)模拟试卷209(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画两个名称分别为Frame1、Frame2的框架,标题分“修饰”;存Frame1中画两个甲选按钮,名称分别为Option1、Option2,别为“字号”、标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边;在Frame2中画一个名称为Check1的复选框,标题为“下划线”。
运行后的窗体如图2-120所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sitl.vbp,窗体文件名为sjt1.frm。
(2)在名称为Forml的窗体上从上到下面两个义本框,名称分别为Textl、Text2;再画一个命令按钮,名称为Commandl,标题为“选中字符数是”。
程序运行时,在Text1中输入若干字符,选中部分内容后,单击“选中字符数是”按钮,则在1’ext2中显示选中的字符个数(如图2.121所示)。
请编写按钮的Click事件过程。
要求:程序中不得使用变量,事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
正确答案:第1小题【操作步骤】步骤1:新建一个“标准EXE”工程,如表3.66在窗体中画出控件并设置其相关属性。
步骤2:按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1:新建一个“标准EXE”工程,如表3.67所列在窗体Forml中画出控件并设置它们的属性。
步骤2:打开代码编辑窗口,编写以下事件过程:参考代码:PriVate Sub Commandl一Click( ) Text2.Text=Forml.Text1.SelLength End Sub 步骤3:按要求将文件保存争考生文件夹中。
2008年VB省二级笔试试题及答案-百度文库
本文由月下独酌wd贡献doc文档安徽省 2008 年 VB 省二级笔试试题及答案一、单项选择题(每题 1 分,共 40 分)编写的源程序。
C)C 语言 D)FORTRAN 语言。
1.计算机能直接执行由 A)机器语言<br /> B)汇编语言<br />2.在计算机内存中,每个存储单元都有一个唯一的编号,该编号被成为 A)标号 B)记录号。
C)(135)8 D)(140)8 。
C)容量 D)地址<br />3.将十进制数 93 转换成八进制数为 A)(107)8 B)(127)8<br />4.Cache(高速缓存)能提高计算机的运行速度,主要原因是 A)它扩展了内存的容量 C)它扩展了外存的容量5.下面关于控制面板的描述中,错误的是<br />B)它缩短了 CPU 的存取时间 D)它提高了计算机的主频。
<br />A)控制面板可以管理硬件,但不可以管理软件 B)控制面板可以添加、删除程序 C)控制面板可以添加、删除硬件 D)控制面板可以更改系统的时间和日期 6. 是多媒体计算机系统必备的设备。
A)网卡 B)扫描仪。
C)交叉型中输入网址。
C)任务栏 D)状态栏 D)总线型 C)声卡 D)打印机<br />7.下列属于网络拓扑结构的是 A)动态型 B)静态型<br />8.若要浏览某个网页,则需要在浏览器的 A)地址栏 9.使用杀毒软件可以 B)标题栏。
<br />A)查出任何已感染的病毒 C)清除部分病毒 10.计算机操作系统的主要功能是 A)进行网络连接 C)实现数据共享。
<br />B)查出并清除任何病毒 D)清楚已感染的任何病毒<br />B)管理计算机资源,方便用户使用 D)把高级语言的源程序代码转换为目标代码菜单中操作使<br />11.在 Visual Basic 集成开发环境中,如果工具箱关闭,可在它可见。
2009年9月计算机等级考试二级VB真题及参考答案(标准)
(26)窗体上有1个名称为Textl的文本框;1个名称为Thnerl的计时器控件,其Lnterval属性值为5000, Enabled属性值是True。Timerl的事件过程如下: Private Sub Timerl_Timer() Static flag As Integer If flag=0 Then flag=1 flag=-flag If flag=1 Then Text1.ForeColor=&HFF& '&HFF&为红色 Else End If End Sub 以下叙述中正确的是( )。 B)flag的值只可能取0或1
我的淘宝
D)6 3
(23)在窗体上画1个命令按钮,并编写如下事件过程: Private Sub Commandl_Click() For i=5 To 1 Step -0.8 Print Int(i); Next i End Sub 运行程序,单击命令按钮,窗体上显示的内容为( )。 A)5 4 3 2 1 1 C)4 3 2 1 1 Private Sub Commandl Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n); Next n Print Next m End Sub B)5 4 3 2 1 D)4 4 3 2 1 1
我的淘宝
C)110 100
Function fun(a As Integer,b As Integer) While a>b a=a-b Wend fun=a End Function A)把a=a-b改为a=b-a
计算机等级考试二级VB模拟试题
计算机等级考试二级VB模拟试题(1)一、填空题(每空1分,共20分)1、VB是一种面向_____的可视化程序设计语言,采取了_____的编程机制。
2、VB的对象主要分为_____和_____两大类。
3、若要将窗体Form1隐藏起来,可使用方法_____;若要将窗体Form1显示出来,可使用方法_____来实现。
4、在VB集成开发环境中,运行应用程序的方法有三种:一是_____;二是_____;三是_____。
5、在VB中若要让某对对象获取焦点,则可通过_____方法来实现。
6、VB提供的_____属性,用来控制对象是否可用,当属性值为_____时,表示对象可用,当属性值为_____时,表示对象不可用。
7、VB提供的_____属性,用来控制对象是否可见,当属性值为_____时,表示对象可见,当属性值为_____时,表示对象不可见。
8、在VB中,用来描述对象外部特征的量称之为对象的_____。
9、为使某窗口中的命令按钮“取消(C)”具有如下特性:按“Alt+C”键或按“ESC” 键,均可代替用鼠标单击该按钮的操作,应设置该按钮的Caption属性值为_____,并且设置其_____属性值为_____。
二、选择题(每题2分,共40分)1、用于从字符串左边截取字符的函数是()A、Ltrim( ) B、Trim( ) C、Left( ) D、Instr( )2、可获得当前系统日期的函数是()A、Date( ) B、Time( ) C、IsDate( ) D、Year( )3、退出For循环可使用的语句为()A、Exit For B、Exit Do C、End For D、End Do4、窗体的标题栏显示内容由窗体对象的()属性决定。
A、BackColor B、BackStyle C、Text D、Caption5、程序运行时,若要通过回车键调用某命令按钮的Click事件过程,则可设置该命令按钮的()属性值为True来实现。
月全国计算机等级考试二级VB笔试试题.doc
目录第一章编制依据和编制内容第二章工程概况和特点第三章组织机构及目标第四章施工部署第五章施工进度计划及工期保证措施第六章施工平面布置第七章施工方案第八章施工技术采用新技术、新工艺的可行性第九章工程质量控制及保证措施第十章安全生产施工措施第十一章文明施工措施网络进度计划图(附后)现场平面布置图 (附后)第一章编制依据和编制内容第一节编制依据1.1沈阳设计研究院设计的“锡林浩特市锡凌煤矿宿舍楼”建设工程施工图纸。
1.2本公司与建设单位签订的建设工程施工合同。
1.3本公司对工程施工现场实际情况及业主提供的相关资料。
1.4 本公司质量管理体系文件要求及类似工程施工经验,以及本公司人员配备和施工设备装备能力。
1.5 有关施工验收规范、技术标准、规程:第二节编制内容2.1根据我司多年类似建筑施工经验,结合本工程的具体情况,对该工程的特点、重点、难点进行反复研究和方案论证比较,使施工组织设计科学、合理、详尽、具有很强的可操作性和针对性。
2.2本施工组织设计为该工程全过程施工组织设计,主要内容包括:1、主要分项工程项目的具体做法及施工框图;2、劳动力计划及主要施工机械计划;3、确保工程质量的技术组织措施;4、确保安全施工的技术组织措施;5、确保文明施工和环境保护的组织措施;6、确保工期的技术措施;7、施工进度计划详(横道图);8、现场施工总平面布置及现场给排水和临时用电布置;9、混凝土、钢筋、模板、砌体等分项工程的施工保证措施;10、层高保证措施;11、成品半成品保护措施;12、总承包协调组织措施;对各专业承包商的工程总承包管理和协调,与业主、设计、监理和相关主管部门的配合协作等工程重点和难点,进行认真细致的方案设计论证和方案研究和比选,将是本施工组织设计的重点内容之一;由于本工程施工作业面积大,安全文明施工将是本施工组织设计的重点内容之一。
2.3 本工程《施工组织设计》中未注明的计量单位均为“mm”。
第二章工程概况和特点第一节地理位置及环境1.1锡林浩特市锡凌煤矿宿舍楼项目由沈阳设计研究院设计有限公司设计,建筑面积为11389.34㎡。
全国计算机等级考试二级VB模拟试卷机试(2)
全国计算机等级考试二级VB模拟试卷机试(一)1.基本操作(2小题,每小题15分,共计30分)注意:下面出现的"考生文件夹"均为c:\wexam\25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在Form1的窗体上画一个名称为P1的图片框,然后建立一个主菜单,标题为"操作",名称为Op,该菜单有两个子菜单,其标题分别为"显示"和"清除",名称分别为Dis和Clea。
编写适当的事件过程,程序运行后,如果单击"操作"菜单中的"显示"命令,则在图片框中显示"计算机考试";如果单击"清除"命令,则清除图片框中的信息。
程序的运行情况如图15-1和图15-2所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
程序中不得使用任何变量。
图15-1 图15-2(2)在Form1的窗体上画一个列表框,名称为L1,通过属性窗口向列表框中添加4个项目,分别为"早上好"、"上午好"、"中午好"和"下午好"。
编写适当的事件过程,过程中只能使用一条命令。
程序运行后,如果双击列表框中的某一项,则把该项再添加到列表框中。
程序的运行情况如图15-3所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
图15-32.简单应用(2小题,每题20分,计40分)注意:下面出现的"考生文件夹"均为c:\wexam\25160001。
(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即'号),但不能修改其他部分。
全国计算机二级考试《VB》操作试题及答案
全国计算机二级考试《VB》操作试题及答案全国计算机二级考试《VB》操作试题及答案一、基本操作题(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2中,单击“清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。
运行时的窗体如图所示。
要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sit2.vbp,窗体文件名为sjt2.frm。
二、简单应用题(1)在考生文件夹F有一个工程文件sjt3.vbp,窗体上已经有一个标签Labell,请添加一个单选按钮数组,名称为Opl,含三个单选按钮,它们的Index 属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽车”,再添加一个名称为Textl的文本框。
窗体文件中已经给出了Opl的Click事件过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在程序运行时单击“飞机”或“火车”单选按钮时,在Textl中显示“我坐飞机去”或“我坐火车去”,单击“汽车”单选按钮时,在Text1中显示“我开汽车去”,如图所示。
全国计算机等级考试二年级VB试卷
全国计算机等级考试二年级V B试卷Revised by Jack on December 14,20202008年4月全国计算机等级考试二级VB试卷一、选择题1、程序流程图中带有箭头的线段表示的是A)图元关系 B)数据流C)控制流 D)调用关系2、结构化程序设计的基本原则不包括A)多态性 B)自顶向下 C)模块化D)逐步求精3、软件设计中模块划分应遵循的准则是A)低内聚低耦合 B)高内聚低耦合 C)低内聚高耦合 D)高内聚高耦合4、在软件开发中,需求分析阶段产生的主要文档是A)可行性分析报告 B)软件需求规格说明书 C)概要设计说明书 D)集成测试计划5、算法的有穷性是指A)算法程序的运行时间是有限的 B)算法程序所处理的数据量是有限的C)算法程序的长度是有限的 D)算法只能被有限的用户使用6、对长度为n的线性表排序,在最坏的情况下,比较次数不是n (n-1)/2的排序方法是A)快速排序 B)冒泡排序C)直接插入排序D)堆排序7、下列关于栈的叙述正确的是A)栈按“先进先出”组织数据B)栈按“先进后出”组织数据C)只能在栈底插入数据D)不能删除数据8、在数据库设计中,将E—R图转换成关系数据模型的过程属于A)需求分析阶段 B)概念设计阶段 C)逻辑设计阶段 D)物理设计阶段9、有三个关系R、S和T如下:RST由关系R和S通过运算得到关系T,则所使用的运算为A)并 B)自然连接C)笛卡尔积D)交10、设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为A)课号,成绩 B)学号,成绩 C)学号,课号D)学号,姓名,成绩11、以下叙述中错误的是A)标准模块文件的扩展名是.bas B)标准模块文件是纯代码文件C)在标准模块中声明的全局变量可以在整个工程中使用 D)在标准模块中不能定义过程12、在Visual Basic中,表达式3* 2\5 Mod 3的值是A)1B)0C)3D)出现错误提示13、以下选项中,不合法的Visual Basic变量名是A)a5b B)_xyz C)a_b D)andif14、以下数组定义语句中,错误的是A)Static a (10) As Integer B) Dim c (3, 1 to 4)C) Dim d (-10) D) Dim b (0 to 5, 1 to 3) As Integer15、现有语句:y=IIf(x>0, x Mod 3, 0) ,设x=10,则y的值是A)0B)1C)3D)语句有错16、为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把Scrollbars属性设置为A)0B)1C)2D)317、文本框Text1的KeyDown事件过程如下:Private SubText1_ KeyDown(KeyCode As Integer, Shift As Integer)End Sub其中参数KeyCode的值表示的是发生此事件时A)是否按下了Alt键或Ctrl键B)按下的是哪个数字键C)所按的键盘键的键码D)按下的是哪个鼠标键18、窗体上有一个名称为Hscroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。
计算机二级《VB》考试试题及答案
xx年计算机二级《VB》考试试题及答案1SUBSTR(″ABCDEF″,3,2)结果是( )A.ABB.CDC.FED.CB参考答案:B2数据库的故障恢复一般是由( )A.数据流图完成的B.数据字典完成的C.DBA完成的D.PAD图完成的参考答案:C3不能脱离控件(包括客体)而独立存在的过程是A.事件过程B.通用过程C.Sub过程D.函数过程参考答案:A4当前目录下有两个表文件,MEN.DBF和WOM.DBF,分别记录男生成绩档案和女生成绩档案,但男生中局部物理缺考,假设要统计物理成绩而将所有参加物理的档案合并,正确操作是( )E WOM IN 0E WOM IN 0USE MEN IN 0 APPEND FROM MEN FOR 性别=′男′APPEND FROM WOM FOR 性别=′男′C.COPY FILES TO WOM FOR 性别=′男′E MENCOPY TO WOM FOR 性别=′男′参考答案:B5以下表达中正确的选项是( )A.线性表是线性构造B.栈与队列是非线性构造C.线性链表是非线性构造D.二叉树是线性构造参考答案:A6不属于循环构造的语句是( )A.SCAN...ENDSCANB.IF...ENDIFC.FOR...ENDFORD.DO While...ENDDO参考答案:B7以下属于Visual Basic合法的数组元素是A.x8B.x[8]C.s(0.D.v[8]参考答案:C8在Visual FoxPro系统中,内存变量只定义了数组MK(12),它具有12个下标变量。
用LIST MEMORY LIKE MK*命令显示已定义的内存变量数是( )A.12B.1C.0D.有时是1,有时是12参考答案:B9依据PEO.DBF中的字段名NAME制作一个单一关键字索引文件NAME1.IDX,以下程序段所缺的内容是( )CLOSE ALLUSE PEOLISTLISTE INDEX ON NAME FOR NAME1E INDEX ONNAME1C.INDEX ON NAME WITH NAME1D.INDEX ON NAME TO NAME1 参考答案:D10在“报表设计器”中,任何时候都可以使用“预览”功能查看报表的打印效果,以下4种操作中不能实现预览功能的是( )A.直接单击常用工具栏上的“打印预览”按钮B.在“打表设计器”中单击鼠标右键,从弹出的快捷菜单中选择“预览”C.翻开“显示”菜单,选择“预览”选项D.翻开“报表”菜单,选择“运行报表”选项参考答案:D11在Visual FoxPro报表设计中,“学生成绩表”的报表布局类型是()A.列表B.行表C.标签D.多列表参考答案:A12以下表达中,错误的选项是( )A.工作区的系统别名和用户定义的数据表别名可以交替使用B.在某个工作区翻开的数据表原名和工作区别名可以交替使用C.在某个工作区翻开的数据表原名和数据表别名可以交替使用D.在选择工作区时,可以用工作区号、系统别名或翻开的数据表别名参考答案:C13软件工程的理论和技术性研究的内容主要包括软件开发技术和( )A.消除软件危机B.软件工程管理C.程序设计自动化D.实现软件可重用参考答案:B14编写如下两个事件过程:Private Sub FormKeyDown (KeyCode As Integer, Shift As Integer)Print Chr(KeyCode.End SubPrivate Sub FormKeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时)运行程序,如果按"A"键,那么程序输出的结果是A.A aB.a AC.A AD.a a参考答案:C15顺序执行下面两条命令:N=123456.789@ 10,6 SAY N PICTURE ″$ $ 999,999.9″屏幕显示的结果是( )A.$ 123,456.7B.$$ 123,456.7C.$ 123,456.8D.$$ 123,456.8参考答案:A16在命令文件与被调用过程之间的参数传递要求( )A.参数名相同B.参数个数相同C.参数类型相同D.B与C参考答案:B17单个用户使用的数据视图的描述称为()A.外模式B.概念模式C.内模式D.存储模式参考答案:A18以下各控件不包含滚动条的控件是A.ListBoxboBoxC.TextBoxbelBox参考答案:D19Visual FoxPro中,执行了SET DATE AMERICAN后,不能显示4位年份的命令是( )A.?YEAR(DATE())B.?LEFT(DTOC(DATE()),4)C.?LEFT(DTOC(DATE(),1),4)D.?SUBSTR(DTOC(DATE(),1),1,4)参考答案:B20关于创立工具栏的说法,正确的选项是( )A.只能定制Visual FoxPro系统工具栏,不能自定义工具栏B.不能定制Visual FoxPro系统工具栏,但可以自定义工具栏C.既能定制Visual FoxPro系统工具栏,也可自定义工具栏D.只能使用系统工具栏,不能自定义工具栏参考答案:C。
计算机二级VB语言程序设计考试练习题及答案
Text1.SetFocus
Dim x!, y!, z!, t!
End If
x = Text1
Else
y = Text2
MsgBox 密码帐号正确!
z = Text3
End If
If x y Then
End Sub
t=x
若在 text1 中输入字符串 123,显示密码错误对话框,关于此对话框
x=y
描述正确的选项是(A)(单)
第1页共6页
D.没有任何提示
本文格式为 Word 版,下载可任意编辑,页眉双击删除即可。
C.程序出错
5.在窗体中建立一个文本框 text1 和一个指令按钮 command1,编写
D.没有任何提示
下面程序:
6.在窗体中建立一个文本框 text1 和一个指令按钮 command1,编写
Private Sub Text1_LostFocus( )
本文格式为 Word 版,下载可任意编辑,页眉双击删除即可。
计算机二级 VB 语言程序设计考试练习题及答案
计算机二级 VB 语言程序设计考试练习题及答案 程序设计是计算机二级 VB 考试必考的学问点,下面为大家带来了计 算机二级 VB 语言程序设计考试练习题及答案,欢迎大家阅读! 计算机二级 VB 语言程序设计考试练习题及答案 1.以下程序段运行的结果为(B)(单) Private Sub Form_Click( ) MyDate = PM P B.July-97 09:21:30 P C.07-97 9:21:30 P D.July-97 9:21:30 3.以下程序段运行的结果为(C)(单) Private Sub Form_Click( ) MyDate = 7,1997 B.21,07,21,1997 C.Monday,July,21,1997