Discussion :

[totoche]

Salut,
J'ai quatre optionButton contenus dans une frame, il dirige tous vers la même classe en passant en param leur name.
Peut on faire une seule fonction pour le groupe, ou dois je faire une fonction pour chaque optionButton

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Private Sub opEnvoi1_Click()
Dim objDTMO As clsServices
Set objDTMO = New clsServices
objDTMO.envoiDTMO (opEnvoi1)
Set objDTMO = Nothing
....
Private Sub opEnvoi2_Click()
Dim objDTMO As clsServices
Set objDTMO = New clsServices
objDTMO.envoiDTMO (opEnvoi2)
Set objDTMO = Nothing
etc
 
End Sub

Merci