If your program has an Explorer shell-style interface, you probably want to supply the standard File | Properties dialog. Do this by using the ShellExecuteEx API function:
Private Type SHELLEXECUTEINFO cbSize As Long fMask As Long hWnd As Long lpVerb As String lpFile As String lpParameters As String lpDirectory As String nShow As Long hInstApp As Long lpIDList As Long lpClass As String hkeyClass As Long dwHotKey As Long hIcon As Long hProcess As LongEnd TypePrivate Declare Function ShellExecuteEx Lib _ "shell32" (lpSEIAs SHELLEXECUTEINFO) As LongPrivate Const SEE_MASK_INVOKEIDLIST = &HCPrivate Sub Form_Click() Call ShowFileProperties( _ "c:windowssystemmsvbvm50.dll")End SubPrivate Sub ShowFileProperties(ByVal aFile As _ String) Dim sei As SHELLEXECUTEINFO sei.hWnd = Me.hWnd sei.lpVerb = "properties" sei.lpFile = aFile sei.fMask = SEE_MASK_INVOKEIDLIST sei.cbSize = Len(sei) ShellExecuteEx seiEnd Sub