エクスプローラを起動する方法

◆概要

このページは、Visual Basic 6.0のVisual Basicで、エクスプローラを起動する方法について記載しています。


プログラムから文字コードを送ることによって、エクスプローラを起動します。

◆Sample code

Option Explicit

Private Declare Sub keybd_event Lib "User32.dll" ( _
    ByVal bVk As Byte, _
    ByVal bScan As Byte, _
    ByVal dwFlags As Long, _
    ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_LWIN = &H5B

Private Sub Command1_Click()
    
    keybd_event VK_LWIN, 0, 0, 0
    keybd_event 69, 0, 0, 0         ' 69 は｢E｣の文字コードです
    keybd_event VK_LWIN, 0, KEYEVENTF_KEYUP, 0

End Sub
　　



▼ページトップへ