A-A+

运行下列程序:Private Sub form_Click()Dim sl As String s2 As Strings1 = "1234&quo

2025-03-04 03:27:59 IT认证 阅读

问题详情

运行下列程序:

Private Sub form_Click()

Dim sl As String, s2 As String

s1 = "1234"

m = 0

For i = 3 To 1 Step -1

m = m + 1

s2 = fun1(s1, m)

Debug.Print s2;

Next i

End Sub

Private Function fun1(x, y) As String

fun1 = Right(x, y)

End Function

单击窗体后,则在立即窗口内显示结果是()。

A.1234

B.4321

C.434234

D.1111

参考答案

考点: