Dalam pembuatan sebuah aplikasi tentunya tidak lepas dengan Error baik error dalam syntac sistem ataupun dalam database, untuk pembahasan kali ini yaitu Error SendKeys Permission Denied yang terjadi dalam Visual Basic Classic pada Windows 7 ke atas. Langsung saja ke pokok pembahasan buka Microsoft Visual Basic 6.0 – StandartEXE, buat lah sebuah form dan letakkan satu komponen TextBox pada form tersebut. 

Error Sendkeys Permission Denied

Buat juga sebuah modul, untuk name nya sanggup apasaja tergantung dari selera agan sendiri, lalu pastekan coding berikut 

Private Const KEYEVENTF_KEYUP = &H2
Private Const INPUT_KEYBOARD = 1
Private Type KEYBDINPUT
wVk As Integer
wScan As Integer
dwFlags As Long
time As Long
dwExtraInfo As Long
End Type

Private Type GENERALINPUT
dwType As Long
xi(0 To 23) As Byte
End Type 

Private Declare Function SendInput Lib “user32.dll” (ByVal nInputs As Long, pInputs As GENERALINPUT, ByVal cbSize As Long) As Long 

Private Declare Sub CopyMemory Lib “kernel32” Alias “RtlMoveMemory” (pDst As Any, pSrc As Any, ByVal ByteLen As Long)

Setalah itu double klik pada komponen TextBox yang terdapat pada form dan pilih prosedur Change copy code berikut dan pastekan pada mekanisme textbox tadi 

Text1.Text = Format(Text1.Text, “#,##0”): SendKeysA vbKeyEnd, True

Simpan dan Run / F5 dan inputkan abjad type numeric secara otomatis type data numeric tersebut akan tertata rapi dengan format numeric tanpa ada pesan error dan sebagainya, cukup simple bukan dan biar bermanfaat