相关试卷
-
1、有如下VB程序段：
Private Sub Command1_Click（）
Dim x As Integer，y As Integer，t As Integer
x=2：y=3
t=x
x=y
y=t
t=x^y
Text1.Text=Str（t）
End Sub
该程序段运行后，标签Text1上显示的内容是。
-
2、下列Visual Basic程序可用于计算1010的值：
Private Sub Command1_Click( )
Dim n As Integer，s As Integer
n=10
s=10^n
Text1.Text=Str（s）
End Sub
运行程序时，单击命令按钮Command1后弹出如图所示的出错信息提示，引起该错误的原因是（ ）
A、变量n的数据类型定义有问题 B、变量s的数据类型定义有问题 C、文本框Text1属性设置有问题 D、计算机内存太小 -
3、已知x是一个五位数的整数，下面语句中能得到其千位上的数字的是（ ）A、x/1000 B、x\1000 C、x\1000 mod 10 D、x mod 10000\1000
-
4、将数学代数式
写成VB表达式，正确的是（ ） A、-b+Sqr（b*b-4ac）/2a B、-b+Sqr（b*b-4*a*c）/（2*a） C、（-b+Sqr（b*b-4*a*c）/2*a） D、（-b+Sqr（b^2-4*a*c））/（2*a） -
5、如下VB程序段：
a="zhedzfjiang"
c=Mid（a，Len（a\2-1，3）
Text1.Text=c
End Sub
该程序段运行后，在文本框Text1上显示的是（ ）
A、dzf B、hao C、zhe D、zfj -
6、设x=4，y=6，则能在Text1控件上显示SUM=10的语句是（ ）A、Text.Text1="SUM=x+y" B、Text1.Text="SUM="+Str（x+y） C、Text="SUM="+Str（x+y） D、Textl.Text="SUM="+Val（x+y）
-
7、设a=6，b=10，则以下表达式中值为True的是（ ）A、（a>=b）And（b>10） B、（a>b）Or（b>0） C、（a<0）And（b>0） D、（b-a>a）And（b>0）
-
8、设a=11，b=-11，则以下表达式中值为False的是（ ）A、a>=b B、Not（a=b） C、b>a D、b<a
-
9、在下面各关系式中，当X取任意数值时都能成立的式子是（ ）A、Int（X）>=Abs（X） B、Int（X）=Abs（X） C、Int（X）<=Abs（X） D、Int（X）<>Abs（X）
-
10、已知文本框Text1中的内容为12，则表达式Text1.Text+Str（12）的值是（ ）A、1212 B、"1212" C、"24" D、24
-
11、表达式Val（"123"）+123的值是（ ）A、123 B、“123123” C、246 D、123123
-
12、已知字符"A"的ASCII码为65，表达式Chr（Asc（"A"）+2）的值是（ ）A、"B" B、"C" C、"D" D、"E"
-
13、下列表达式值的范围是[-5，10]之间的整数的是（ ）A、Int（Rnd*10-5） B、Int（Rnd*11-5） C、Int（Rnd*15-5） D、Int（Rnd*16-5）
-
14、表达式Mid（"SHANGHAI".6.3）的值是（ ）A、"SHANGH" B、"SHA" C、"ANGH" D、"HAI"
-
15、表达式Str（-5）+"CHINA"的值是（ ）A、"5CHINA" B、"-5CHINA" C、10 D、0
-
16、表达式Abs（-5）+Len（"CHINA"）的值是（ ）A、"5CHINA" B、"-5CHINA" C、10 D、0
-
17、表达式Int（2*Sqr（36）+0.5）/3的值是（ ）A、2 B、3 C、4 D、5
-
18、下列VB表达式的值等于2020的是（ ）A、Val（"2014"）+6 B、Len（"2014"）+6 C、Sqr（2014）+6 D、Str（2014）+"6"
-
19、一个窗体VB工程的部分设计界面如图所示，该窗体的文件名是（ ）
A、myform（Form） B、Form1 C、Form D、myforml.frm -
20、在Visual Basic中，某设计界面如图所示。
图中包含的对象个数为（ ）
A、2个 B、3个 C、4个 D、5个