Send Command with visual basic

Here is the process I need.

Click a command button that will send chr(24) out the serial port, then wait 2 seconds, then send chr(24) out again.

Can I reference a pause subroutine or something like that?

For instance:

Private Sub Command5_Click()
MSComm1.Output = Chr(24)
Call pause 'subroutine to wait 2 seconds
MSComm1.Output = Chr(24)
Call pause 'subroutine to wait 2 seconds
MSComm1.Output = "3"
End Sub


Here is the process I need.

Click a command button that will send chr(24) out the serial port, then wait 2 seconds, then send chr(24) out again.

Can I reference a pause subroutine or something like that?

For instance:

Private Sub Command5_Click()
MSComm1.Output = Chr(24)
Call pause 'subroutine to wait 2 seconds
MSComm1.Output = Chr(24)
Call pause 'subroutine to wait 2 seconds
MSComm1.Output = "3"
End Sub