搜索
第一章1从功能上讲，VisualBasic6.0有3种版本，即：学习版、专业版、企业版2与传统的程序设计语言相比，VisualBasic最突出的特点是事件驱动编程机制。3VisualBasic6.0集成环境的主窗口中含有标题栏、菜单栏、工具栏4用标准工具栏中的工具按钮不能执行的操作是打印源程序。5关于VisualBasic方法的概念错误的是方法是对事件的响应6在VisualBasic中，称对象的数据为属性7VisualBasic应用程序可以用解释方式执行也可以用编译方式执行第二章1计时器控件的Interval属性用于设置Timer事件发生的时间间隔，为了暂时关闭计时器，应把该计时器的Enabled属性设置为False，如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于10002利用Ctrl+G操作可以打开立即窗口。3假定窗体上有一个标签，名为Lable1。为了使该标签透明并且没有边框，则正确的属性设置为：Lable1.BackStyle=0Lable1.BorderStyle=04在设计阶段，当双击窗体上的某个控件时，所打开的窗口是代码窗口5在VisualBasic中，窗体文件的扩展名为FRM6窗体的Name属性指定窗体的名称，用来标识一个窗体7改变控件在窗体中的上下位置，应修改该控件的属性是Top8表示滚动条控件取值范围最大值的属性是Max9如果要改变窗体的标题，则需要设置的属性是Caption10在文本框（Text）中，通过ForeColor属性来设置字体颜色11若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置Passwordchar属性值为*12能够改变复选框中背景颜色的属性是Backcolor13图片框是不具有Picture属性的对象14窗体的Name属性指定窗体的名称，用来标识一个窗体15要想返回文本框中输入的内容则可利用text属性进行编程第三章1用于从字符串左边截取字符的函数是Left()，设a=VisualBasic，使b=Basic的语句是b=Left(a,8,5)。2下列符号中哪个是VB程序中合法的变量名：Aab7B7abCIfDa*bc（A）数字开头，关键字，*3X是小于100的非负数，用VB表达式表达正确的是0=XandX1004设有如下变量声明DimTestDateAsDate为变量TestDate正确赋值的表达方式是TextDate=#1/1/2002#5表达式4+5\6*7/8Mod9的值是5，设a=3,b=5，则表达式(ab)Or(b0)值为真。5/5.25为1如果除数与被除数不是整数时，系统会自动对其进行取整运算，取整是有规律的：如果整数部分为偶数，大于0.5的就进位，小于等于0.5的就直接把小数去掉，5舍6入；如果整数部分为奇数，4舍5入。例如：5\2.5等价于5\25\2.6等价于5\35\2.4等价于5\25.4\3等价于5\35\1.5等价于5\26函数String(n，str)的功能是返回由n个字符组成的字符串7设有如下声明：DimXAsInteger如果Sgn(X)的值为-1，则X的值是小于0的数Sgn(3-5)=-1Sgn(5-3)=18Integer类型的数据由2字节组成，Long类型的数据由4字节组成。9已知X＜Y，A＞B，正确表示它们之间关系的式子是Sgn(Y-X)-Sgn(A-B)=-210在一个有①逻辑运算②算术运算及③关系运算混合在一起的表达式(无括号)中，其运算顺序为②③①以下合法的VisualBasic标识符是那些：AForLoopBConstC9abcDa#xA通常所说的变量名11能正确表示条件整型变量x值是大于等于-5并且小于等于5的逻辑表达式-5=xandx=512求下列表达式的值：表达式4+5\6*7/8Mod9的值是5，表达式5Mod3+3\5*2的值是2设a=2,b=4,c=6，下列表达式abEqvca的值为真Eqv相同为true相反为false设S=中华人民共和国，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为中国人民表达式2*4^2-2*6/3+3\2的值是29表达式5＾2Mod252＾2的值是113VB算术运算符乘或除、整除、求余的优先级，从高到低依次为乘或除、整除、求余14获得系统日期的函数是date（）15数学式子sin30°写成VB表达式是：Sin(30*3.14/180)16在VisualBasic的立即窗口内输入以下语句X＝65?Chr$(X)在窗口中显示的结果是__A__17计算下列表达式的值表达式93Mod2^2的值是__1__。表达式Len(＂123程序设计ABC＂)的值是__10__。Int（198.555*100+0.5）/100的值是__198.56__。已知A$=＂12345678＂，则表达式val(Left$(A$,4)+Mid$(A$,4,2))的值为（123445）左取4位1234中取4位开始2位18数学关系3≤x＜10表示成正确的VB表达式为3=xAndx10或x=3andx1019表示x是5的倍数或是9的倍数的逻辑表达式是xmod5=0orxmod9=020s$=“china”：s$=“Beijing”：Prints$以上语句的输出结果是___。参考答案Beijing21表达式Ucase(Mid(＂abcdefgh＂,3,4))的值是_CDEF_。22已知a=3.5，b=5.0,c=2.5,d=true,则表达式：a=0anda+cb+3ORNOTd的值是_False__。第四章1VB中可用MsgBox语句产生一消息框。2VB提供了结构化程序设计的三种基本结构，三种基本结构是：选择结构或循环结构或顺序结构3InputBox函数返回值的类型为字符串。J下列语句正确的是(C)AIfA≠BThenPrintA不等于BBIfABThenPrintfA不等于BCIfABThenPrintA不等于BDIfA≠BPrintA不等于B4在DoUntil…Loop循环中，判断循环表达式与结束循环的关系是先判断循环表达式，当表达式值为真时结束循环5在While循环中，判断循环表达式与结束循环的关系是先判断循环表达式，当表达式值为真时执行循环体6设a=6，则执行x=IIf(a＞5,-1,0)后,x的值为–1Ifa5thenA=-1ElseA=0endif7要使下列For语句循环执行20次，循环变量的初值应当是多少?Fork=__1__To-5Step-2参考答案1：33N=(终值-初值)/2+18以下语句的输出结果是:PrintInt(12345.6789*1000.5)/100参考答案123459给出下列程序运行的结果（1）x=5y=-6IfNotx0Thenx=y-3Elsey=x+3Printx-y;y-x结果-33（2）J1=4J2=9IfJ1J2ThenPrintJ2ElsePrintJ1结果为9（3）执行以下程序段后，变量c$的值为（QuickBASICPrograming）a$=VisualBasicProgramingb$=Quickc$=b$&Ucase(Mid$(a$,7,6))&Right$(a$,11)（4）以下语句的输出结果是032,548.50。PrintFormat$(32548.5,000,000.00)(5)在窗体（Name属性为Formal）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：PrivateSubCommand1_Click()A=Text.Text+Text2.TextPrintaEndSubPrivateSubFormm_Load()Text1.Text=Text2.Text=EndSub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为123321。(6)阅读下面的程序段：ForI=1To3i=1i=2i=3Forj=1ToIj=1to1j=1to2j=1to3Fork=jTo3k=1to3k=1to3k=2to3k=1to33A=A+1a=3a=3+3+2k=2to32Nextkk=3to31Nextja=8+3+2+1NextI执行上面的三重循环后，a的值为__14__。(7)在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下的事件过程：PrivateSubCommand1_Click()X=0DoWhilex50X=(x+2)*(x+3)N=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)EndSub程序执行后，单击命令按钮，在两个文本框中显示的值分别为2和72。（8）设a=10，b=5，c=1，执行语句Printabc后，窗体上显示的是False(9)在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerClsY=1Y=Y+5X=5+XPrintX,YEndSub程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为156Static无法释放x=5+5+5y=1+5(10)设有语句x=InputBox(输入数值，0，示例)程序运行后，如果从键盘上输入数值10并按回车键，变量X的值是字符串10(11)在窗体上有一个文本框控件，要求每一秒钟在文本框中显示一次当前名称为TxtTime：一个计时器控件，名称为Timerl的时间。程序为：PrivateSubTimer1_()TxtTime.text=TimeEndSub在下划线上应填入的内容是Timer（12）假定有以下程序段：Fori=1To33-1/1+1=3Forj=5To1Step-11-5/-1+1Printi*j3*5NextNext则语句Printi*j的执行次数是15（13）以下程序段的输出结果为(4)x=1y=4DoUntily4x=x*yy=y+1LoopPrintx（14）在窗体上面画一个文本框，然后编写如下事件过程：PrivateSubForm_Activate()Text1.Text=Text1.SetFocusFori=1to10Sum=Sum+iNextText1.Text=SumEndSub上述程序的运行结果是55首相加末项*项数/2（15）在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Forn=1To20IfnMod30Thenm=m+n\3NextnPrintnEndSub程序运行后，如果单击命令按钮，则窗体上显示的内容是(21)（16）设有如下程序：PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0n=0Fori=1To5x=n/in=n+1sum=sum+xNextEndSub该程序通过For循环计算一个表达式的值，这个表达式是(1/2+2/3+3/4+4/5)（17）下面程序运行后，窗体(Form1)中输出的结果是(TrueTrue)PrivateSubForm_Load()Form1.AutoRedraw=True设置form1让他显示结果X=3:y=5Printx=3;y=5x是否=3（18）下面程序执行的结果是(579)PrivateSubCommand1_Click()A=123:b=456C=Val(a)+Val(b)2边是数字则做加法PrintcEndSub（19）若i的初值为8，则下列循环语句的循环次数为（5）次同样可以用公式：（终值-初值）/步长+1DoWhilei=17i=i+