Discussion :

[Rose Butterfly]

Bonjour,
Je suis en train de refaire une application VBA sous Access en VB.Net, donc j'ai remplacé MSComm par SerialPort, mais j'ai pas trouvé l'équivalent de certaines propriétés. voici le code que je veux traduire en vb.net
Merci d'avance

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
PortGSM = 1
PortGSM = InputBox("Serial Port for mobile ?  ('0' if mobile not connected)", "GSM COM Port", 1)
 
 If PortGSM = 0 Then Exit Sub
    MSComm1.CommPort = PortGSM
    MSComm1.RThreshold = 1
    MSComm1.InputMode = comInputModeText
    MSComm1.OutBufferSize = 2048
If Not MSComm1.PortOpen Then MSComm1.PortOpen = True
'aussi l'équivalent de TimerIntervalle?
Form.TimerInterval = 30

J'ai une deuxième question: comment on des sous formulaires dans un formulaire,avec des évènement form_load indépendants pour chaque sous-formulaire

[Rose Butterfly]

Bonjour,
J'ai remplacé mon code par cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 If PortGSM3 = 0 Then Exit Sub
        SerialPort3.PortName = "COM" & PortGSM3 ' "COM1"
        SerialPort3.BaudRate = 4800
        SerialPort3.Parity = IO.Ports.Parity.None
        SerialPort3.DataBits = 8
        SerialPort3.StopBits = IO.Ports.StopBits.One
        'SerialPort3.Handshake = IO.Ports.Handshake.None
        SerialPort3.RtsEnable = True
        SerialPort3.Open()
        If Not SerialPort3.IsOpen Then SerialPort3.Open()
        If Not SerialPort3.IsOpen Then MsgBox("Impossible d'ouvrir le port " & PortGSM3)

ça a l'air de marcher même si je comprends pas trop l'utilité de chaque méthode,si quelqu'un peut m'expliquer.
Sinon je n'ai pas encore trouvé comment inclure trois sous-formulaires dans un form père avec possibilité de programmer form_load pour chaque sous formulaire
merci

[Rose Butterfly]

En fait,sous Access j'ai trois sub-form dans un formulaire et chaque sub-form a une page de code indépendants avec l'evenement form_load pour chaqu'un.
J'ai essayé en créant trois groupBox dans mon formulaire mais le problème j'ai pas trouvé l'évenement load pour groupBox.
Si qulqu'un peut me proposer une solution ou une autre manière pour faire cela je serai reconnaissante

[Rose Butterfly]

Bonjour,
J'ai trouvé l'équivalents des méthodes, il me rste juste cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 MSComm1.InputMode = comInputModeText

si quelqu'un pourra me dire c'est quoi l'équivalent avec serialPort
Merrci