单选题决定窗体标题栏上显示内容的属性是
单选题可以产生30~50(含30和50)之间的随机整数的表达式是
单选题单击命令按钮时,下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m=m/10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub
单选题下面语句正确的是( )。 A.If x<3*y And x>y Then y=x^3 B.If x<3*y And x>y Then y=3x C.If x<3*y:x>y Then y=x^3 D.If x<3*y And x>y Then y==x* *3
单选题窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger)IfIndex=1ThenPrint"计算机等级考试"EndIfIfIndex=2ThenPrintCommand1(2).CaptionEndIfEndSub运行程序,单击“命令按钮2”,则如下叙述中正确的是()。
单选题在窗体中添加一个名称为Commandl的命名按钮,然后编写如下程序: Private Sub
Command1 Click() Print Tab(1);“第一”
Print Tab(6);“第二” End Sub
程序运行后,如果单击命令按钮,在窗体上显示的内容是(口表示空格)
A. 第一□□第二
B. 第一第二□□
C. 第一□□ 第二
D. 第一□□ 第二
单选题Function过程与Sub过程的最主要区别是( )。
单选题在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a=InputBox("Enter the First integer")
b=InputBox("Enter the Second integer")
Print b+a
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是
单选题设有如下事件过程:Private Sub Commandl_Click()Dim a Private Function fun(x,Y)As Integer a=Array(12,3,8,5,10,3,5,9,2,4) Do While x>=y For k=1 To 9 x=x-y Print fun(a(k-1),a(k));""; Loop Next k fun=xEnd Sub End Function程序运行时的输出结果是
单选题以下程序执行后,在窗体上输出的图案是______。
Form1.Cls
For a=1 To 5
Print Space(5-a); String(a, "*")
Next a
单选题以下程序的功能是随机产生10个两位的整数:
Option Base 1
Private Sub Command1_Click()
Dim a(10) As Integer, i As Integer
Randomize
For i=1 To 10
a(i)=Int(Rnd*100)+1
Print a(i)
Next i
End Sub
运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是
单选题在VB中,函数过程与子程序过程的区别之一是
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Sum=0 For x=1 To 5 Call sub1(x,s) Sum=Sun+s Next x Print Sun End Sub Private Sub subl(y,w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
单选题以下关于VB对象属性的叙述中,错误的是
单选题窗体上有1个名称为Command1的命令按钮,事件过程如下:
Private Sub Command1_Click()
Dim num As Integer, x As Integer
num=Val(InputBox("请输入一个正整数"))
Select Case num
Case Is>100
x=x+num
Case Is<90
x=num
Case Else
x=x*num
End Select
Print x;
End Sub
运行程序,并在三次单击命令按钮时,分别输入正整数100、90和60,则窗体上显示的内容为
单选题在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, y As Integera =10: y = 0do a=a+2:y=y+ a Print "a="; a; "y=", y if y>20 then exit doLoop until a>14End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。
单选题在窗体上画一个命令按钮(其名称为Command1),然后编写如下代码:
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
i=3:j=1
Do While i>=0
s=s+a(i)*j
i=1-1
j=j*10
Loop
Print s
End Sub
运行上面的程序,单击命令按钮,则输出结果是______。
单选题图像框有一个属性,可以自动调整图像框的大小,以适应图像的尺寸,这个属性是 ______。
A. AutoSize
B. Stretch
C. AutoRedraw
D. Appearance
单选题窗体上有名称为List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是( )。
单选题概要设计使用的工具是______。
A.系统结构图
B.程序流程图
C.PAD图
D.数据流图(DFD图)