Private Sub Form1_Click()
Me.WindowState = "1"
Const strInstall As String = "AVGSetup.exe"
You can try to set up MScomm to wait for a string or single character from your serial port, than call the subroutine...
There is a million page on google about this.