主页第 2章 习题讨论退出单选题多选题填空题编程题主页习题 2讨论
1,下列①各项中,只有 ____才是数值常量;②各项中,___
① A,E-3 B,E+03 C,10^3 D,1.E03
② A,1.E-3 B,13 C,"abc" D,X1*3
6,表达式 33 Mod 17\ 3*2 的值为 _____
A,10 B,1 C,2 D,3
① D ② D
B
主页单选题 (补充 )
1,在以下字符串中,只有 ______可以作为变量名。
A,End.9 B,3XY C,End_9 D,End
2,如果 a,b,c的值分别是 3,2,-3,则下列表达式的值是
Abs(b*c-a) + b*Int(Rnd)
A,8 B,9 C,10 D,11
3.下列函数中,______函数的执行结果与其他三个不一样。
A,Val("-1") B,Int(-0.9) C,Sgn(-1) D,Fix(-0.9)
4.用字符串连接符,&”连接两边的操作数时,两边的操作数应是
A,均为数值型 B,均为字符型
C,字符型或非字符型 D,均为变体型
C
B
D
C
主页二、多选题 第 2题
2,已知 A=Space(1),要产生 3个空格,可以采用 _____函数
A,Right(A,3) B,Space(3*A)
C,String(3,A) D,A & A & A
E,3 * A
CD
主页三、填空题 第 1题之 (4)
下列哪一个正确?
A,x^3/8 + Sqr((y*y + 4*a*a/(x + y^3)))
B,x^(3/8) + (y*y + 4*a*a/x + y^3) ^ 1/2
C,x^(3/8) + (y*y + 4*a*a/(x + y^3) ^ (1/2)
C,x^(3/8) + (y*y + 4*a*a/x + y^3 ^ (1/2)
C
主页注意,使用空格分隔符
Printa,b,c 应写成 Print a,b,c
aMod7 应写成 a Mod 7
主页编程及上机调试
6,编制程序,在一个文本框中输入一串字符 ( 长度大于 2),
单击,处理,按钮时,则取出该字符串的头,尾部各一个字符,
合并后显示在第二个文本框中 。 如输入,ABCDEF”,则输出
,AF”。
请指出下列事件过程有哪些错误?
Private Sub Command1_Click()
Dim x As String,y As String
Text1.Text = x
y = Left(x,1) + Right(x,1)
y = Text2.Text
End Sub
x = Text1.Text
Text2.Text = y
编程第 6题
1,下列①各项中,只有 ____才是数值常量;②各项中,___
① A,E-3 B,E+03 C,10^3 D,1.E03
② A,1.E-3 B,13 C,"abc" D,X1*3
6,表达式 33 Mod 17\ 3*2 的值为 _____
A,10 B,1 C,2 D,3
① D ② D
B
主页单选题 (补充 )
1,在以下字符串中,只有 ______可以作为变量名。
A,End.9 B,3XY C,End_9 D,End
2,如果 a,b,c的值分别是 3,2,-3,则下列表达式的值是
Abs(b*c-a) + b*Int(Rnd)
A,8 B,9 C,10 D,11
3.下列函数中,______函数的执行结果与其他三个不一样。
A,Val("-1") B,Int(-0.9) C,Sgn(-1) D,Fix(-0.9)
4.用字符串连接符,&”连接两边的操作数时,两边的操作数应是
A,均为数值型 B,均为字符型
C,字符型或非字符型 D,均为变体型
C
B
D
C
主页二、多选题 第 2题
2,已知 A=Space(1),要产生 3个空格,可以采用 _____函数
A,Right(A,3) B,Space(3*A)
C,String(3,A) D,A & A & A
E,3 * A
CD
主页三、填空题 第 1题之 (4)
下列哪一个正确?
A,x^3/8 + Sqr((y*y + 4*a*a/(x + y^3)))
B,x^(3/8) + (y*y + 4*a*a/x + y^3) ^ 1/2
C,x^(3/8) + (y*y + 4*a*a/(x + y^3) ^ (1/2)
C,x^(3/8) + (y*y + 4*a*a/x + y^3 ^ (1/2)
C
主页注意,使用空格分隔符
Printa,b,c 应写成 Print a,b,c
aMod7 应写成 a Mod 7
主页编程及上机调试
6,编制程序,在一个文本框中输入一串字符 ( 长度大于 2),
单击,处理,按钮时,则取出该字符串的头,尾部各一个字符,
合并后显示在第二个文本框中 。 如输入,ABCDEF”,则输出
,AF”。
请指出下列事件过程有哪些错误?
Private Sub Command1_Click()
Dim x As String,y As String
Text1.Text = x
y = Left(x,1) + Right(x,1)
y = Text2.Text
End Sub
x = Text1.Text
Text2.Text = y
编程第 6题