📄 code80a.txt

📁 VB大全（精华版）源代码

💻 TXT

字号:

Public Sub Main()
  Dim I As Integer

  For I = 1 To 20
    If I Mod 2 = 1 Then Next I
    Debug.Print I
  Next I
End Sub

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -