问题详情

运行下列程序：

Private Sub Command1_Click()

s1 = "Basic"

For i = 1 To Len(s1)

t = Mid(s1, i, 1)

s2 = s2 + Chr(Asc(t) + 1)

Next i

Debug.Print s2

End Sub

单击Command1命令按钮后，则在立即窗口上输出结果是()。

A.Cbtjd

B.65

C.Basic

D.出错