常用内部函数测试

1 以下不能输出“Program”的语句是______。

A．Print Mid("VBProgram"3,7)B．Print Right("VBProgram",7)

C．Print Mid("VBProgram",3)D．Print Left("VBProgram",7)

2 下面可以产生20-30（含20和30）的随机整数的表达式是_____。

A．Int(Rnd*10+20) B．Int(Rnd*11+20)

C．Int(Rnd*20+30）D．Int(Rnd*30+20)

3 求Sin65°应使用的正确表达式为______。

A．Sin(65) B．Sin65 C．Sin(65°) D．Sin(65*3.14159/180)

4 表达式Round (0.55)+Int(0.55)+Fix(0.55)的值为______。

A．0 B．1 C．2 D．3

5 下列能够正确表示x2+yx的表达式是______。

A．2^x+x^y B．x^2+Exp(x) C．x^2+Exp(x*Log(y)) D．Exp(2)+yExp(x)

6 已知string1=" Hello , world! "，函数Trim(string1)的结果是______。A．"Hello ，world! " B．" Hello ，world! "

C．"Hello ，world!" D．"Hello,world! "

7 表达式Left("You are welcome! "，3)的值是______。

A．You B．are C．wel D．me!

8 函数Len(Space(4)+String(3,"c"))返回的值是______。

A．7 B．9 C．4 D．3

9 函数String(n，“str”)的功能是

A)把数值型数据转换为字符串

B)返回由n个字符组成的字符串

C)从字符串中取出n个字符

D)从字符串中第n个字符的位置开始取子字符串

10 将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是

A)Cos(a+b)^2十5*exp(2) B)Cos^2(a+b)+5*exp(2)

C)Cos(a+b)^2十5*ln(2) D)Cos^2(a+b)+5*ln(2)

11 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是

A) Visual B) Basic C) 6 D) 11

12 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a="VisualBasic"

Print String(3,a)

End Sub

程序运行后，单击命令按钮，在窗体上显示的内容是

A）VVV B) Vis C) sic D) 11

13设有如下程序段：

a$="BeijingShanghai"

b$=Mid(a$,InStr(a$,"g")+1)

执行上面的程序段后，变量b$的值为。

A) “Shanghai”B)”Beijing”C) “shang”D) “hai”

14 设a = "MicrosoftVisualBasic" ，则以下使变量b的值为“VisualBasic”的语句是______。

A) b = Left(a, 10) B) b = Mid(a, 10)

C) b = Right(a, 10) D) b = Mid(a, 11, 10)

15 执行以下程序后输出的是。

Private Sub Command1_Click（）

Ch$=”AABCDEFGH”

Print Mid（Righ（ch$,6）,Len（left（ch$,4））,2）

End Sub

A）CDEFGH B）ABCD C）FG D）AB

16 设a = 5，b = 10，则执行

c = Int((b - a) * Rn

d + a) + 1

后，c值的范围为

A）5～10 B）6～9 C）6～10 D）5～9

17 在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：

Private Sub Form_Load()

Show

Text1.Text = ""

Text2.Text = ""

Text1.SetFocus

End Sub

Private Sub Text1_Change()

Text2.Text = Mid(Text1.Text, 8)

End Sub

Text1中输入BeijingChina，则在文本框Text2中显示的内容是

A）BeijingChina B）China C）Beijing D）BeijingC

18 以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是

A)Left B)Mid C)String D)Instr

19 执行以下程序段后，变量c的值为

a = "Visual Basic Programming"

b = "Quick"

c = b & UCase(Mid(a, 7, 6)) & Right(a, 12)

A)Visual BASIC Programming B)Quick Basic Programming C)QUICK Basic Programming D)Quick BASIC Programming

20 以下不能输出“Program”的语句是______。

A)Print mid("VBProgram"3,7) B)Print Right("VBProgram",7) C)Print Mid("VBProgram",3) D)Print Left("VBProgram",7)