单选题有下列语句,其执行的结果为______。
单选题下列程序段的执行结果为 a=1 b=5 Do a=a + b b=b + 1 Loop While a<10 Print a:b
单选题下列叙述中正确的是( )。
单选题设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
单选题在下面向文件中写入数据的命令语句中,不正确的是 ______。
单选题语句Print 4+5/6*7/8 Mod 9的值是______。
单选题在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_ Click()Dim a As Integer, b As Integerdo while b <100 b=b+5 a=a+ b if b >20 then exit doLoopPrint a, bEnd Sub程序运行后,如果甲击命令按钮,则在窗体上显示的内容是______。
单选题以下选项中,不合法的Visual Basic的变量名是______。
单选题编写如下程序:
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=InputBox("输入第一个数"):y=InputBox("输入第二个数")
Call f(x, y)
Print x, y
End Sub
Sub f(a As Integer, ByVal b As Integer)
a=a*2:x=a+b:b=b+100
End Sub
程序运行后,单击命令按钮Command1,并输入数值10和15,则输出结果为
单选题有下列程序: Private Sub Command1_Click( ) x $="Nanchang" y $="Beijing" x $="Nanjing" z $=InStr(Left(x$,3)+Right(y$,4),z$) Print z$ End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
单选题窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程: Private Sub Command1_Click() n%=List1.Listlndex If n>0 Then ch$=List1.List(n) List1.List(n)=List1.List(n—1):List1.List(n-1)=ch End If End Sub 程序运行时,选中1个列表项,然后单击Command1按钮,则产生的结果是
单选题下列表达式中,{{U}} {{/U}}的值为false。
A."BCD"<"BCE"
B."12345"<>"12345"&"ABC"
C.Not 2*5=10
D.4=4 and 5>2+2
单选题可以在窗体模块的通用声明段中声明 ______。
单选题在窗体上画一个名称为Textl的文本框,一个名称为Commandl的命令按钮,并编写如下事件过程: Private Sub Command 1—Click() Dim arrayl(5,5)As Integer Dim i As Integer,j As Integer For i=1 To 4 For j=1 To 4 arrayl(i,j)=i*10+j Next j Next i Textl.Text=arrayl(2,1)+arrayl(3,2) End Sub 程序运行后,单击命令按钮,在文本框中显示的结果是( )。
单选题在窗体上画一个图片框,再在图片框中画一个命令按钮,位置如下图所示。则命令按钮的Top属性值是______。
单选题下面程序段的输出结果为 Print"10+20=" PrintlO+20 Print"20+20=" PrinflO+20
单选题下面关于直线控件的叙述中正确的是
单选题有如下语句序列:Dim a,b As Integer Print a Print b执行以上语句序列,下列叙述中错误的是
单选题设有工程文件Proj,其中含有Form1窗体、Form2窗体、标准模块Module1. bas在Form1窗体模块的通用声明段中书写了如下语句Public X As Integer,在Form1窗体模块中还定义了通用过程LocalSub。则以下说法中正确的是______。
单选题函数过程Fun1的功能是:如果参数b为奇数,则返回值为1, 否则返回值为0。
Function Fun1 (b As Integer)
if ______ Then
Fun1 =0
Else
Fun1 = 1
End If
End Function
使该功能完整,应在空行处填入以下哪条语句
