'运行下面程序后,在窗体中显示的是()。Private Sub Form_Click()a$="*": b$="$"For k=1 To 3x$=String$(Len(a$)+k,b$)Print x$;Next kPrintEnd Sub
A. *** ** ****
B. *$*$*$
C. 1*$2*$3*$
D. $$$$$$$$$
查看答案
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()c = 1234c1 = Trim(Str(c))For i = 1 To 4PrintNext IEnd Sub程序运行后,单击命令按钮,要求在窗体上显示如下内容4342341234则在程序循环体中的处应填入的内容为().
A. Mid(c1,i,1)
B. Mid(c1,i,i)
C. Right(c1,i)
D. Left(c1,i)
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()n = 5f = 1s = 0For i = 1 To nf = f _________s = s + fNext IPrint sEnd Sub该事件过程的功能是计算1+1/2!+1/3!+1/4!+1/5!的值,则在程序循环体中横线_________处应填的内容是()
A. /i
B. *i
C. +f/i
D. +1/i
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:Private Sub Command1_Click()s = 0For i = 1 To 15If i Mod 2 = 0 Then s = s + 1Next iLabel1.Caption = sEnd Sub程序运行后,单击命令按钮,则标签中显示的内容是()
A. 1
B. 5
C. 7
D. 27
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer, x As IntegerFor i = 1 To 6If i = 1 Then x = iIf i <= 4 Thenx = x + 1Elsex = x + 2End IfNext iPrint xEnd Sub程序运行后,单击命令按钮,其输出结果为()。
A. 9
B. 6
C. 12
D. 15