问题详情

运行下列程序：
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.出错