计算机二级VB语言程序设计考试题及答案.docx

计算机二级VB语言程序设计考试题及答案

计算机二级VB语言程序设计考试题及答案程序设计是VB考试比较难的一道题，下面小编为大家带来了计算机二级VB语言程序设计考试题及答案，欢迎大家阅读！计算机二级VB语言程序设计考试题及答案1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：PrivateSubCommand1_Click()n=Val(Text1.Text)Ifn2=n/2Thenf=f1(n)Elsef=f2(n)EndIfPrintf;nEndSubPublicFunctionf1(ByRefx)x=x*xf1=x+xEndFunctionPublicFunctionf2(ByValx)x=x*xf2=x+x+xEndFunction程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)A.7236B.10836C.726D.2732.在窗体上画一个名称为Command1的'命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c="1234"Fori=1To4c1=Trim(Str())Printc1NextiEndSub程序运行后，单击命令按钮，要求在窗体上显示如下内容1121231234则在下划线处应填入的内容为(B)(单)A.Right(c1,i)B.Left(c1,i)C.Mid(c1,i,1)D.Mid(c1,i,i)3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：PrivateSubCommand1_Click()n=Val(Text1.Text)Fori=2TonForj=2Tosqr(i)IfiModj=0ThenExitForNextjIfj>Sqr(i)ThenPrintiNextiEndSub该事件过程的功能是(C)(单)A.输出n以内的奇数B.输出n以内的偶数C.输出n以内的素数D.输出n以内能被j整除的数4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mElsef=1EndIfEndFunctionPrivateSubCommand1_Click()DimiAsIntegers=0Fori=1To5s=s+f(i)NextPrintsEndSub程序运行后，单击命令按钮，在窗体上显示的是(C)(单)A.11B.10C.9D.85.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+jNextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序运行后，单击命令按钮，在文本框中显示的值是(D)(单)A.15B.14C.13D.126.VisualBasic应用程序中标准模块文件的扩展名是【BAS或.BAS】(注意不要写点)。7.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。PrivateSubForm_【mousedown】(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenpopupmenumnuEditEndIfEndSub8.在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False，程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit相应的菜单。以下是实现上述功能的程序，请填空。PrivateSubFormmousedown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2Then【popupmenu】mnuEditEndIf9.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的【Interval】属性设置为500。10.为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，应将Timer1控件的Interval属性设置为【500】。