Skip to content

Instantly share code, notes, and snippets.

View zenmai36rai's full-sized avatar

Kyosuke Miyazawa zenmai36rai

View GitHub Profile
Public Class Form1
<Runtime.InteropServices.DllImport("user32.dll")>
Private Shared Function GetAsyncKeyState(
ByVal nVirtKey As Integer) As Integer
End Function
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Class Controller
Public _d As Boolean = False
Public _u As Boolean = False
Public _l As Boolean = False