大学vb应用编程题答(程序设计教程)
vb程序设计试题及答案
![vb程序设计试题及答案](https://img.taocdn.com/s3/m/fe3dbd7a4a35eefdc8d376eeaeaad1f34793111a.png)
vb程序设计试题及答案一、选择题(每题2分,共20分)1. 在VB中,下列哪个选项是正确的数据类型?A. IntegerB. DoubleC. StringD. All of the above答案:D2. VB中用于声明变量的关键字是?A. DimB. DeclareC. SetD. All of the above答案:A3. 在VB中,下列哪个选项是正确的循环语句?A. ForB. DoC. WhileD. All of the above答案:D4. VB中用于打开文件的函数是?A. OpenB. CloseC. WriteD. Read答案:A5. 在VB中,下列哪个选项是正确的条件语句?A. If...ThenB. Select CaseC. Do WhileD. All of the above答案:A6. VB中用于创建新窗体的语句是?A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案:A7. VB中用于声明常量的关键字是?A. ConstB. DimC. StaticD. Option答案:A8. 在VB中,下列哪个选项是正确的数组声明?A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案:A9. VB中用于结束程序的语句是?A. EndB. ExitC. CloseD. All of the above答案:B10. VB中用于捕获异常的语句是?A. Try...CatchB. On ErrorC. CatchD. All of the above答案:B二、填空题(每题2分,共20分)1. 在VB中,声明一个名为myVar的变量,其类型为字符串,应该使用语句________。
答案:Dim myVar As String2. VB中,用于定义一个名为myFunction的函数,返回值为整数,应该使用语句________。
VB程序设计习题及答案第2章VisualBasic语言基础知识
![VB程序设计习题及答案第2章VisualBasic语言基础知识](https://img.taocdn.com/s3/m/7e0faff6de80d4d8d05a4f56.png)
第2章 Visual Basic语言基础知识2.1 Visual Basic定义了几种数据类型,变量有哪几种数据类型,常量有哪几种数据类型。
【答】Visual Basic基本数据类型:1. 字符串型(String):字符串分为变长字符串和定长字符串两种。
2. 数值型:数值型数据分为整型数和浮点数两类。
3. 货币型(Currency)4. 变体型(Variant)5. 字节型(Byte)6. 布尔型(Boolean)7. 日期型(Date)8. 对象型(Object)Visual Basic中包含两种常量,即文字常量和符号常量。
变量的基本数据类型:Byte(字节型),Boolean(布尔型),Integer(整型),Long (长整型),Single(单精度型),Double(双精度型),Currency(货币型),Date(日期型),Object(对象型),String(变长字符串),String(定长字符串),Variant(变体型、数字),Variant(变体型、字符)2.2 符号常量和变量有什么不同点?【答】符号常量一经定义,就不能在程序中的其他位置改变其值。
变量的值在程序中可以改变。
2.3 指出下列正确的变量名:g(1-k) 6adhs *sss kL2.1 Printx+1 ahi π .ex3 j5h【答案】正确的变量名:ahi,j5h2.4 指出下列正确的数字形式-1.25 ±0.123 89E D2585 10^(2.7) 3^5【答案】2.5 下列表达式若有错误,请改正(1) ts+cos(300) (2) (x+y)^(25÷s)(3) [(X1+X2)*(X1-3)-6]*7 (4) (X÷-2)+sin(1.2+π)【答案】(1) ts+cos(30*3.141593/180)(2) (x+y)^(25/s)(3) ((X1+X2)*(X1-3)-6)*7(4) (X/(-2))+sin(1.2+3.141593)2.6 写出下列数学式的Visual Basic表达式(1) sin(a)[cos(b)+1.5](2) (x1+4)5(e2-a)(3) 36[(x1+π)(x1÷3.3)-b](4) x-2π)【答案】Visual Basic表达式:(1) sin(a)*(cos(b)+1.5)(2) (x1+4)^5*(Exp(2)-a)(3) 36*((X1+3.141593)*(x1/3.3)-b)(4) x^(-2)+5.8*sin(3.5*3.141593)第3章顺序结构程序设计3.1 下列语句是否有错?若有,请改正。
VB程序设计教程课后参考答案概要
![VB程序设计教程课后参考答案概要](https://img.taocdn.com/s3/m/dafcaf3414791711cd791715.png)
VB程序设计教程课后参考答案习题一一、填空题1.对象、事件驱动2.窗体、控件3.属性4.属性窗口、编程设置5.事件过程6.对象名、下划线、事件名7.Form_click8.Print form1.print “我的VB”9.主窗口、属性、工具箱、代码、窗体、工程资源管理10.菜单、快捷键二、选择题1.C 2. A 3. B 4. B 5. D 6. B C 7. A 三、简答题(略)习题二一、选择题1. D2. C3. C4. B5. C6. B7. C8. B 9. A 10. B 11. B 12. C 13. D 14. B15. A 16. A 17. A 18. A 19. B 20. C 21. A22. B 23. B 24. A 25. C 26. A 27. B 28. B29. C 30. B 31. D 32. D 33. C二、填空题1.Controlbox、Maxbutton、Minbutton2.Multiline TRUE3.******4.单文档界面(SDI)多文档界面(MDI)5.窗体显示6.Passwordchar7._change()三、编程题(略)习题三一、基础知识题(略)二、填空题1.整型、长整型、单精度、双精度2.(x mod 10)*10+x\103.Sin(3.14*15/180)+sqr(x+exp(3))/abs(x-y)-log(3*x)4.(a+b)/(1/(c+5)-c*d/2)5.X mod 5=0 or x mod 9=06.False7.-4、3、-3、3、-4、48.CDEF10.TRUE11.变量、属性12.‘_ :13.(略)14.“”#15.Public、通用/模块、Dim、static、private16.+ 、&、+17.Now() 、time()、日期18.Inputbox()、字符串、val()19.Msgbox()三、选择题1.B 2. C 3. A 4. B D此题有误 5. B 6. A7. D 8. B 9. B 10. C 11. D 12. B13. C 14. B 15. A 16. C 17.A 18. D19. A 20. D 21. A 22. C 23. C 24. D25. A 26. D 27. D 28. B 29. C 30. B31. C 32. B 33. C D此题有误34. C 35. A36. D 37. C 38. A 39. B 40. A 41. C42. C 43. D 44. C 45. D 46. A四、编程题1.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%, delta%Dim x1#, x2#, x#a = Val(InputBox("please input data to a:", "info", 1))b = Val(InputBox("please input data to b:", "info", 1))c = Val(InputBox("please input data to c:", "info", 1))If a = 0 And b <> 0 Thenx = -c / bPrint "所构成的方程是:" & b & "x" & "+" & c & "=0"Print "该一元一次方程的根是:", xEnd IfIf a = 0 And b = 0 ThenPrint "很抱歉,不能构成合法的方程!"End IfIf a <> 0 Thendelta = b * b - 4 * a * cIf delta >= 0 Thenx1 = (-b + Sqr(delta)) / (2 * a)x2 = (-b - Sqr(delta)) / (2 * a)Print "所构成的方程是:" & a & "x2" & "+" & b & "x" & "+" & c & "=0"Print "该方程的根是:"Print "第一个根是:", x1Print "第二个根是:", x2Else2Print "该方程有两个虚根:"Print "第一个虚根是:" & -b / (2 * a) & "+" & Sqr(Abs(delta)) / (2 * a) & "i"Print "第二个虚根是:" & -b / (2 * a) & "-" & Sqr(Abs(delta)) / (2 * a) & "i" End IfEnd IfEnd Sub2.Option ExplicitPrivate Sub Command1_Click()Dim i%, s%s = 0For i = 1 To 99 Step 2s = s + iNextPrint sEnd Sub3.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#s = 0For i = 1 To 100s = s + 1 / i * (-1) ^ (i + 1)NextPrint sEnd Sub4.Option ExplicitPrivate Sub Command1_Click()Dim i%, n%Dim t#, s#n = Val(InputBox("please input data:", "info", 5))s = 0t = 1For i = 1 To nt = t * is = s + tNextPrint sEnd Sub5.Option ExplicitPrivate Sub Command1_Click()Dim a%, b%, c%Dim p#, s#a = Val(InputBox("please input data to a:", "info", 3))b = Val(InputBox("please input data to b:", "info", 4))c = Val(InputBox("please input data to c:", "info", 5))If (a + b > c And Abs(a - b) < c) Or (a + c > b And Abs(a - c) < b) Or ((b + c) > a And Abs(b - c) < a) Thenp = (a + b + c) / 2s = Sqr(p * (p - a) * (p - b) * (p - c))Print "三角形的面积是:" & sElsePrint "很抱歉,不能构成合法的△三角形!"End IfEnd Sub6.Option ExplicitPrivate Sub Command1_Click()Dim ji%, tu%For ji = 1 To 27For tu = 1 To 27If ji * 2 + tu * 4 = 78 And ji + tu = 27 ThenPrint "鸡的个数是:" & jiPrint "兔的个数是:" & tuEnd IfNextNextEnd Sub7.Option ExplicitPrivate Sub Command1_Click()Dim i%Dim s#, t#s = 10t = 10For i = 1 To 7t = t * 0.4s = s + t * 2NextEnd Sub8.Option ExplicitPrivate Sub Command1_Click()Dim i%, fs%, max%, min%, s%Dim ave#fs = Val(InputBox("please input score:", "info", 90))s = fsmax = fsmin = fsFor i = 2 To 7fs = Val(InputBox("please input score:", "info", 90))If max < fs Thenmax = fsEnd IfIf min > fs Thenmin = fsEnd Ifs = s + fsNextave = (s - max - min) / 5Print "该运动员的平均成绩是:" & aveEnd Sub9. ‘同学们,这道题方法很多,主要考察你对选择结构的理解,我给出其中一种方法。
VB程序设计 习题及答案第4章 选择结构程序设计
![VB程序设计 习题及答案第4章 选择结构程序设计](https://img.taocdn.com/s3/m/65b6d0deb52acfc788ebc955.png)
第4章选择结构程序设计4.1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24.2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4.3 已知 W=10 X=9 Y=8 Z=7 ,求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4.4 写出下列十进制整数逻辑运算的结果:(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04.5 已知变量X和Y的值分别为5、6,编写程序,交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示:4.6 从键盘输入一个学生的三科成绩,计算总分,并找出最高分。
【参考答案】(1)用户界面设计(2)控件属性设置(略)(3)程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
VB程序设计试题及答案(一)-vb程序设计答案
![VB程序设计试题及答案(一)-vb程序设计答案](https://img.taocdn.com/s3/m/053ad15b2f3f5727a5e9856a561252d380eb2075.png)
VB程序设计试题及答案(一)一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句是正确的。
(A) Forml.Cap on=“欢迎使用VB”(B) Forml.Cap on='欢迎使用欢迎使用VB'(C) Forml.Cap on=欢迎使用VB(D) Forml.Cap on="欢迎使用VB"3. 若要使命令按钮不可操作,要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Cap on4. 如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中,其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1,下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构,三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是D 。
VB答案(选择+填空+程序设计)
![VB答案(选择+填空+程序设计)](https://img.taocdn.com/s3/m/8a326f38453610661ed9f422.png)
一、单选共300题(共计300分)滚动条的( )属性用于指定用户单击滚动条的滚动箭头时,Value属性值的改变量. A:ValueB:LargeChangeC:ChangeD:SmallChange答案:D运行时,当用户向文本框输入新的内容,或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文本框的()事件.A:CLICKB:DBLCLICKC:GOTFOCUSD:CHANGE答案:D要获得用户在组合框输入的内容,应利用的组合框的属性是( ).A:ListB:ListIndexC:SelectedD:Text答案:D输入对话框InputBox的返回值的类型是 .A:长整数B:字符串C:浮点数D:整数案:B要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. A:alignmentB:usemnemonicC:autosizeD:tag答案:C假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(). A:BOOLVAR='TRUE'B:BOOLVAR=.TRUE.C:BOOLVAR=#TRUE#D:BOOLVAR=3<4答案:D运算符"\"两边的操作数若类型不同,则先再运算.A:四舍五入为Byte类型B:取整为Byte类型C:四舍五入为整型D:取整为Integer类型答案:CVisual Basic程序设计时常用的Print、CLS属于( )A:属性B:对象C:方法D:事件答案:C当文本框的属性设置为True时,在运行时文本框不能编辑. A:VisibleB:EnabledC:LockedD:MultiLine答案:C要使标签所在处透明显示背景,应把其Backstyle属性设置为(). A:0B:1C:2D:3答案:AVisual Basic中,实现参数的传值方式的关键字是A:DimB:ByRefC:ReDim语句Print "5*5" 的显示结果是 .A:25B:"5*5"C:出现错误提示D:5*5答案:D若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置( ) A:Text属性值为*B:Caption属性值为*C:password属性值为空D:Passwordchar属性值为*答案:D在下列关于通用对话框的叙述中,错误的是( ).A:当Action属性值为3时,显示字体对话框B:CommonDialogl.ShowFont显示字体对话框C:在"打开"或"另存为"对话框中,FileName属性返回所选的文件名及其路径D:在"打开"或"另存为"对话框中,用户选择的文件名可以经FileTitle属性返回答案:AList1.Clear中的Clear是( ).A:属性D:对象答案:C以下不具有Picture属性对象是().A:窗体B:图片框C:图像框D:文本框答案:D设有如下数组定义语句: Dim s(3) as integer 则下列给数组元素赋值的错误语句是().A:S(2)=5*5-3*3B:s(3)=100C:S(3)=val(inputbox( "输入整数"))D:s(3)=array(0,1,2,3)答案:D简单组合框的style值为().A:0B:1C:2D:3答案:B以下()程序段可以实施X、Y变量值的变换.A:Y=X:X=YB:Z=X:Y=Z:X=YC:Z=X:X=Y:Y=ZD:Z=X:W=Y:Y=Z:X=Y答案:C表达式(7\3+1)*(18\5-1)的值是().A:8.76B:7.8C:6D:6.67答案:C下列对象中没有焦点属性的是().A:命令按钮控件B:窗口控件C:文本框控件D:单选框控件答案:B下列关于Select Case的叙述中,错误的是 .A:Case "abc","ABC" 表示判断Is是否和"abc"、"ABC"两个字符串中的一个相同B:Case "X" 表示判断Is是否为大写字母XC:Case -7,0,100 表示判断Is是否等于字符串"-7,0,100"D:Case 10 To 100 表示判断Is是否介于10与100之间答案:C设a=6,则执行x=IIf(a>5,-1,0)后,x的值为().A:5B:6C:0D:-1答案:D有一如下过程:Sub fact(n As Integer, result As Long)result = 1For i = 1 To nresult = result * iNext iEnd Sub在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程: Private Sub Command1_Click()Dim res As Longfact 5, resPrint resEnd Sub程序运行后,单击命令按钮,则输出的结果是A:120B:15C:121D:100答案:AVisualBasic的编程机制是().A:可视化B:面向对象C:面向图形D:事件驱动答案:D在窗体上添加一个命令按钮,并写如下代码Private Sub Command1_Click()stra = "AbcD":strb = "hIJK"strc = LCase(stra)strd = UCase(strb)Print strc; strdEnd Sub运行后,单击命令按钮,显示的结果是 .A:abcdHIJKB:aBCdHijKC:ABCDHIJKD:AbcDhIJK答案:A声明符号常量应该用关键字().A:StaticB:ConstC:PrivateD:V26/ariant答案:B在VB中过()属性来设置字体颜色.A:FontColorB:ForeColorC:BackColorD:ShowColor答案:B要清除窗体A上已经在图片框P1中打印的字符串而不清除图片框中的图像,应使用语句( ). A:P1.Print""B:P1.picture=LoadPicture("")C:A.P1.ClsD:P1.piture""答案:CSub过程与Function过程最根本的区别是_______.A:Sub过程可以直接使用过程名调用,而Function过程不可以B:Function过程可以有参数,而Sub过程不可以C:两种过程参数传递方式不同D:Sub过程的过程名不能返回值,而Function过程能通过过程名返回值答案:D为达到把a、b中的值交换后输出的目的,编程如下:Private Sub Command1_Click()a% = 10: b% = 20Call swap(a, b)Print a, bEnd SubPrivate Sub swap(ByVal a As Integer, ByVal b As Integer)c = a: a = b: b = cEnd Sub在运行时发现输出结果错了,需要修改.下面列出的错误原因和修改方案中正确的是_________. A:输出语句错误,应改为:"Print "a", "b""B:调用swap过程的语句错误,应改为"Call swap a,b"C:过程的形式参数有错,应改为:"swap(ByRef a As Integer,ByRef b As Integer)"D:swap中3条赋值语句的顺序是错误的,应改为"a=b:b=c:c=a"答案:C在窗体上画一个名称为command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click()Dim ss = Array(9, 8, 7, 6, 5, 4, 3, 2, 1, 0)For i = 4 To 1 Step -2Print s(10 - i * 2);Next i程序运行后,单击命令按钮,则输出的结果是().A:8 4B:4 8C:8 6 4 2D:7 3答案:A删除字符串前导和尾随空格的函数是().A:Ltrim()B:Rtrim( )C:Trim()D:Lcase答案:C要把一个命令按钮设置成无效,应设置其哪一属性值(). A:VisibleB:EnabledC:DefaultD:Cancel答案:B下面语句中用来定义窗体或标准模块数组的是().A:DimB:ReDimC:Static答案:A下列关于Select Case之测试表达式的叙述中,错误的是 . A:可以是浮点类型B:只能是变量名C:可以是字符型D:可以是整型答案:B下列选项中,与List1.Text等价的表达式是( ).A:List1.List(List1.ListIndex-1)B:List1.List(List1.ListIndex+1)C:List1.List(List1.ListCount-1)D:List1.List(List1.ListIndex)答案:D语句listl.removeitem 1 将删除list.listindext等于()的项目.. A:0B:2C:3D:1答案:D执行X=7.835 :y=Int(x*100+0.5)/100 后结果是 .A:7.84B:7.8C:7.83D:7.835答案:AVisual Basic的过程有三种,它们是A:属性过程、通用过程和函数过程B:事件过程、通用过程和函数过程C:事件过程、函数过程和子程序过程D:通用过程、子程序过程和函数过程答案:C组合框的三种不同风格:下拉组合框、简单组合框和下拉列表框由()属性决定.A:StyleB:BoderStyleC:FillStyleD:DrawStyle答案:A使用Function语句定义一个函数过程,其返回值的类型为_______. A:只能是符号常量B:是除数组之外的简单数据类型C:可在调用时由运行过程决定D:由函数定义时As子句声明答案:D列表框控件中的列表内容是通过()属性设置的.A:NameB:CaptionC:ListD:Text答案:C工具栏中的"启动"按钮的作用是().A:运行一个应用程序B:运行一个窗体C:工程管理窗口D:打开被选中对象的代码窗口答案:A在窗体Form1的Click事件过程中有以下语句:Label1.Caption="Visual Basic"若本语句执行之前,标签控件的Caption属性为默认值,则标签控件的Name属性和Caption属性在执行本语句之前的值分别为(). A:"Label"、"Label"B:"Label1"、"Visual Basic"C:"Label1"、"Label1"D:"Caption"、"Label"答案:C要使得窗体在出现之前就完成相关的程序设置可在()事件中进行编程.A:linkopenB:KeyPressC:loadD:click答案:C图像框(Image)的何项属性设置为true时,可使图形自动调整大小,填满整个图像框().A:WidthB:PictureC:NameD:Stretch答案:D每建立一个窗体,工程管理器窗口中就会增加一个().A:工程文件B:窗体文件C:程序模块文件D:类模块文件答案:B表达式X+1>X是().A:算术表达式B:非法表达式C:字符表达式D:关系表达式要在垂直位置上移动控件,应利用控件的()属性.A:LeftB:WidthC:TopD:Height答案:C任何控件都具有的属性是().A:TEXTB:CAPTIONC:NAMED:FORECOLOR答案:C下列选项中,不属于列表框方法的是( ).A:AddItemB:DelItemC:ClearD:RemoveItem答案:B若i的初值为8,则下列循环语句的循环次数为次. Do While i<=17i=i+2A:4次B:3次C:6次D:5次答案:D下列不能用commondialog 控件调用的对话框是(). A:open/saveB:helpC:fontD:search答案:D一个菜单项是不是一个分隔条,由()属性决定.A:Name(名称)B:CaptionC:EnabledD:Visible答案:B选中复选框控件时,value属性的值,可以是().A:TrueB:falseC:0D:1Interger类型的变量可存的的最大整数是().A:250B:256C:32768D:32767答案:D获取字符串a 最右边5个字符的函数是 . A:RightStr(a,5)B:RightTrin(a,5)C:Last(a,5)D:Right(a,5)答案:DVB认为下面()组变量是同一个变量.A:A1和a1B:SUM和SUMMARYC:AVER和AVERAGED:A1和A_1答案:A下列控件中,没有Caption属性的是( ).A:框架B:复选框D:单选按钮答案:C要在图片框P1中打印字符串"HowAreYou",应使用语句(). A:Picture1.Print="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")C:P1.Print"HowAreYou"D:Print"HowAreYou"答案:C如果要给字体加删除线,可以选择下列那种属性().A:FontNameB:FontSizeC:FontStrikethruD:FontUnderLine答案:C下面哪些控件不会影响到界面设计效果().A:LabelB:TextC:CommonDialogD:Frame答案:C要改变控件的宽度,应修改该控件的()属性.A:TopB:WidthC:LeftD:Height答案:B变量未赋值时,数值型变量的值为().A:0B:空C:1D:无任何值答案:A设组合框Combo1中有3个项目,则以下能删除最后一项的语句是(). A:Combo1.RemoveItem TextB:Combo1.RemoveItem 2C:Combo1.RemoveItem 3D:Combo1.RemoveItem Combo1.Listcount答案:B用ReDim语句定义的数组是().A:多维数组B:永久数组C:临时数组D:静态数组答案:C只能用来显示字符信息的控件是( ).A:文本框B:标签C:图片框D:图像框答案:B以下4个选项中,属性窗口未包含的是 .A:属性列表B:工具箱C:对象列表D:信息栏答案:B窗体的Caption属性的作用是().A:确定窗体的名称B:确定窗体的标题C:确定窗体的边界类型D:确定窗体的字体答案:B启动VisualBasic后,系统为用户新建的工程起一个名为()的临时名称.A:工程1B:窗体1C:工程D:窗体答案:A若要使标签控件显示时,不覆盖其背景内容,应设置标签控件的()属性. A:BACKCOLORB:BORDERSTYLEC:FORECOLORD:BACKSTYLE答案:D以下不允许用户在程序运行时输入文字的控件是().A:标签框B:文本框C:下拉式组合框D:简单组合框答案:A引用列表框的最后一项应使用().A:List1.List(List1.ListCount-1)B:List1.List(List1.ListCount)C:List1.List(ListCount)D:List1.List(ListCount-1)答案:AInt( Rnd * 100 ) 表示的是范围内的整数.A:[1,100]B:[1,99]C:[0,99]D:[0,100]答案:C表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(). A:4^5B:3*4C:x+1D:SIN答案:C确定一个控件在窗体上的位置的属性是( ).A:Width和HeightB:Width或HeightC:Top和LeftD:Top或Left答案:C双击窗体的任何地方,可以打开的窗口是().A:代码窗口B:属性窗口C:工程管理窗口D:以上3个选项都不对答案:A下面()控件不具有Caption属性.A:标签框B:单选钮C:命令按钮D:文本框答案:D如果设计时在属性窗口将命令按钮的()属性设置为False,则运行时按钮从窗体上消失.A:VisibleB:EnabledC:DisabledPictureD:Default答案:A如果要在菜单中添加一个分隔线,则应将其Caption属性设置为(). A:=B:*C:&D:-答案:D下列()是窗体的扩展名.A:frmB:basC:clsD:dll答案:A定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.A:分B:秒C:毫秒D:微秒答案:C在设计应用程序时,通过____窗口可以查看到应用程序工程中的所有组成部分. A:代码窗口B:窗体设计窗口C:属性窗口D:工程资源管理器窗口答案:DCls方法可以清除窗体或图片框中的()内容.A:在设计阶段使用Picture设置的背景位图B:在设计阶段放置的控件C:在运行阶段产生的图形和文字D:以上全部内容答案:C为使计时器控件每隔5秒钟产生一个计时器事件(Timer事件),则应将其Interval属性值设置为().A:5B:500C:300D:5000答案:DMSGBOX函数中有4个参数,其中必须写明的参数是().A:指定对话框中显示按钮的数目B:设置对话框标题C:提示信息D:所有参数都是可选的答案:C与传统的程序设计语言相比,Visual Basic 最突出的特点是 . A:子过程和函数功能的设计B:事件驱动运行机制C:调试技术D:结构化程序设计答案:B单击滚动条的滚动箭头时,产生的事件是().A:ClickB:ScrollC:ChangeD:Move命令钮标题热字的下划线,可通过( )符号来设置.A:\<B:&C:_D:\>答案:B下列语句中,属于合法的Visual basic 语句是().A:Option Base 4B:Option Base 2C:Option Base 1D:Option Base 3答案:C在列表框中当前被选中的列表项的序号是由下列哪个属性表示(). A:ListB:IndexC:ListIndexD:TabIndex答案:C用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:Checked答案:C下列()是日期型常量.A:"2/1/02"B:37258C:#2/1/02#D:|2/1/02|答案:CClear方法适用于() 控件.A:图片框B:窗体C:复选框D:组合框答案:D欲使某命令按钮失效,应修改命令按钮的()属性.A:VisibleB:CaptionC:EnableD:Enabled答案:D将通用对话框类型设置为"另存为"对话框,应修改( )属性.C:ActionD:Font答案:C若要把"XXX"添加到列表框List1中的第三项,则可执行语句( ). A:List1.AddItem "XXX", 3B:List1.AddItem 3,"XXX"C:List1.AddItem "XXX", 2D:List1.AddItem 2,"XXX"答案:C下列哪一种文件打开方式是以顺序文件方式打开文件并作写操作(). A:Open "c:\file1.dat"For Output as #1B:Open "c:\file1.dat" For Input as #1C:Open "c:\file1.dat" For Append as #1D:Open "c:\file1.dat" For Write as #1答案:A下面()对象在运行时一定不可见.A:LineB:TimerC:TextD:Option答案:B()对象不能作为控件的容器.A:FormB:PictureBoxC:ShapeD:Frame答案:C为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( ).A:ValueB:DefaultC:CancelD:Enabled答案:C下列选项中不属于事件的是 .A:ShowB:KeyUpC:LoadD:Dblclick答案:A能够改变窗体边框线类型的属性是().A:FontStyleB:BorderStyleC:BackStyleD:Border答案:B标签框文本的对齐方式由( )属性来决定.A:AlignB:AlignmentC:AutosizeD:BackStyle答案:B在参数传递过程中,使用关键字_______来修饰参数,可以使之按值传递. A:ByValB:ByRefC:ValueD:reference答案:A要想返回文本框中输入的内容则可利用其()属性进行编程.A:captionB:textC:nameD:righttoleft答案:B当一个工程含有多个窗体时,其中的启动窗体是( ).A:在"工程属性"对话框中指定的窗体B:第一个添加的窗体C:启动 Visual Basic 时建立的窗体D:最后一个添加的窗体答案:A如下语句不能定义一个10×10的数组的是().A:Option Base 1:Dim s(10, 10)B:Dim s(2 To 11, -4 To 5)C:Dim s(10, 10) As IntegerD:Dim s(9, 9)答案:C若要设置文本框最大可接收的字符数,可通过( )属性来实现. A:MultiLineB:LengthC:MaxD:MaxLength答案:D数组Dim arr(-1 to 4,2 to 4,3) 的元素个数是().A:60B:36C:30D:72答案:D以下有关对象属性的说法正确的是( ).A:对象所有的属性都罗列在属性窗口列表中B:不同对象不可能有同名属性C:不同对象的同名属性的取值一定相同D:对象的某些属性既可以在属性窗口中设置,也可以通过程序代码设置或改变答案:Dvb 中的坐标系最小刻度为().A:缇B:象素C:厘米D:一个标准字符宽度答案:A如果要在命令按钮上显示图形文件,应设置命令按钮的().A:Style属性和Graphics属性B:Style属性和Picture属性C:Picture属性D:Graphics属性答案:B组合框控件是将()组合成一个控件.A:列表框控件和文本框控件B:标签控件和列表框控件C:标签控件和文本框控件D:复选框控件和选项按钮控件答案:A计时器的interval属性为0时,表示().A:计时器失效B:相隔0秒C:相隔0 毫秒D:计时器的enable属性为false答案:A清除列表框的所有选项应选择下列哪种方法().A:ClearB:ClsC:ClearItemD:RemoveItem答案:A以下叙述错误的是( ).A:下拉式菜单和弹出式菜单都用菜单编辑器建立B:如果把一个菜单项的Enabled属性设置为False,则菜单项不可见. C:内缩符号由4个点组成,它表明菜单项所在的层次.D:除分隔线外,所有菜单项都能接收Click事件.答案:B在Visual Basic代码中,将多个语句合并在一行上的并行符是() A:撇号(')B:冒号(:)C:感叹号(!)D:问号(?)答案:B工程文件的扩展名为 .A:.basB:.vbpC:.frxD:.frm答案:B将Visual Basic编制的程序保存在磁盘上,至少会产生何种文件 .A:.doc与.txtB:.vbp与.frmC:.com与.exeD:.bat与.frm答案:B为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是().A:ValueB:DefaultC:CancelD:Enabled答案:B决定控件上文字的字体、字形、大小及效果的属性是().A:TEXTB:CAPTIONC:NAMED:FONT答案:D一、判断共204题在Visual Basic 中Dim a ,b,c as integer和Dim a as integer, b as integer,c as integer相同.答案:N有的对象属性既可在属性窗口中设定又可在程序代码中设定.答案:Y所有的控件在程序运行以后都是可见的.答案:NSingle 和Double型用于保存浮点数,在VB中定义单精度浮点8位,双浮点16位.答案:N时钟控件的属性Interval值为0时,表示屏蔽计时器.答案:Y有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案:Y在过程中用Dim和Static定义的变量都是局部变量答案:Y对象是基本的运行实体,它既包括了数据(属性).也包括作用于对象的操作(方法)和对象的响应动作(事件).答案:Y事件过程与Sub过程,它们相同点都是事件驱动,而不同的只是事件过程由控件属性决定,而Sub过程是由户自定义.答案:Y图片框的属性Enabled设置为FALSE, 图片框上的控件仍可响应用户操作.答案:N声明形参处缺省传递方式声明,则为按值传递(ByVal).答案:NVariant是一种数据类型,因此只能存放象其它数据类型一样,无特殊值.答案:NVB若同一个工程有许多窗体,可以指定任一窗体为启始窗体.答案:Y定时将文本框中的数据保存到磁盘,应用于选用Timer计时器控件.答案:Y过程中的静态变量是局部变量,当过程再次被执行时,它的值是上一次过程调用后的值.答案:Y在VB中,函数 Fix(-3.6) 的返回值是–4.答案:N可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案:Y如果一个菜单项的Visible属性为False,则它的子菜单也不会显示.答案:YVB规定窗体文件的扩展名是 .vbp.答案:N当需要在同一窗体中建立几组相互独立的单选钮时,就要用框架将每一组单选钮框起来.答案:Y在打开一个Visual Basic工程进行修改后,要另存为一个版本,只需单击"工程另存为…"就行,因为系统将同时保存其他文件.答案:Y利用Private Const 声明的符号常量,在代码中不可以再赋值.答案:Y如果在过程调用时使用按地址传递参数(byref),则在被调过程中不可以改变实参的值.答案:N用通用对话框控件显示"字体"对话框前,必须先设置Flags属性,否则将发生"不存在字体"的错误.答案:Y用Cls方法能清除窗体或图片框图中用Picture属性设置的图形.答案:NDo/Loop While结构中的循环体,至少被执行一次.答案:Y要使定时器控件起作用,其属性Interval不可以设置为0.答案:Y对于文件系统控件,当驱动器控件Drive1中的驱动器符改变时,文件夹列表控件Dir1中显示的文件夹也作相应改变,可以在Drive1中的Change事件中使用如下命令:Dir1.Path=Drive1.Drive.答案:Y事件过程由某个用户事件或系统事件触发执行,它不能被其它过程调用.答案:NFor/Next语句中,循环控制变量只能是整型变量.答案:N关系表达式是用来比较两个数据的大小关系的,结果为逻辑值.答案:Y面向对象程序设计是一种以对象为基础,由事件驱动对象执行的设计方法.答案:YVisual Basic提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案:Y在框架控件内的几个单选按钮中,只能有一个单选按钮的Value属性为True.答案:Y设置框架时,可先在窗体上画好框架,再往框架内添置控件;也可以先设计控件,再建立框架,然后将已有控件拖动到框架中.答案:N在程序中Name属性是作为对象的标识而引用,不会显示在窗体上,而控件上显示的内容由Caption属性决定.答案:N由Visual Basic语言编写的应用程序有解释和编译两种执行方式.答案:Y在MsgBox 函数中 prompt 参数是必须的.答案:Y文件按照数据编码方式可以分为ASCII码文件和二进制文件.答案:Y在表达式中,运算符两端的数据类型要求一致.答案:Y计时器(Timer)控件的Interval属性的单位是毫秒,即若将此属性值设为10,则每0.01秒产生一次Timer事件.答案:Y数组控件形成之后,对于每一个控件的名称是相同的.答案:Y若要新建一个磁盘上的顺序文件,可用output,append方式打开文件.答案:Y清除combo1对象的内容是combo1.clear.答案:YDo/Loop Until结构的循环,是"先判断、后执行(循环体)"的循环结构.答案:N在盘驱动器列表框Drive1的Change事件过程中,代码Dir1.Path=Drive1.Drive 的作用是:当Drive1的驱动器改变时,Dir1的目录列表随不同驱动器的作相应改变.答案:Y命令 Picture1.Circle(500,800),800 能够在图片框Picture 1 中画出的图形是圆心在 (500,800)的一个圆.答案:Y用DIM定义数值变量时,该数值变量自动赋初值为0.答案:Y在面向对象的程序设计中,对象是指可以访问的实体.答案:Y通常访问数组内容需要使用循环结构.答案:Y在VB 6.0中,如果要使窗体上的多个控件具有相同的尺寸,在选择了这些控件之后,应执行VB"格式"菜单中的命令.答案:Y用关键字Public声明的过程可以被其他模块调用.答案:YVB支持弹出菜单,所谓"弹出菜单"是指单击鼠标后打开的菜单.答案:N用dim语句声明的局部变量能保存上一次过程调用后的值.答案:N"菜单编辑器"中至少要填"名称"和"标题"这两个框,才能真确完成菜单栏的设计.答案:Y在命令按钮的Click事件过程中,exit与end等效.答案:N在逻辑运算符Not、Or、And中,运算优先级由高到低依次为Not、And、Or.答案:YVisual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言.答案:Y设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2* A>C 的值是 False.答案:Y"事件过程"是用来完成事件发生后所要执行的程序代码.答案:Y某一过程中的静态变量在过程结束后,静态变量及其值可以在其它过程中使用.答案:N如果一个列表框一共有5个选项,而当选中第三项时,这时列表框的ListIndex属性为2.答案:YActiveX控件是扩展名为*.ocx的独立文件,使用时需用"工程"/"部件"载入或移去.答案:Y要设置一个图片按钮,除了设置按钮的Picture属性外,还应该将按钮的Style属性设置为1.答案:Y使用单选钮控件数组时,它们响应同一个Click事件,由Index参数值来区分不同的按钮.答案:Y组合框兼有文本框和列表框两者的功能,用户可以通过键入文本或选择列表中的项目来进行选择. 答案:Y图象框中的Stretch 属性为 true 时,其作用是图形自动调整大小以适应图象控件.答案:Y函数MsgBox的前3个参数分别表示默认按钮、按钮样式以及图标样式.答案:N在单行If语句中,关键字End If是必不可少的.答案:N创建数组控件的方法之一是选定控件后通过复制、粘贴的方式.答案:YFunction函数有参数传递,并且一定有返回值.答案:Y计算机在处理数据时必须将其装入内存,在高级语言中通过内存单元名来访问其中的数据,命名的内存单元就是常量或变量.答案:Y单击"启动"菜单项将窗体装入内存时,一定触发窗体的load事件.答案:YFor/Next循环正常(未执行Exit For)结束后,控制变量的当前值等于终值.答案:N多文档界面是指在一个父窗口下面可以同时打开多个子窗口.子窗口归属于父窗口,当父窗口关闭时,所有子窗口全部关闭.答案:YListl.clear是清除Listl的全部列表项,所以Clear是对象的方法.答案:Y在标准模块的声明部分中用Public声明的变量的有效范围是其所在的工程.答案:Y函数InputBox的前3个参数分别是输入对话框的提示信息、标题以及默认值.答案:Y将焦点主动设置到指定的控件或窗体上,应采用Setfocus方法.答案:YVisual_basic是合法的变量名.答案:Y填空共141题文本框中所显示的内容是它的【1】属性的值.答案 Text如果要指明mystring为固定15个字长的全局变量,应该在标准模块中用以下说明语句定义【1】.答案:public mystring as string*15如果:I=11:J=3:I=int(-8.6)+I\J+13/3 MOD 5,则I值是【1】.答案:-2新建工程时系统会自动将窗体标题设置为【1】.答案:Form1如果要使用命令按钮表面显示文字"退出(X)"(在字符X之下加下划线),则其Caption属性设置为【1】. 答案:退出(&X)拖动滚动条中的滚动框将会产生Scroll和【1】事件.答案:Change语句Print Not 10>15 And 8<5+2的输出结果为【1】.答案:FALSE对象具有属性和【1】.答案:方法当程序运行时,要求窗体中的文本框呈现空白,则在设计时,把此文本框的【1】属性设置成空白.答案:Text把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】.答案:False要使同一类型控件组成一个控件数组,必须要求【1】.答案:Name 相同=或=名称相同滚动条控件有水平滚动条和【1】滚动条.答案:垂直Val("123.55ab456")的值是多少【1】.答案:123.55VB提供了列表框控件,当列表框中的项目较多,超过了列表框的长度时,系统会自动的在列表框边上加一个【1】.答案:垂直滚动条=或=滚动条把整型数1赋给一个逻辑型变量,则逻辑变量的值为【1】.答案:True运行时,若需要命令按钮为灰色,即不被击活,在设计时可以通过【1】属性来实现.答案:enabled列表框(ListBox)显示【1】,用户可以从中选择一个或多个项目.答案:项目列表=或==列表Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为【1】.答案:Picture1求x与y之积除以z的余数的VB表达式为【1】.答案 x*y Mod z已知文本框的内容为"ABCDE",若文本框Selstart=4,Sellength=2,则SelText为【1】. 答案:DE文件按照存取方式及其组成结构可以分为顺序文件和【1】.答案:随机文件=或=随机显示弹出式菜单的方法是【1】.答案:PopupMenu要使一个按钮设为默认按钮,应把此按钮的【1】属性的值设为True.答案:DefaultVB的运算符包括算术运算符、【1】运算符、关系运算符、逻辑运算符和特殊运算符. 答案:连接设置计时器控件只能触发【1】事件.答案:timerVisualBasic6.0用于开发【1】环境下的应用程序.答案:WINDOWS一个工程可以包括多种类型的文件,其中,扩展名为.frm的文件表示【1】文件.答案:窗体VB6.0的连接运算符包括【1】运算符和【2】运算符两种.答案:& 或+答案2 & 或 +。
VB程序设计试题及参考答案
![VB程序设计试题及参考答案](https://img.taocdn.com/s3/m/039f03c729ea81c758f5f61fb7360b4c2e3f2a7f.png)
VB程序设计试题及参考答案VB程序设计及参考答案⼀、单选题(共20分,每⼩题1分)1、要改变控件的宽度,应修改该控件的()属性。
(A)TOP (B)width (C)Left (D)Height2、将命令按钮Command1设置为不可见,应修改该命令按钮的()属性。
(A)Visible (B)Value (C)Caption(D)Enabled3、()对象具有clear⽅法。
(A)图⽚框(B)窗体(C)复选框(D)列表框4、启动VB后,就意味着要建⽴⼀个新()。
(A)窗体(B)⽂件(C)⼯程(D)程序5、下列()对象不具有Clear⽅法。
(A)列表框(B)组合框(C)剪贴框(D)图⽚框6、组合框有三种风格,它们由Style属性所决定,其中为简单组合框时,Style 属性值应为()(A)0 (B)1 (C)2 (D)37、下列可调整图⽚框的⼤⼩以适合图⽚的属性是()(A)Stretch (B)autosize (C)picture (D)oledropmode 8、要想清除⽂本框中的内容则可利⽤()进⾏。
(A)Caption (B)Text (C)Clear (D)Cls9、在⽂本框控件中将Text的内容全部显⽰为所定义的字符的属性是()。
(A)Password (B)PasswordChar(C)需要编程来实现(D)以上都不是10、Visual Basic是⼀种⾯向对象的程序设计语⾔,所采⽤的编程机制是()。
(A)从主程序开始执⾏(B)按过程顺序执⾏(C)事件驱动(D)按模块顺序执⾏11、下列四项中合法的变量名是()。
(A)a-bc (B)a_bc (C)4abc (D)integer12、⽆论何种控件,共同具有的属性是()(A)Text (B)Name (C)Caption (D)ForeColor13、有程序代码如下:Text1.Text = "Visual Basic程序设计"则Text1、Text ,和"Visual Basic程序设计"分别代表()。
VB程序设计教程课后答案
![VB程序设计教程课后答案](https://img.taocdn.com/s3/m/1e40a505c281e53a5802ff2f.png)
1、 简述 VB6.0的主要特点 答:方便、直观的可视化设计工具;面向对象程序设计方法;事件驱动的编程机制;易学易用的应用程 序集成开发环境;结构化程序设计语言;完备的联机帮助功能;强大的多媒体、数据库和网络功能。 2、 当正常安装 VB6.0后,误把 Windows 子目录删除。当重新安装 Windows 后,是否需要再次安装 VB6.0? 答:要重新安装的。因为安装 VB6.0时,有些 VB 程序被系统自动安装在 Windows 目录下,所以一旦删 除 Windows 子目录,就必须重新安装 VB6.0。 3、 Visual Basic 6.0分为学习版、专业版和企业版,如何知道所安装的是哪个版本? 答:在 VB6.0的启动界面上,能显示对应的版本。 4、 叙述建立一个完整应用程序的过程 答:首先建立用户界面的控件对象(简称控件) ;然后对控件属性进行设置;再对控件事件过程及编程; 保存应用程序;程序调试和运行。 5、 Visual Basic 6.0有多种类型窗口,若要在设计时看到代码窗口,应怎样操作? 答:选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。 6、 当建立好一个简单的应用程序后, 假定该工程仅有一个窗体模块。 试问该工程涉及多少个要保存的文件? 若要保存该工程的所有文件, 应先保存什么文件?再保存什么文件?若不这样做, 系统会出现什么信息? 答:涉及两个文件要保存。先保存窗体文件(.frm) ,再保存工程文件(.vbp) 。若先保存工程文件,系统 也会先弹出“文件另存为”对话框,要求先保存窗体文件。 7、 保存文件时,若不改变目录名,则系统默认的目录是什么? 答:系统默认的目录是 VB98 8、 安装 Visual Basic 6.0后,帮助系统是否也已安装? 答:没有。VB6.0的帮助系统在两张光盘上,即 MSDN Library,其中还包含了 VC、VFP 等其他语言的帮 助系统。 9、 如何使用 Visual Basic 6.0的帮助系统? 答:最方便的方法是选定要帮助的内容,然后按 F1功能键,这时系统打开 MSDN Library 查阅器,直接 显示与选定内容有关的帮助信息。 10、 什么是类?什么是对象?什么是事件过程? 答:类是同类对象集合的抽象,它规定了这些对象的公共属性和方法; 对象是类的一个实例,对象包含三个要素:属性、方法和事件。 当在对象上发生了事件后,应用程序就要处理这个事件,而处理的步骤就是事件过程。 11、 属性和方法的区别是什么? 答:属性是对象的特征,方法是对象的行为。前者有值,可以被赋值或引用;后者没有值,表示能够执 行的操作。 12、 当标签边框的大小由 Caption 属性的值进行扩展或缩小时,应对该控件的什么属性进行何种设置? 答:将该控件的 Autosize 属性值设置为 true。 13、 在 VB6.0中,命令按钮的显示形式可以有标准的和图形的两种选择,它们通过什么属性来设置?若选 择图形的,则通过什么属性来装入图形?若已在规定的属性里装入了某个图形文件,但该命令按钮还是 不能显示该图形,而显示的是 Caption 属性设置的文字,应怎样修改? 答: 命令按钮的显示形式通过将 Style 属性值设置为 Graphical 来实现。 通过 Picture 属性来装入图形。 不
VB程序设计教程 习题解答
![VB程序设计教程 习题解答](https://img.taocdn.com/s3/m/078ac027a6c30c2259019eb8.png)
《VB程序设计教程》(第4版)习题解答单元一巩固与提高答案一、选择题1. Visual Basic 6.0分为3种版本,不属于这3种版本的是A)学习版B)专业版C)企业版D)业余版【答】D。
2. 下列方法中不能退出Visual Basic的是A)按Alt+Q组合键B)按下Alt+F组合键,然后按Esc键C)按F10键,然后按F键,再按X键D)打开“文件”菜单→“退出”命令【答】B。
3. Visual Basic集成的主窗口中不包括A)属性窗口B)标题栏C)菜单栏D)工具栏【答】A。
4. 下列操作可以打开立即窗口的是A)Ctrl+D B)Ctrl+F C)Ctrl+G D)Ctrl+E【答】C。
二、填空题1. 与传统的程序设计语言相比,Visual Basic最突出的特点是____。
【答】事件驱动编程机制。
2. 如果不使用鼠标,用键盘打开菜单和执行菜单命令,第一步应按____键。
【答】功能键F10或Alt键。
3. 建立一个新的标准模块,应该选择____菜单下的“添加模块”命令。
【答】“工程”菜单。
三、思考题1. 简述Visual Basic的特点。
【答】与一般的程序设计语言相比,VB具有以下特点:(1) 可视化的设计平台;(2) 面向对象的设计方法;(3) 事件驱动的编程机制;(4) 结构化的设计语言;(5) 充分利用Windows资源;(6) 开放的数据库功能与网络支持。
2. 简述Visual Basic集成开发环境的组成。
【答】VB 6.0集成开发环境除了具有标准Windows环境的标题栏、菜单栏、工具栏外,还有工具箱、属性窗口、工程管理器窗口、窗体设计器、立即窗口、窗体布局窗口等有用的开发工具。
(1) 标题栏和菜单栏:标题栏中显示的有窗体控制菜单图标、当前激活的工程名称、当前工作模式以及最小化、最大化∕还原、关闭按钮。
菜单栏中显示了“文件”、“编辑”、“视图”、“工程”、“格式”等菜单项,其中包含了VB编程的常用命令。
VB程序设计试题及答案(一)
![VB程序设计试题及答案(一)](https://img.taocdn.com/s3/m/2047c572f46527d3240ce0b6.png)
VB程序设计试题及答案(一)一、单选题1. VB6.0是一种面向B 的编程环境。
(A) 机器(B) 对象(C) 过程(D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句是正确的。
(A) Forml.Caption=“欢迎使用VB”(B) Forml.Caption='欢迎使用VB'(C) Forml.Caption=欢迎使用VB(D) Forml.Caption="欢迎使用VB"3. 若要使命令按钮不可操作,要对A 属性进行设置。
(A) EnabIed (B)Visible(C) Backcolor (D)Caption4. 如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。
(A) Change (B) LostFocus(C) KeyPress (D) GotFocus5. 下面A 是合法的变量名。
(A) X_yz (B) 123ab。
(C) integer (D) X-Y6. 以下关系表达式中,其值为False的是A 。
(A) "ABC">"AbC" (B) "女">"男"(C) "BASIC"=UCase("basic) (D) "123"<"23"7. 为了给x、y、z三个变量赋初值1,下面正确的赋值语句是A 。
(A) x=1:y=1:z=1 (B) x=1,y=1,z=1(C) x=y=z=1 (D) xyz=18. VB提供了结构化程序设计的三种基本结构,三种基本结构是D 。
(A)递归结构、选择结构、循环结构(B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D)选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是 D 。
vb程序设计书习题和参考答案
![vb程序设计书习题和参考答案](https://img.taocdn.com/s3/m/398a1ceb27d3240c8547ef8b.png)
vb程序设计书习题和参考答案练习题习题一一、判断题1.Visual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。
2.面向对象的程序设计是一种以对象为基础,由事件驱动对象的编程技术。
3.事件是由Visual Basic预先定义的对象能够识别的动作。
4.新建工程时系统会自动将窗体标题设置为Form1。
5.控件的属性值不能够在程序运行时动态地修改。
6.决定对象是否可见的属性为Visible属性,决定对象可用性的属性是Enabled属性。
7.保存Visual Basic文件时,若一个工程包含多个窗体或模块,则系统先保存工程文件,再分别保存窗体或模块文件。
8.单击“启动”菜单项将窗体装入内存时,一定触发窗体的Load事件。
9.“事件过程”是用来完成事件发生后所要执行的程序代码。
10.在打开某窗体时,初始化该窗体中的各控件,应选用Load事件。
二、选择题1.工程文件的扩展名为。
A、.frxB、.basC、.vbpD、.frm2.下列不属于对象的基本特征是。
A、属性B、方法C、事件D、函数3.在设计模式双击窗体将显示的窗口是A、工程窗口B、工具箱C、代码窗口D、属性窗口4.VB中运行程序的快捷键是A、F2B、F5C、Alt+F3D、F85.改变控件在窗体中的上下位置应修改该控件的属性。
A、TopB、LeftC、WidthD、Right6.窗体模块的文件扩展名是A、.exeB、.basC、.frxD、frm7.设置窗体的字体用属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic8.设置窗体的字号用属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic 9.下列选项中不属于事件的是。
A、DblclickB、LoadC、ShowD、KeyUp10.VB编制的程序保存在磁盘上,至少会产生何种文件。
A、.doc与.txtB、.com与.exe.C、.bat与.frmD、.vbp与.frm三、程序设计题1.新建一个工程,单击窗体时,在窗体上显示“欢迎使用Visual Basic程序”。
(完整word版)VB程序设计试题题库及答案.doc
![(完整word版)VB程序设计试题题库及答案.doc](https://img.taocdn.com/s3/m/a70165da1eb91a37f1115cfc.png)
VB程序设计笔试题题库一、选择题1 下列常量中,是 Integer类型常量的是(C )。
A、123&B、-38844C、123%D、327682 下面选项中 () 是字符连接运算符 . ( A )A、&B、AndC、%D、Mod3下面关于 VB 的集成开发环境( IDE )的叙述中,不正确的是(B )。
A、IDE是设计、调试、运行 VB程序的工具。
B、用户不能随意关闭 IDE中的窗口。
C、" 窗体设计 " 窗口是用来设计应用程序界面(窗体)的。
D、打开 / 关闭各窗口的命令主要在 IDE的" 视图 " 菜单中。
4 len( “程vb序设计”)=( C ) 。
A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$( “123456”,3,2)执行后, A= ( A )。
A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时 , 用来分隔每条语句的符号是 ( C ).A、,B、;C、:D、、8 将逻辑型数据转换成整型数据时,转换规则是( D )。
A、将 True 转换为 1 ,将 False 转换为 0B、将 True 转换为 1 ,将 False 转换为 -1C、将 True 转换为 0 ,将 False 转换为 -1D、将 True 转换为 -1 ,将 False 转换为 09 表达式 2+3*4^5-SIN(X+1)/2 中最先进行的运算是 ( D ).A、SINB、4^5C、3*4D、x+110 如果 x=2 ,则表达式 x+1>2 Or sin(x)>0.9 And 3>x+3 的值( B )。
A、不能计算B、 TrueC、5D、False11 随机产生 [10,50] 之间整数的正确表达式是( D )。
VB程序设计练习题及参考答案
![VB程序设计练习题及参考答案](https://img.taocdn.com/s3/m/e4444ee79f3143323968011ca300a6c30c22f117.png)
VB程序设计练习题及参考答案visualbasic程序设计练习题一、填空1.当进入vb集成环境,发现没有显示“工具箱”窗口时,应选择菜单的选项,使“工具箱”窗口显示。
2.在BMP图形文件之后加载命令按钮的图片属性时,所需的图形不会显示在选项按钮上,因为该属性未设置为1(图形)。
3.在文本框中,通过属性能获得当前插入点所在的位置。
4.要编辑文本框中的现有内容,请按键盘上的键,但该键不起作用,因为该属性已设置为true。
6.在vb中,1234、123456&、1.2346e+5、1.2346d+5四个常数分别表示、、、。
7.整数变量x存储两位数。
要交换两个数字的位置,例如,13变为31,表达式为。
8.表示x是5的倍数或是9的倍数的逻辑表达式为。
9.如果a=3.5、B=5.0、C=2.5和d=true,则表达式a>=0anda+C>B+3ornotd的值为。
10.int(-3.5)、int(3.5)值分别是、。
11.表达式ucase(mid(\的值是。
12.要将以下语句循环20次,循环变量的初始值应为:fork=to-5step-213.下面程序段显示个“*”。
fori=1到5 Forj=1打印\nextjnexti14.复选框属性设置为2-grayed时,变成灰色,禁止用户选择。
15.属性设置为1,单选按钮和复选框的标题显示在左边。
16.属性设置为1,单选按钮和复选框以图形方式显示。
17.程序运行时,如果框架属性设置为false,框架标题为灰色,表示框架内的所有对象均被屏蔽,不允许用户对其进行操作。
18.列表框中项目的序号是从开始的。
19.指示列表框中最后一项的序列号。
20.方法可以清除列表框中的所有内容。
21.组合框是组合了文本框和列表框的特性而形成的一种控件。
风格的组合框不允许用户输入列表框中没有的项。
22.VB程序存储在模块中,模块分为______________三种类型。
123.如果希望每15秒生成一次计时器事件,interval属性应设置为。
VB程序设计编程考试题及答案
![VB程序设计编程考试题及答案](https://img.taocdn.com/s3/m/b2e6548070fe910ef12d2af90242a8956becaac0.png)
VB程序设计编程考试题及答案1。
输入3个数,输出最大的数2。
有一元二次方程:aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根3。
输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜!成绩通过!”,若小于60,则弹出消息框,显示“抱歉!成绩没有通过!4。
输入学生的百分制成绩,转换输出为五级制成绩,90~100分转换为优秀,80~89转换为良好,70~79转换为中等,60~69转换为及格,0~60转换为不及格。
5。
随机产生一个三位正整数,然后逆序输出,产生的数与逆序数同时显示。
例如,产生246,输出是642。
6。
输入两个整数,求它们的最大公约数。
7.分别统计1—100中,满足3的倍数、7的倍数的数各有多少。
8。
输入一串字符,统计其中字母A(不区分大小写)出现的次数。
9.我国目前有13亿人口,按人口年增长率0.8%计算,多少年后我国人口将超过26亿。
10。
小猴有桃若干,第一天吃掉一半多一个;第二天吃剩下桃子的一半多一个;以后每天都吃尚存桃子的一半多一个,到第7天只剩一个,问小猴原有桃多少?11.百元买百鸡问题。
假定小鸡每只5角,公鸡每只2元,母鸡每只3元,编程求解购鸡方案。
12。
编程求斐波那契数列前11项。
(斐波那契数列:F(0)=f(1)=1, F(n)=F(n—1)+F(n —2) n〉=2 )13。
已知有序数组a(),编程插入x(x的值为14)。
数组a中的元素分别为{12,6,4,89,75,63,100,20,31}。
14。
找出被3、5、7除,余数均为1的最小的5个正整数。
15利用随机函数产生50~100范围内的20个随机数,显示其中的最大值、最小值和平均值. 16。
编一函数,统计字符串中汉字的个数。
1.输入3个数,输出最大的数Private Sub command1_click()Dim maxFor i = 1 To 3n = Val(InputBox("输入第" &i &"个数"))If n > max Thenmax = nEnd IfNextPrint "三个数中最大的数是”; maxEnd Sub2.有一元二次方程:aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根Private Sub Command1_Click()Dim a,b, c,nb = Text2c = Text3n = b * b — 4 * a *cIf n >= 0 ThenLabel4 = ”方程有根”ElseLabel4 = ”方程无根”End IfEnd Sub3.输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜!成绩通过!”,若小于60,则弹出消息框,显示“抱歉!成绩没有通过!Private Sub Form_Load()Text1 = ""End SubPrivate Sub Command1_Click()Dim nn = Text1If n 〉60 ThenVal (MsgBox("恭喜!成绩通过!"))ElseVal (MsgBox(”抱歉!成绩没有通过!"))End IfEnd Sub4.输入学生的百分制成绩,转换输出为五级制成绩,90~100分转换为优秀,80~89转换为良好,70~79转换为中等,60~69转换为及格,0~60转换为不及格。
VB程序设计练习题及参考答案
![VB程序设计练习题及参考答案](https://img.taocdn.com/s3/m/c3e96327cfc789eb172dc8f2.png)
Visual Basic程序设计练习题1.Visual Basic是一种面向对象的可视化程序设计语言,采取了A的编程机制。
A.事件驱动B.按过程顺序执行C.从主程序开始执行D.按模块顺序执行2.在Visual Basic中最基本的对象是C,它是应用程序的基石,是其他控件的容器。
A.文本框B.命令按钮C.窗体D.标签3.多窗体程序是由多个窗体组成。
在缺省情况下,VB在应用程序执行时,总是把B 指定为启动窗体。
A.不包含任何控件的窗体B.设计时的第一个窗体C.包含控件最多的D.命名为Frm1的窗体4.若有程序代码如下:text1.text="Visual Basic"则:text1,text和"Visual Basic" 分别代表C。
A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值5.Visual Basic是一种面向对象的程序设计语言,A不是面向对象系统所包含的三要素。
A.变量B.事件C.属性D.方法6.在VB集成环境创建VB应用程序时,除了工具箱窗口、窗体中的窗口、属性窗口外,必不可少的窗口是C。
A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口7.保存新建的工程时,默认存放的位置是B。
A.My Documents B.VB98 C.\ D.Windows 8.若要使标签控件显示时不覆盖其背景内容,要对D属性进行设置。
A.BackColor B.BorderStyle C.ForeColor D.BackStyle 9.若要使命令按钮不可操作,要对A属性设置。
A.Enabled B.Visible C.BackColor D.Caption 10.文本框没有D属性。
A.Enabled B.Visible C.BackColor D.Caption 11.不论何控件,共同具有的是B属性。
A.Text B.Name C.ForeColor D.Caption 12.要使Form1窗体的标题栏显示“欢迎使用VB”,以下D语句是正确的。
vb程序设计试题(含答案)
![vb程序设计试题(含答案)](https://img.taocdn.com/s3/m/9e81a9a22b160b4e777fcfc8.png)
第一套试题一、选择题〔每题 2 分,共 30 分〕1.在 VB环境中,工程文件的扩展名是 ( C )〔 A〕 .frm〔B〕.bas〔C〕.vbp〔D〕.frx2.下面 4 项中不属于面向对象系统三要素的是 ( A )〔 A〕变量〔B〕事件〔C〕属性〔D〕方法、/ 、Mod、 * 这 4 个算述运算符中,优先级别最低的是( C )〔 A〕 \〔B〕/〔C〕Mod〔D〕*4.要使 Print 方法在 Form_Load事件中起作用,要对窗体的 ( C ) 属性进行设置〔 A〕 BackColor〔B〕ForeColor〔 C〕 AutoRedraw〔D〕Caption5.不管何控件,共同具有的属性是 ( B )〔 A〕 Text〔B〕Name〔 C〕 ForeColor〔D〕Caption6.要使 Form1窗体的标题栏显示“欢送使用 VB〞,以下语句正确的选项是 ( D )A〕 Form1.Caption= “欢送使用 VB〞〔B〕Form1.Caption= ˊ欢送使用 VBˊ〔 C〕 Form1.Caption= 欢送使用 VB〔D〕Form1.Caption=〞欢送使用VB〞7.VB 提供了结构化程序设计的 3 种根本结构,这 3 种根本结构是 ( D )〔 A〕递归结构,选择结构,循环结构〔B〕选择结构,过程结构,顺序结构(C〕过程结构,输入、输出结构,转向结构〔D〕选择结构,循环结构,顺序结构8. 给变量赋值 a=123+MID(“123456〞 ,3,2) ,a 变量中的值是 ( D )〔 A〕“ 12334〞〔B〕123〔C〕12334〔D〕157 下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数,不正确的语句是 ( D )〔 A〕 If sex= “男〞 And age<40 And InStr(duty,“教授〞)>0 Then n=n+1B〕 If sex= “男〞 And age<40 And (duty= “教授〞 Or duty= “副教授〞 ) Then n=n+1〔 C〕 If sex= “男〞 And age<40 And Right(duty,2)=“教授〞Then n=n+1〔 D〕 If sex=“男〞 And age< 40 And duty= “教授〞 And duty= “副教授〞 Thenn=n+110. 假设要去除列表框的所有内容,可用来实现的方法是( C )〔 A〕 RemoveItem〔B〕Cls〔 C〕 Clear〔D〕以上均不可以11.要使时钟控件 Timer1 的 Timer 事件不起作用,以下正确的语句是 ( B ) 〔 A〕 Timer1.Visible=False〔B〕Timer1.Enabled=False〔 A〕 Timer1.Interval=1000〔D〕Timer1.Index=0引用列表框 (List1) 最后一个数据项应使用的语 ( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount)(D)List1.List(ListCount-1)13.如下数组声明语句,正确的选项是 ( B )〔 A〕 Dim a[3,4]As Integer 〔 C〕 Dim a(n,n) As Integer 〔B〕Dim a(3,4)As Integer 〔D〕Dim a(3,4)As Integer14.下面子过程语句说明合法的是 (A 、D )〔 A〕 Sub f1(ByVal n%) 〔 C〕 Function f1%(f1%) 〔B〕Sub f1(n%)As Integer 〔D〕Function f1(ByVal n%)15.假定有如下的命令按钮 ( 名称为 Command1)事件过程:Private Sub Command1_Click()x=InputBox(" 输入: " , " 输入整数 ")MsgBox"输入的数据是:〞,,〞输入数据:"+xEnd Sub16. 程序运行后,单击命令按钮,如果从键盘上输入整数10,那么以下表达中错误的是(A)〔 A〕x 的值是数值 10〔B〕输入对话框的标题是“输入整数〞(C〕信息框的标题是“输入数据: 10〞〔 D〕信息框中显示的是“输入的数据是:〞二、填空题〔每题 2 分,共 20 分〕1、当进入 VB集成环境后,发现没有显示“工具箱〞窗口,应选择视图菜单的工具箱选项,使“工具箱〞窗口显示。
VB程序设计练习册参考答案
![VB程序设计练习册参考答案](https://img.taocdn.com/s3/m/db2bd0310b4c2e3f5727633e.png)
参考答案第1章Visual Basic 简介一、选择题1、B2、C3、A4、D5、C6、A7、D8、C9、D 10、B11、C 12、B二、填空题1 过程对象事件驱动2 学习版专业版企业版企业版3 Alt+F4 Alt+Q4 设计运行中断5 设置在应用程序运行时,各窗体在屏幕上的显示位置6 内部(标准)7 资源管理器8 编译方式解释方式9 选择“视图/工具箱”命令10 print 或?“大家都来学用Visual Basic”11按字母序按分类序12编辑代码三、思考题略第2章Visual Basic程序设计概述一、选择题1、A2、A3、D4、D5、D6、C7、A 8、C 9、A 10、C 11、B 12、D13、C 14、C 15、B 16、B 17、D 18、B三、编程题1、(1)建立应用程序用户界面。
选择”新建”工程,进入窗体设汁器,在窗体中增加一个标签控件Labe11和两个命令按钮 Commandl 、 Comlnand2。
(2)设置对象属性,见表。
(可自由设置)3编写代码private sub command1_clicklabel1.visible=false1 窗体 控件2 Left Top Width Height3 Ctrl 或shift4 Scrollbars Multiline True Passwordchar5 事件过程6 在属性窗口设置 在代码窗口设置7 对象名 下划线 事件名8 Form_Click9 Form1.Hide10 界面设计 属性设置 代码编写 保存运行11 窗体文件 工程文件12 部件13 窗体文件 模块文件 类模块文件private sub command2_clicklabel1.visible=trueend sub2、Private Sub Command1_ClickIf Text1.Text<>””And Text2.Text<>””Then ′组合条件判断文本框是否为空Form1.Caption=Text1.Text & ″,″& Label2.Caption & ″″& Text2.Text End IfEnd Sub第3章Visual Basic程序设计基础一选择题1.B2.C3.D4.B5.B6.B7.D8.D9.C10.C11.D 12.C 13.D 14.D 15.A 16.D 17.D 18.D 19.C 20.C21.A22.D23.B24.A 25.B 26.A二、填空题1 our name is2 13 True4 字母数字下划线2555 56 07 Logx/log10/0.5+x^2或者Logx/log10/0.5+x*x8 0,1,2,3,49 x>=0 and x<10010 511 false12 6三、编程题1.提示:Ucase、Lcase的使用2.提示:属性设置中,“计算”按钮的default属性设为True.“清除”按钮的Cancel属性设为True.第4章数据输入输出一、选择题1、D2、A3、A4、B5、D6、B7、C 8、C 9、D 10、D二、填空题1. 1+1= 22+2=42. 500.00%3.将当前字体放大两倍4. 20-11-025. 11 1三、编程题1.提示:(1)流程图。
VB程序设计考试题库(2)
![VB程序设计考试题库(2)](https://img.taocdn.com/s3/m/435c93652f3f5727a5e9856a561252d380eb20c5.png)
VB程序设计考试题库(2)VB程序设计考试(2)一、单选题(每题1分,共50题)1.关于Visual Basic应用程序,正确的叙述是(未填)。
错误正确答案:AA.Visual Basic程序运行时,总是等待事件被触发B.Visual Basic程序设计的核心是编写事件过程的程序代码C.Visual Basic程序是以线性方式顺序执行的D.Visual Basic的事件可以由用户随意定义,而事件过程是系统预先设置好的2.可视化编程的基本过程主要有3步,这3个步骤是(未填)。
错误正确答案:CA.创建工程、设计界面、编写代码B.创建工程、编写程序、保存程序C.设计界面、设置属性、编写代码D.设计界面、编写代码、调试程序3.窗体上有一个按钮和一个文本框,程序执行后,在文本框中输入12345,单击按钮后的输出结果为(未填)。
Private Sub Command1_Click()Dim A As Integer,B As IntegerText1.SelStart=2Text1.SelLength=2A=Val(Text1.SelText)B=Len(Text1.Text)Print A*BEnd Sub错误正确答案:CA.68C.170D.11704.VB中可用(未填)语句产生一消息框。
错误正确答案:DA.InputBoxB.ShiftC.BothD.MsgBox5.在窗体Form1的标题栏中显示“VisualBasic窗体"的命令是(未填)。
错误正确答案:C/doc/5173e546f68a6529647d27284b73f24 2336c3184.html ="VisualBasic窗体"B.Form1.Title="VisualBasic窗体"C.Form1.Caption="VisualBasic窗体"D.Form1.T ext="VisualBasic窗体6.以下(未填)是Visual Basic中合法的函数使用。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Vb简单应用题练习题第一题:打开指定文件夹下的工程文件vbsj3.vbp,在名称为Form1的窗体上已经添加一个名为lblClock 的标签控件和一个名称为timeClock的计时器控件;请将标签控件lblClock的Caption属性设为空串,BorderStyle属性设为1,再设置timeClock的适当属性,并编写适当的事件过程,使得在运行时,每隔一秒种在标签中显示的数字从1开始自动加1。
如图所示是程序开始运行时的界面。
请将程序中注释语句修改为正确代码,并删除注释符号;不能修改已有的程序内容,特别是不能改变程序中已有的变量名称。
注意:1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性,并将修改的结果以原文件名原位置存盘。
2.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
Option ExplicitPrivate nCount As LongPrivate Sub Form_Load()nCount = 1End SubPrivate Sub timeClock_Timer()lblClock = nCountnCount = nCount + 1End Sub第二题:打开指定文件夹下的工程文件vbsj3.vbp,在名称为Form1的窗体上已经添加一个名称为txtInput的文本框;两个标题分别为“对齐方式”、“字体”,名称分别为fraAlign、fraFont的框架控件;在fraAlign框架中画三个单选按钮,标题分别为“左对齐”、“居中”、“右对齐”,名称分别为optLeft、optCenter、optRight;在fraFont框架中画两个单选按钮,标题分别为“宋体”、“黑体”,名称分别为optSt、optHt。
要求:编写五个单选按钮的Click事件过程,使程序运行时,单击这些单选按钮,可以对文本框中的文字实现相应的操作效果,如图所示。
注意:1.不能修改其他代码行,并将修改的结果以原文件名原位置存盘。
2.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
3.程序中不得使用变量,每个事件过程中只能写一条语句。
Option ExplicitPrivate Sub optCenter_Click()txtInput.Alignment = 2End SubPrivate Sub optRight_Click()txtInput.Alignment = 1End SubPrivate Sub optLeft_Click()txtInput.Alignment = 0End SubPrivate Sub optHt_Click()txtInput.FontName = "黑体"End SubPrivate Sub optSt_Click()txtInput.FontName = "宋体"End Sub第三题:打开指定文件夹下的工程文件vbsj3.vbp,本程序的功能是输入用户名和密码。
要求程序运行时,在输入用户名的文本框txtUserName中输入的英文字符个数不超过10个且按回车键时,焦点自动定位到输入密码的文本框txtPassWord中;否则将文本框txtUserName的内容清空,焦点还是在文本框txtUserName中。
同时,若选中“显示密码”复选框,在文本框txtPassWord中输入密码时,文本框txtShowPwd中显示的是密码字符本身;若没有选中“显示密码”复选框,则文本框txtShowPwd显示的是“#”,如图所示。
在考生文件夹中给出的窗体文件vbsj3.frm中已经添加了全部的控件,但程序不完整。
请去掉程序中的注释,将其中的?改为正确的内容。
注意:1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性,并将修改的结果以原文件名原位置存盘。
2.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
Option ExplicitPrivate Sub Form_Load()Form1.ShowtxtUserName.SetFocusEnd SubPrivate Sub txtPassWord_Change()If chkShowPwd.Value = 1 ThentxtShowPwd.PasswordChar = ""ElsetxtShowPwd.PasswordChar = "#"End IftxtShowPwd.Text = txtPassWord.TextEnd SubPrivate Sub txtUserName_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenIf Len(Trim(txtUserName.Text)) > 0 ThentxtPassWord.SetFocusElseMsgBox "用户名不能为空!", vbCritical, "警告"txtUserName.SetFocusEnd IfEnd IfEnd Sub第四题:打开指定文件夹下的工程文件vbsj3.vbp,已经添加全部控件,其中“+”、“-”、“×”、“÷”对应的单选按钮为一个控件数组。
程序的功能是根据水平滚动条hsbNum1和hsbNum2的当前值作为运算数,当单击命令按钮cmdCalc时可分别进行加、减、乘、除运算,并将运算的结果显示在标签lblOpResult中,程序运行时的界面如图所示。
请在设计模式下分别设置水平滚动条hsbNum1和hsbNum2的Max、Min属性的值分别100、1;设置“+”对应的单选按钮控件当前为选中状态。
该程序不完整,请去掉程序中的注释符,并把?改正为正确内容,使其能够正确运行。
注意:1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性,并将修改的结果以原文件名原位置存盘。
2.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
Option ExplicitPrivate Sub cmdCalc_Click()Dim i As Integer, Result As IntegerDim opt As StringFor i = 0 To 3If optOperator(i).Value = True Thenopt = optOperator(i).CaptionEnd IfNextSelect Case optCase "+"Result = hsbNum1 + hsbNum2Case "-"Result = hsbNum1 - hsbNum2Case "×"Result = hsbNum1 * hsbNum2Case "÷"Result = hsbNum1 / hsbNum2End SelectlblOpResult.Caption = Str(hsbNum1.Value) & opt & Str(hsbNum2.Value) & "=" & Str(Result) End Sub第五题:打开指定文件夹下的工程文件为vbsj3.vbp,相应的窗体文件文件为vbsj3.frm,包含了所有的控件和部分程序,程序的功能是:当选择“考试科目”、“考试形式”后,单击“确定”按钮,在文本框txtContents中显示选中的“考试科目”和“考试形式”的内容;若没有选择相应的项目,将以消息框进行提示。
要求:(1) 利用属性窗口向列表框lstSubjects添加“二级VB”、“二级VFP”、“二级网页设计”、“二级C”四个项目作为考试科目;同时将窗体只保留“关闭”按钮。
程序运行时的界面如图所示。
(2) 将程序代码中注释符号去掉,其中的?修改为正确的程序代码,保证程序能正常运行。
注意:1. 1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性,并将修改的结果以原文件名原位置存盘。
2. 在结束运行之前,必须至少要进行一次选择操作(包括列表框和单选按钮),退出程序时通过单击窗体右上角的关闭按钮。
3.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
Option ExplicitPrivate Sub cmdOK_Click()If lstSubjects.ListIndex >= 0 ThenIf optBs.Value = True ThentxtContents.Text = lstSubjects.List(lstSubjects.ListIndex) & optBs.Caption ElseIf optSj.Value = True ThentxtContents.Text = lstSubjects.List(lstSubjects.ListIndex) & optSj.Caption ElseMsgBox "请鼠标单击选择其中的一种考试形式!", vbOKOnly, "提示"End IfElseMsgBox "请单击鼠标选择考试科目的其中一项!", vbOKOnly, "提示"End IfEnd Sub第六题:打开指定文件夹下的工程文件为vbsj3.vbp,在窗体中已添加全部控件。
程序的功能是当单击“添加”按钮时,将窗体上左侧列表框(名称为lstPending)同时选中的多个不连续的列表项移动到右侧列表框(名称为lstSelected)中;当单击“删除”按钮时,将右侧列表框lstSelected 选中的一个列表项移动到左侧列表框lstPending中。
程序运行时的界面如图所示。
要求:(1) 通过属性窗口,设置列表框控件lstPending可以同时选择不连续的多个列表项;(2) 窗体文件中的程序代码不完整,请将其中的注释符去掉,并将?修改为正确的代码,保证程序能够正常运行。
注意:1.不能修改除注释语句以外的其他代码行和已经设置好的控件属性,并将修改的结果以原文件名原位置存盘。
2.若涉及给对象属性赋值,必须指定属性名,不可使用对象的默认属性。
Option ExplicitPrivate Sub cmdAdd_Click()Dim k As Integerk = 0While (k < lstPending.ListCount)If lstPending.Selected(k) = True ThenlstSelected.AddItem lstPending.List(k)lstPending.RemoveItem kEnd Ifk = k + 1WendEnd SubPrivate Sub cmdRemove_Click()lstPending.AddItem lstSelected.TextlstSelected.RemoveItem lstSelected.ListIndexEnd Sub第七题:打开指定文件夹下的工程文件是vbsj3.vbp,窗体上已经添加部分控件和程序代码,程序运行时的界面如图所示。