VB Coding Tip: Adding New Hardware

Private Sub Command1_Click()
Shell ("rundll32.exe shell32.dll, _
       Control_RunDLL sysdm.cpl @1")
End Sub

This article was originally published on September 20, 2002