1.对于窗体,下面()属性在程序运行时其属性设置起作用。
(A)MaxButton (B) BorderStyle (C) Name (D) Left2. 要使Print 方法在Form_Load事件中起作用,要对窗体的()属性进行设置。
(A)BackColor (B)ForeColor (C) AutoRedraw (D) Caption3. 要使标签控件显示时不覆盖其背景内容,要对()属性进行设置(A)BackColor (B)ForeColor (C) BorderStyle (D) BackStyle4. 要使命令按钮不可操作,要对()设置(A) Enabled (B)Visible (C) BackColor (D)Caption5. 文本框没有()属性(A)Enabled (B)Visible (C) BackColor (D)Caption6. 不论何控件,共同具有的是()属性(A)Text (B)Name (C) ForeColor (D)Caption7. 要使Form1窗体的标题栏显示”欢迎使用VB”,以下()语句正确。
(A)Form1.Caption=”欢迎使用VB”(B)Form1.Caption=’欢迎使用VB’( C) Form1.Caption=欢迎使用VB(D)Form1.Caption=”\欢迎使用VB”8. 要使某控件在运行时不可显示,应对()进行设置(A) Enabled (B) Visible (C) BackColor (D) Caption9 . 要使窗体在运行时不可以改变窗体的大小和没有最大,最小化按钮,只要对下面()进行设置。
(A)MaxButton (B) BorderStyle (C) Width (D) MinButton10. 当运行程序时候,系统自动执行启动窗体的()事件过程(A)Load (B)Click (C) Unload (D) GotFocus11. 当文本框的ScrollBars 属性设置了非零值,却没有效果,原因为(A)文本框中没有内容(B)文本框的MultiLine属性为False(C)文本框的MultiLine属性为True(D)文本框的Locked属性为True12. .要判断在文本框时否按了Enter键,应在文本框的()事件中判断(A)Change (B)KeyDown (C)Click (D)KeyPress13. 在VB集成环境创建VB应用程序时,除了工具箱窗口,窗体中的窗口,属性窗口外,必不可少的窗口是()(A)窗体布局窗口(B)立即窗口(C)代码窗口(D)监视窗口14. 保存新建的工程时,默认的路径是()(A) My Documents (B) VB98 (C) \ (D)Windows15. 当需要上下文帮助时,选择要帮助的“难题”,然后按()键,就可以出现MSDN窗口及所需帮助信息。
(A)Help (B) F10 (C) Esc (D) F116. 进入VB集成环境,发现美有显示“工具箱”,应选择()菜单的()选项,使“工具箱”窗口显示。
17.要使新建工程时,在模块的“通用声明”段自动加入Option Explicit语句,应对()菜单的()的()选项卡进行相应的选择。
18. 刚建立工程时,使窗体上的所有控件具有相同的字体格式,应对()的()属性设置。
19. 当对文本框的ScrollBar的属性设置为2,但美有滚动条显示,是因为没有对(multiline )属性设置为True 的原因20. 当对命令按钮的Picture属性装入.bmp图形文件后,选项按钮上并美有显示所需的图形,原因是没有对(style )属性设置为121. 若已建立了Form1,Form2两个窗体,默认启动窗体为Form1.通过()菜单的()的()选项卡,可将启动窗体设置为Form2,在程序中若要显示Form1窗体,则要执行( form1.show)语句。
22. 在文本框中,通过(selstart )属性能获得当前插入点所在的位置。
23. 要对文本框中已有的内容进行编辑,按下键盘上的按键,就是不起作用,原因是设置了( locked )的属性为True24. 在窗体上已建立了多个控件如Text1 Label1 Command1 若要使程序已运行焦点就定位在Command1控件上,应对Command1控件设置( TabIndex )属性的值为(0 )第二章练习题1. 在一个语句内写多条语句时,每个语句之间用()符号分隔。
(A), (B) : (C) 、(D);2. 一句语句要在下一行继续写,用()符号作为续行符。
(A)+ (B) - (C) _ (D)…3. 下面()是合法的变量名。
(A)X_YZ (B)123ABC (C)integer (D)X-Y4.下面()是不合法的整常数。
(A)100 (B)&O100 (C)&H100 (D)%1005.下面( )是合法的字符常数。
(A )ABC$ (B)”ABC ” (C)’ABC ’ (D)ABC 6. 下面( )是不合法的单精度型常数(A )100! (B)100.0 (C)1E+2 (D)100.0D+2 7. 下面( )是合法的单精度型变量(A )num! (B)sum% (C)xinte$ (D)mm# 8. 表达式16/4-2^5*8/4 MOD 5\2的值为( )(A )14 (B)4 (C)20 (D)2 9. 数学关系3<=x<10表示成正确的VB 表达式为( ) (A )3<=X<10 (B) 3<=X AND X<10 (C ) X>=3 OR X<10 (D) 3<=X AND <1010. \、/、MOD 、*四个算术运算符中,优先级别最低的是( ) (A ) \ (B) / (C) MOD (D) 、11. 与数学表达式cdab3对应,VB 的不正确表达式是( ) (A )a*b/(3*c*d) (B)a/3*b/c/d (C) a*b/3/c/d (D)a*b/3*c*d 12. Rnd 函数不可能为下列( )值(A ) 0 (B) 1 (C) 0.1234 (D)0.0005 13. Int(198.555*100+0.5)/100的值为( )(A) 198 (B) 199.6 (C)198.56 (D)200 14. 已知A$=”12345678” 则表达式Val(Left$(A$,4)+Mid(A$,4,2))的值为( ) (A ) 123456 (B)123445 (C) 8 (D) 6 15. Print DateAdd(“m ”,1,#1/30/2000#)语句显示的结果是( )(A )00-2-29 (B)00-2-28 (C)00-2-30 (D)00-1-31 16. 表达式DateDiff(“y ”,#12/30/1999#,#1/13/2000#)的结果是( ) (A )1 (B) 11 (C)14 (D) 99 17. 表达式Len(“123程序设计ABC ”)的值为( )(A )10 (B)14 (C)20 (D)17 18. 表达式LenB(“123程序设计ABC ”)的值为( )(A )10 (B)14 (C)20 (D)17 19. 下面正确的赋值语句是( )(A )X+Y=30 (B)Y=π*R*R (C) Y=X+30 (D)3*Y=X20.为了给X,Y,Z三个变量赋值为1,下面正确的赋值语句是()(A)X=1:Y=1:Z=1 (B) X=1,Y=1,Z=1(C) X=Y=Z=1 (D)XYZ=121.赋值语句:A=123+MID(“1234356”,3,2) 执行后,A变量的值为()(A)”12334” (B)123 (C) 12334 (D)15722.赋值语句:A=123 & MID(“1234356”,3,2) 执行后,A变量的值为()(A)”12334” (B)123 (C) 12334 (D)15721. 在VB中,1234,1234& ,1.2346E+5,1.2346D+5四个常数分别表示(),(),(),()类型。
22. 表示X是5的倍数或是9的倍数的表达式为()23. 已知A=3.5,B=5.0,C=2.5,D=True 则表达式:A>=0 AND A+C>B+3 OR NOT D的值为()24. int(-3.5),int(3.5),fix(-3.5),fix(3.5),round(-3.5),round(3.5)的值分别为多少()()()()()()25. 表达式Ucase(Mid(“abcdefgh”,3,4))的值为()26. 计算离你毕业还有多少个星期的函数表达式为()(假定毕业日期为7/1/2007)第三章练习题1. 下面程序运行后的结果为()x=int(rnd)+3if x^2 >8 then y=x^2+1if x^2=9 then y=x^2-2if x^2<8 then y=x^3print y2. 下面程序的功能为()Dim n%,m%Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii=13 thenIf IsNumeric(Text1) thenSelect Case Text1 Mod 2Case 0N=n+text1Case 1M=m+text1End SelectEnd ifText1=””Text1.SelFocusEnd ifEnd Sub3. 程序添空Dim count1%Private Sub Text1_KeyPress(KeyAscii As Integer)If ( ) =”(“ thenCount1=count1+1Elseif ( ) =”)” then( )end ifif keyascii=13 thenif ( ) thenPrint “左右括号配对“Elseif ( ) thenPrint “左括号多于右括号”; count1; “个”ElsePrint “右括号多于左括号”; -count1; “个”End ifEnd ifEnd sub4. 输入字符,统计有多少个元音字母,有多少其他字母,直到按了回车键结束并显示结果。
大小写不区分。
Dim County%, countc%Private Sub Text1_KeyPress(KeyAscii As Integer)Dim c$C=( )If “A”<=C AND C<=”Z” thenSelect Case ( )Case ( )County=county+1Case ( )Countc=countc+1End selectEnd ifIf then ( )Print “元音字母有”;county: “个”Print “其他字母有”;countc; “个”End ifEnd sub第四章练习题1. 以下()式正确的FOR….NEXT 的结构(A) for x=1 to step 10 (B)for x=3 to –3 step -3….. ……next x next x( C) for x=1 to 10 (D) for x=3 to 10 step 3 re: ……. …….Next x next yIf I=10 then goto re2. 以下循环能正常结束的是()(A)I=5 (B) I=1Do DoI=I+1 I=I+2Loop until I<0 loop until I=10( C) I=10 (D) I=6do doI=I+1 I=I-2Loop until I>0 loop until I=13. 下面程序运行的结果为()for I=3 to 1 step –1print spc(5-I);for j=1 to 2*I-1print “*”;next jprintnext I(A) * (B) ***** (C) ***** (D) ***** *** *** *** ******** * * *4. 当在文本框输入“ABCD”四个字符时候,窗体上显示的是() private sub text1_change( )print text1;end sub(A) ABCD (B) A (C) AABABCABCD (D)AB ABC ABCD ABCD5. 那个程序不能正确表示1!,2!,3!,4!的值()(A)For I=1 to 4 (B) For I=1 to 4N=1 for j=1 to iFor j=1 to I n=1N=n*j n=n*j Next j next jPrint n print nNext i next I(C ) n=1 (D) n=1for j=1 to 4 j=1n=n*j do while j<=4print n n=n*jnext j print nj=j+1loop6. 要使下列FOR语句循环执行20次,循环变量的初值应当为() For k= ( ) to -5 step -27. 下面程序段显示()个“*”For I=1 to 5For j=2 to IPrint “*”Next jNext i8. 以下程序运行后。