naujo kom uosto į VB6

[xanseviera]

kaip pakeisti comm uoste VB6?

 Private Sub Command6_Click () MSComm1.PortOpen = True MSComm1.Output = "" MSComm1.Output = "B" MSComm1.Output = "c" MSComm1.PortOpen = False "Uždaryti COMM uosto End Sub Private Sub Command4_Click ( ) MSComm1.PortOpen = True MSComm1.Output = "g" MSComm1.Output = "h" MSComm1.Output = "i" MSComm1.PortOpen = False 'Uždaryti COMM uosto End Sub

Noriu naujo uosto iš command6 command4. kaip tai padaryti? ar sum1 gali man padėti. Kvotą

 

[lockman_akim]

i dont suprasti, ką ir tikrai noriu .. Can U xplain daugiau ..

 

[xanseviera]

aš turiu ji jau ... radau klaida mano IPS programavimas. Kvotą už pagalbą