最后一道VB题，谢谢~~~~

设计字符数组处理程序
新建工程，设置主窗体的标题。设计程序代码，功能是：将26个大写英文字母存入一维字符数组A，再转存到2×13的二维数组B中。运行结果如图所示。

Private Sub Form_Click()
Dim a(26)
Dim b(2, 13)
Form1.Cls
Print "A="
For i = 1 To 26
a(i) = Chr(i + 64)
Print a(i); Space(2);
Next
Print: Print "B="
For i = 1 To 2
For j = 1 To 13
b(i, j) = a((i - 1) * 13 + j)
Print b(i, j); Space(2);
Next j
Print
Next i
End Sub

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/sqmqm4fqv.html