devxlogo

Show the Standard File Properties Dialog

Show the Standard File Properties Dialog

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
See also  Is Machine Learning Automating Creativity in Graphic Design?
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist