how to launch or run a program in a button click

[chubzyko]

Code: Select all

Private Sub cmd_button1_Click()
Call Shell ("C:\WINDOWS\system32\notepad.exe", vbNormalFocus)
End Sub