?? stris.bas
字號:
Attribute VB_Name = "Stris"
Option Explicit
Type STRISLEVEL
px2 As Long ' position of x2 (x1 always null) = width for this level
mTime As Single ' speed or time to start with
R(21) As String ' level data
End Type
Public OK As Boolean
Public DialogTitle As String
Public DialogText As String
Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Public Const SRCCOPY = &HCC0020 ' (DWORD) dest = source
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -