Mouse Properties Dialog, Bagaimana Cara Menampilkannya?

Di bawah merupakan kode untuk menampilkan mouse properties dialog menggunakan VB6 (Visual Basic 6) - Bagaimana menampilkan mouse properties dialog ini, bisa Anda lihat di bawah:

Option Explicit 
 
Private Sub Command1_Click() 
    Dim dblReturn As Double 
    dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @0", 5) 
End Sub