in my code for telephone dialer, when the form loads

visual basic code:


Private Sub Form_Load()
MSComm1.CommPort = 3
MSComm1.Settings = "9600,N,8,1"
MSComm1.PortOpen = True
End Sub


gives an error


Code:


Run time error '8012':

"The device is not open"

please help

Regards
Mohit