内容发布更新时间 : 2024/12/23 3:27:43星期一 下面是文章的全部内容请认真阅读。
12. 假定文本框的名称为Text1，则事件过程如下： Private Sub Text1_KeyPress(KeyAscii as Integer) If KeyAscii=13 then
If 出错条件判断成立 then Text1=‖‖ Text1.SetFocus End If ? End If End Sub
13. 这些代码一般放在窗体的Load事件过程中。将窗体定位在屏幕的中央，只能通过属性窗口对Form1窗口的StartUpPosition属性设置为2（表示屏幕的中心），该属性不能在运行时设置。
要将按钮定位在窗体的中央，事件过程如下： Private Sub Form_Load()
Command1.Left=Form1.ScaleWidth\\2-command1.Width\\2 Command1.Top=Form1.ScaleHeight\\2-command1.Height\\2 End Sub 第三章 一、选择题
1. 在一行上写多条语句时，每个语句之间用（ B ）符号分隔。
（A）， （B）： （C）、 （D）；
2. 一个语句要在下一行继续写，用（ C ）符号作为续行符。
（A）+ （B）- （C）_ （D）? 3. 下面（ A ）是合法的变量名。
（A）X_yz （B）123abc （C）integer （D）X-Y 4. 下面（ D ）是不合法的整常数。
（A）100 （B）&O100 （C）&H100 （D）0 5. 下面（ B ）是合法的字符常数。
13
（A）ABC$ （B）‖ABC‖ （C）’ABC’ （D）ABC 6. 下面（ A ）是合法的单精度型变量。
（A）num！ （B）sum% （C）xinte$ （D）mm# 7. 下面（ D ）是不合法的单精度常数。
（A）100！ （B）100.0 （C）1E+2 （D）100.0D+2 8. 表达式16/4-2^5*8/4 mod 5\\2的值为（ B ）。
（A）14 （B）4 （C）20 （D）2 9. 数学关系3≤x<10表示成正确的VB表达式为*（ B ）。
（A）3<=x<10 （B）3<=x and x<10 （C）x>=3 or x<10 （D）3<=x and <10
10. /、\\、Mod、*四个算术运算符中，优先级别最低的是（ C ）。
（A）\\ （B）/ （C）Mod （D）* 11. 与数学表达式
ab对应，VB的不正确表达式是（ D ）。 3cd（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函数不可能为下列（ B ）值。
（A）0 （B）1 （C）0.1234 （D）0.0005 13. Int（198.555*100+0.5）/100的值是（ C ）。
（A）198 （B）199.6 （C）198.56 （D）200
14. 已知A$=‖12345678‖，则表达式Val(Left$(A$,4)+Mid$(A$,4,2))的值为（ B ）。
（A）123456 （B）123445 （C）1279 （D）‖123445‖ 15. Print DateAdd(―m‖,1,#1/30/2000#)语句显示的结果是（ A ）。
（A）2000-2-29 （B）2000-2-28 （C）2000-2-30 （D）2000-3-1 16. 表达式DateDiff（‖d‖,#12/30/1999#,#1/13/2000#）的结果是（ C ）。
（A）1 （B）11 （C）14 （D）99 17. 表达式Len（‖123程序设计ABC‖）的值是（A ）。
（A）10 （B）14 （C）20 （D）17 18. 表达式LenB（‖123程序设计ABC‖）的值是（ C ）。
（A）10 （B）14 （C）20 （D）17 19. 设a=1,b=2,c=3,d=4，下面逻辑表达式的值为真的是（ C ）。
14
（A）Sqr(d)>b （B）Not(c-b)c and b>a （D）Abs(a-d) （A）/ （B）\\ （C）^ （D）Mod 21. 设a=‖visual basic‖，下面使b=‖basic‖的语句是（ B ）。 （A）b=Left(a,8,12) （B）b=Mid(a,8,5) （C）b=Right(a,5,5) （D）b=Left(a,8,5) 22. 从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位 置的函数是（ D ）。 （A）Left （B）Mid （C）String （D）Instr 23. 设a=2,b=3,c=4,d=5，表达式a>b and c<=d or 2*a>c的值是（ B ）。 （A）True （B）False （C）-1 （D）0 24. 设a=2,b=3,c=4,d=5，表达式3>2*b or a=c and b<>c or c>d的值是（ B ）。 （A）True （B）False （C）-1 （D）0 25. 设a=2,b=3,c=4,d=5，表达式not a<=c or 4*c=b^2 and b<>a+c的值是（ B ）。 （A）True （B）False （C）-1 （D）0 26. 假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是（ C ）。 （A）Print 25 （B）Picture1.Print 25 （C）Text1.Print 25 （D）Debug. Print 25 27. 语句Print 5*5\\5/5的输出结果是（ B ）。 （A）5 （B）25 （C）0 （D）1 28. 语句Print Sgn（-6^2）+Abs（-6^2）+Int（-6^2）的输出结果是（ C ）。 （A）-36 （B）1 （C）-1 （D）-72 29. 表达式4+5\\6*7/8 Mod 9的值为（B ）。 （A）4 （B）5 （C）6 （D）7 30. 设有整数x，如果Sgn（x）的值为-1，则x的值是（ B ）。 （A）整数 （B）大于0的整数 （C）等于0的整数 （D）小于0的整数 31. 可以同时删除字符串前导和尾部空白的函数是（ C ）。 （A）Ltrim （B）Rtrim （C）Trim （D）Mid 32. m，n是整数，且n>m，在下面的选项中，能将x赋值为一个m~n之间（含m,n）的任意数的语句是 15 （ A ）。 （A）x=Int(Rnd*(n-m+1))+m （B）x= Int(Rnd*n)+m （C）x=Int(Rnd*m)+n （D）x=Int(Rnd*(n-m))+m 33. VB6.0表达式‖123‖+Abs(1)的值是（ C ）。 （A）123-1 （B）1231 （C）124 （D）错误表达式 34. VB6.0表达式‖12a‖+Abs(1)的值是（ D ）。 （A）12b （B）12a1 （C）121 （D）错误表达式 35. 当用Const a%=19.8 定义后，a的值是（ C ）。 （A）19 （B）19.8 （C）20 （D）0 二、填空题 1. 在VB中，1234、123456&、1.2346E+5、1.2346D+5四个常数分别表示（ 整型，长整型，单精度、双精度 ）类型。 2. 整型变量x中存放了一个两位数，要将两位数交换位置，例如，13变成31，实现的表达式是（ （x mod 10）*10+x\\10）。 3. 数学表达式 a?b的VB算术表达式为（ (a+b)/(1/(c+5)-c*d/2) ）。 11?cdc?524. 表示x是5的倍数或是9的倍数的逻辑表达式为（ x mod 5=0 or x mod 9=0）。 5. 已知a=3.5，b=5.0，c=2.5，d=True，则表达式：a>=0 and a+c>b+3 or not d的值是（ false ）。 6. Int(-3.5)、Int (3.5)、Fix(-3.5)、Fix(3.5)、Round(-3.5)、Round(3.5)的值分别是（ -4,3,-3,3,-4,4 ）。 7. 表达式Ucase(Mid(―abcdefgh‖,3,4))的值是（CDEF ）。 8. 在直角坐标系中，（x，y）是坐标系中任意点的位置，用x与y表示在第一象限或第三象限的表达式是 （ x*y>0 ）。 9. 要以××××年××月××日形式显示当前机器内日期的Format函数表达式为 （ format(date,‖yyyy-mm-dd‖) ）。 10. 计算已近入21世纪有多少天的函数表达式是（ datediff(―d‖,date,‖2000-1-1‖)）。 11. 计算离你毕业（假定毕业时间为2006年6月28日）还有多少个星期的函数表达式是 （datediff(―w‖,date,‖2006-6-28‖) ）。 12. 表示s字符变量是字母字符（大小写字母不区分）的逻辑表达式为（ucase(s)>=‖A‖ and ucase(s)<=‖Z‖ ）。 13. VB6.0表达式Len（Left（\‖，3）+Right（‖商丘师范学院‖，4））的值是（ 7 ）。 14. 数学式2cos2y+e2x的VB6.0表达式是（2*cos(2*y)+exp(2*x)）。 16