单选题设有如下程序段: x=2 For i=1 To 10 Step 2 x= x+i Next 运行以下程序后,x的值是
单选题为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是
单选题已知a=6,b=15,c=23,则语句 Print Sgn(a+b Mod 6-c/a)& a+b 的输出结果为( )。
单选题下述程序执行后,输出结果是( )。 For n = 3 To 1 Step-1 x$ = String$(n, "#") Print x$ Next n
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim n As Integer For n = 0 To 9 Step 3 Print re1(n); Next n End Sub Private Function re1(ByVal i As Integer)As Integer Dim x As Integer x = 0 For j = 1 To i If i < 5 Then re1 = i: Exit Function x = x + j Next j re1 = x End Function 程序运行后,单击命令按钮,则窗体上显示的内容是________。
单选题在Vistlal Basic中,所有标准控件都具有的属性是
单选题要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
单选题设窗体上有一个名称为List1的列表框和一个名称为Check1的复选框数组(下标从0开始)。程序运行时,单击某个复选框,如果列表框中没有该复选框的标题,则把该复选框的标题添加到列表框中,否则从列表框中把该复选框标题删除。 Private Sub Check1_Chck(Index As Integer) For k=0 To List1.ListCount-1 If Check1(Index).Caption=List1.List(k)Then Exit For End If Next k If k<List1.ListCount Then List1.RemoveItem k Else List1.AddItem_______ End If End Sub为使上面程序可以实现该功能,程序代码中横线上应该填入的代码是( )。
单选题要清除列表框中所有的列表项时,应使用( )方法。
单选题有如下程序:
Private Sub Form_Click()
Dim s As Integer,p As Integer
p=1
For i=1 To 4
For j=1 To i
s=s+j
Next j
p=p*s
Next i
Print p
End Sub
程序运行后,单击窗体,则输出结果是______。
单选题设有如下过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End SubPrivate Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2)End Sub若把窗体的KeyPreview属性设置为True,程序运行后,如果按“A”键,则输出结果为( )。
单选题下列程序的执行结果为______。Private sub Command1_ Click ( ) a = 100 b = 50 if a <> b then a = a + b Else b = b -a Print a, bEnd Sub
单选题单击命令按钮时,下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m/10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x,y) Printx;y End Sub
单选题假定有如下的窗体事件过程: Private Sub Form_Click() aS="Microsoft Integer":b$=Right(aS,5) c$=Mid(a$,1,9):MsgBox aS,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的是
单选题有如下程序: Private Sub Form_Click() Dim Check,Counter Check=True Counter=0 Do Do While Counter<20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter,Check End Sub 程序运行后,单击窗体,输出结果为( )。
单选题在窗体上画一个图片框,再在图片框中画一个命令按钮,位置如下图所示,则命令按钮的Top属性值是______。A)200B)300C)500D)700
单选题设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是______。
单选题设a=2,b=3,c=4,d=5,下列表达式的值是 Not a<=C Or 4*c=b^2 And b<>a+c
单选题用于显示输入输出文本的控件是
单选题定时器的Interval属性的值是一个整数,它表示的是( )。
