📄 code201b.txt
字号:
Public Const ARRAY_SIZE = 5
Public Sub Main()
Dim Scores(ARRAY_SIZE - 1) As Integer
Scores(0) = 80
Scores(1) = 70
Scores(2) = 90
Scores(3) = 85
Scores(4) = 80
For I = 0 to ARRAY_SIZE-1
Debug.Print "scores(";I; ") :"; Scores(I)
Next
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -