题目内容

运行下列程序:Private Sub Form_Click()Dim x As Integer, y As String, z As Stringy = "abcde"For x = 1 To Len(y)z = z & Mid(Right(y, x), x, 1)Next xPrint zEnd Sub单击窗体后,则在窗体上显示的结果是（）。

A. eeeee
B. edcba
C. abcde
D. baced

查看答案

搜索结果不匹配？点我反馈

更多问题

'运行下面程序后,在窗体中显示的是（）。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