?? code289a.txt
字號(hào):
Public Sub Main()
Dim FileName As String
FileName = Dir("c:\windows\*.txt")
Do While FileName <> ""
Debug.Print FileName
FileName = Dir
Loop
End Sub
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -