vb题库第三章

1、87题下列可作为Visual Basic变量名的是（D）。A.a#a B.4aC.?xy D.C.onst_a为了描述x>y和y>z同时成立，则下述选项中，正确的是（D）。A.x>y .and Y>z B.x>y>zC.x>y and >zD.x>y and y>z下列（B）是日期型数据。A.Januaryl0，1997B.#Januaryl0，1997#C. Januaryl0，1997 D.&Januaryl0，1997&名称（D）表示变体类型数据。A.DoubleB.CurrencyC.BooleanD.Vari

2、ant在表示字符串时，可作为字符串尾部符号的是（D）。A.#B.!C.&D.$在一个语句行内写多条语句时，语句之间应该用（D）分隔。A.逗号B.分号 C.顿号 D.冒号Visual Basic的逻辑类型数据占（A）字节内存。A.2B.4C.8D.16在代码编辑器中，如果一条语句太长，无法在一行内写下(不包括注释)，要折行书写，可以在行末使用续行字符（A），表示下一行是当前行的继续。A.一个空格加一个划字符( _) B.一个划字符(_)C.直接回车D.一个空格加一个连字符( -)表达式1.5+32>2 Or 7 Mod3 < 4 and Not 1的运算结果是（A）。A.-1

3、B.0C.1D.其他表达式4+5 6 * 7 / 8 Mod 9 的值是（B）。A.4B.5C.6D.7表达式Left( how are you ，3)的值是（A）。A.howB.areC.youD.how are you表达式Int(5*Rnd+1)*Int(5*Rnd-1)的值的范围是（D）。A.0,15B.-1,15C.-4,15D.-5,15满足 当x的值是偶数时为真，奇数时为假 要求的表达式是（D）。A.x Mod 2=0B.Not x Mod 2<>0C.x2*2-x)=0D.Not(x Mod2)函数Ucase( Basic )的值为（D）。A.BasicB.basi

4、cC.BasiCD.BASIC可以同时删除字符串前导和尾部空白的函数是（C）。 A.LtrimB.RtrimC.TrimD.Mid如果逻辑与(A.nD.)运算的结果为 真 ，与它所连接的两个条件必须是（C）。A.前一个为 真 ，后一个为 假 B.前一个为 假 ，后一个也为 假 C.前一个为 真 ，后一个也为 真 D.前一个为 假 ，后一个为 真 设A=3，B=5，则以下表达式值为真的是（B）。A.A>=B and B>10B.(A>B) Or (B>0)C.(A<0) Or (B<0)D.(-3+5>A) and (B>0)可获得当前系统日期的函

5、数是（A）。A.Date( )B.Time( )C.IsDate( )D.Year( ) 下列不能作为VB中的变量名的符号是（C）。A.A45B.P12C.89TaD.xy函数rnd用于产生随机数，其结果范围是（B） 。A. (0,1)B. 0,1)C. (0,1D. 0,1在一个语句内写多条语句时，每个语句之间用（B）符号分隔。A.。B.：C.*D.；下面（A）是合法的单精度型变量。A.Kum!B.sum%C. mytm$D.Km#下列关于变体类型的叙述正确的是（C） 。A.变体不是一种数据类型 B.变体是赋给某一种类型数值后，就不能再赋给它另一类型数值C.该种数据类型在使用过程中是可以变化

6、的，VB自动完成类型转换 D.变体的空值就表示该变体的值为0表示学习成绩(score)在75分和90分之间的逻辑表达式是（A）。Ascore>=75 And score<=90Bscore>=75 0r score<=90Cscore<=75 And score>=90Dscore<=75 0r score>=90语句PRINT 5/4*65 mod 2的输出结果是（B）。A.0B.1C.2D.3在、/、Mod、*等4个算术运算符中，优先级最低的是（C）。A.B./C.ModD.*表达式Mid(“SHANGHAI”,6,3)的值是（D）。A.SH

7、ANGHB.SHAC.ANGHD.HAI在VB中，对于未定义的变量，系统默认类型是（D）变量。A.整型B.字符型C.日期型D.变体型abc，abc!，abc$，abc#分别声明abc是（A）。A整型、单精度、字符串、双精度变量B整型、整型、字符串、双精度变量C单精度、整型、字符串、双精度变量D整型、双精度、字符串、双精度变量可获得当前系统日期的函数是（A）。A.Date()B.Time()C.IsDate()D.Year()假设A=3,B=7,C=2,则表达式NOT(B*A)的值是（B）A.True B.False C.表达式错误 D.不确定用于获得字符串S从第5个字符开始的3个字符的函数是（

8、A）。A.Mid(S,5,3)B.Middle(S,5,3)C.Right(S,5,3)D.Left(S,5,3)X是小于100的非负数，用VB表达式表达正确的是（C）。A.0X100B.0<=X<100C.0<=X and X<100D.0X<100下列符号中哪个是VB程序中合法的变量名（A）。A.ab7B.7abC.IfD.a*bc用于去掉字符串左右两边的空格的函数是（B）。A.Ltrim()B.Trim()C.Left()D.Instr()标准模块文件的扩展名是（C）。A.frmB.vbpC.basD.vbg表达式Abs(-5)+Len("ABCD

9、E")的值是（C）。 A.5ABCDEB.-5ABCDEC.10D.0 表达式X+I>X是（D）。A.算术表达式B.非法表达式C.字符串表达式D.关系表达式 在VB中，下列（C）是不合法的循环语句。A.ForNextB.Do UntilLoopC.DowhileD.DoLoop设m=1，n=2，o=3，p=4，下列表达式的值是（A）。m>o-3 And p<n Or o Mod nA.-1B.0C.1D.FALSEVisual Basic布尔运算符Xor，Or，Eqv，And中，级别最高的运算符是（D）。A.XorB.OrC.EqvD.And下列

10、符号（A）是Visual Basic中的合法变量名。A.x23B.8xyC.ENDD.X8B变量未赋值时，数值型变量的值为（A）。A.0B.空串""C.NullD.没任何值表达式"Turbo"+"c">"Ture"+"Basic"的值是（B）。A.TRUEB.FALSEC.NullD.出错信息表达式25.28 Mod 6.99的值是（B）。A.1B.4C.5D.出错表达式Abs(-5)+Len("ABCDE")的值是（C）。A.5ABCDEB.-5ABCDEC.10D.

11、0在以下4个逻辑表达式中，其逻辑值为“真”的是（D）。A.Not(3+4<4+6)B.2>1 And 3<2C.1>2 Or 2>3D.Not(1>2)假设变量boolVar是一个布尔型变量，则下面正确的赋值语句是（D）。A.boolVar="True" B.boolVar=.True.C.boolVar=#True#D.boolVar=3<4有如下程序： a$="Flying"：b$="IS"：c$="funny!" Print a$+" "+Lcas

12、e$(b$)+" "+Ucase$(c$) End 运行后，输出结果是（B）。A.Flying Is funny!B.Flying is FUNNY!C.Flying IS FUNNY!D.FLYING IS FUNNY!设有如下变量声明： Dim TestDate As Date 为变量TestDate正确赋值的表达方式是（A）。A.TestDate=#1/2002#B.TestDate=#"1/1/2002"#C.TestDate=date("1/1/2002")D.TestDate=Format("m/d/yy&quo

13、t;，"1/1/2002")下面的数组声明语句中( B )是正确的。A.Dim A3，4 As IntegerB.Dim A(3，4) As IntegerC.Dim A3；4 As IntegerD.Dim A(3；4) As Integer下列续行写法正确的是( B )。A.C=_A+B B.C= _A+B C.C =_A+B D.C=_'此处换行A+B 有如下程序： Const st$=""CHINA"" St$=""GREAT"" Print st$ 运行后输出的结果是( D )

14、。A.CHINA BeijingB.GREATC.HebeiD.显示出错信息 下列语句正确的是( B )。A.MsgBox("请输入查询的姓名："，"256+3+48")B.MsgBox "请输入查询的姓名："，256+3+48C.X=MsgBox(请输入查询的姓名：，vbYesNoCancel)D.X=MsgBox("请输入查询的姓名："，"310")下述程序段的运行结果是( A )。 X=-2.3 y=125 z=Len(Str$（x）+Str$（y）) Print zA.8B.6C.4D.

15、3下面四个语句中，正确的赋值语句是( A )。A.a=a + cBa +c=aCc +a=aDac=a将Cos（y）四舍五入保留3位小数的表达式是( C )。A.Int(Cos（Y）+0.5)*1000)/1000B.Int(Cos(Y*1000)/1000+0.5C.Int(Cos（Y）*1000+0.5)/1000D.Int(Cos(Y*1000)+0.5)/1000设a=6，则执行 x=iif(a>5,-1,0)后，x 的值为( D )。 A.5B.6C.0D.-1有如下语句： Type Student Name As String Age As Integer Sex As St

16、ring End Type Dim Stu As Student With Stu .Name = ""张红"" .Age = 22 .Sex = ""女"" End With 执行Print Stu.Age后的结果是( B )。 A.张红B.22C.“女”D.Age语句X=X+1的正确含义是( C )。A.变量X的值与X+1的值相等B.将变量X的值存到X+1中去C.将变量X的值加1后赋给变量XD.变量X的值为1有如下程序： a=3：b=4 Print b>a End 运行后，输出结果是( A )。A.Tur

17、eB.FALSEC.4>3D.显示出错信息在4个字符""D"",""x""，""A""，""e""中，其ASCII码值最大的是( B )。A.DB.xC.AD.e以下语句的输出结果是( C )。 Print Format $(32548.5,""000,000.00"") A.32548.5B.32548.5C.32548.5D.32548.5在窗体上添加一个命令按钮和一个文本框，并在命令按

18、钮中编写如下代码： Private Sub Command1_Click( ) A=1.2 C=Len(Str$（A）+Space(10) Text1.text=C End Sub 程序运行后，单击命令按钮，在文本框中显示( C )。 A.3B.8C.14D.10在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() a = Ucase$(Text1.Text) + Left$(Text2.Text，2) Print a End Sub Priva

19、te Sub Form_Load() Text1.Text = ""aB"" Text2.Text = ""123456"" End Sub 程序运行后，单击命令按钮，输出结果为( B )。 A.Ab12B.AB12C.AB56D.Ab56在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下程序： Private Sub Command1_Click() X = 0 Do While X < 10 X = (X + 1) * (X

20、 + 2) n = n + 1 Loop Text1.Text = Str（n） Text2.Text = Str（X） End Sub 程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是( B )。A.1 0B.2 12 C.2 72D.3 12执行如下语句： a=InputBox(""Today""，""Tomorrow""，""yesterday""，""Day before yesterday""，5)

21、 将显示一个输入对话框，在对话框的输入区中显示的信息是( C )。A.TodayB.TomorrowC.YesterdayD.Day before yesterday执行语句s=Len(Mid("VisualBasic",1,6)后，s的值是( C )。A.VisualB.BasicC.6D.11在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_Click() strText = InputBox(""请输入"")

22、Text1.Text = strTextEnd SubPrivate Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是( D )。A.空B.abcdefC.abc D.def在窗体上画一个命令按钮，然后编写如下事件过程，程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1，输出结果为( A )。 Private Sub Commandl_Click() x=0 DO Until x=-1 a=Val(I

23、nputBox(”请输入A的值”) b=Val(InputBox(”请输人B的值”) x=Val(InputBox(”请输入X的值”) a=a+b+x Loop Print a End SubA.2B.3C.14D.15在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click() c = 1234 c1 = Trim(Str（c）) For I = 1 To 4 Print( ) NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容1121231234则在下划线处应填入的内容为( B )。A. Right(c

24、1,I)B.Left(c1,I)C.Mid(c1,I,1)D.Mid(c1,I,I)下面( D )不是字符串常量。A."你好"B." "C."TRUE"D.#False#选拔身高T超于1.7米且体重W小于62.5千克的人，能表示该条件的布尔表达式是( C )。A.T>1.7 And W<=62.5B.T<=1.7 Or W>=62.5C.T>1.7 And W<62.5D.T>1.7 Or W<62.5执行以下程序段后，变量C$的值为( D )。 A$=""Visual Basic Programing"" B$=""Quick"" C$=B$ & Ucase(Mid$(A$，7，6) & Right$(A$，11)A.Visual BASIC ProgramingB.QuickBasic ProgramingC.QUIC