Dialing A Phone

The MSCOMM VBX is great for creating communication programs, but it’s overkill for dialing a phone number. Try the following code:

PhoneNumber$ = "(123) 456-7890" 
Open "COM2" For Output As #1 'or COM1
Print #1, "ATDT" & PhoneNumber$ & Chr$(13)
Close #1