题目内容

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

查看答案

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

更多问题

运行下列程序：
Private Sub Command1_Click()
Dim A(10) As Integer
For i = 1 To 5
A(i) = i
A(i + 5) = i
Next i
For i = 1 To 10
s = s + A(i)
Next i
Debug.Print s
End Sub
单击按钮后，则在立即窗口内显示的结果是()。

A. 5
B. 10
C. 30
D. 出错信息

2013年8月，在中国开展首届“京台智慧养老论坛”，在2013年10月，成立“全国智能化养老专家委员”。()

Na+出细胞是

A. 单纯扩散
B. 经载体易化扩散
C. 经通道易化扩散
D. 原发性主动转运
E. 继发性主动转运

细胞膜在静息情况下，对下列哪种离子的通透性最大

A. Na+
B. K+
Cl-
D. Ca2+
E. M2+