Open my computer for help: VB code implementation-CodePudding

As title, for help: VB code implements open my computer

CodePudding user response:

The shell "explorer"

CodePudding user response:

A great god, and not tried! I am a novice, all code, thanks

CodePudding user response:

 Option Explicit 


 'open my computerPrivate Sub Command1_Click () 
Shell "explorer. Exe/root, : : {20 d04fe0 b30309d - 3 - A2D8 aea - 1069-08002}", vbNormalFocus 
End Sub

CodePudding user response:

refer to the second floor zhouwenjing1988 response:

great god, and not tried! I am a novice, all code, appreciate

This is all code, why not

CodePudding user response:

3 building code tests pass, does he want to properties of my computer?

CodePudding user response:

I open my document test process shows the ~

CodePudding user response:

Shell "explorer. Exe: : {20 d04fe0 b30309d - 3 - A2D8 aea - 1069-08002}"
Can, no other code

CodePudding user response:

Open VB to test the

 
Private Sub Command1_Click () 
Shell "explorer. Exe: : {20 d04fe0 b30309d - 3 - A2D8 aea - 1069-08002}", vbNormalFocus 
End Sub

Or use the
ShellExecute

 
Private Declare Function ShellExecute Lib "shell32. DLL" Alias "ShellExecuteA" (ByVal HWND As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long 

Private Sub Command1_Click () 
ShellExecute Me HWND, "open", "explorer", ": : {20 d04fe0-3 aea - 1069 - b30309d A2D8-08002}", vbNullString, 1 


End Sub

So you can

CodePudding user response:

Tried, can open