'Bouton radio sur le sexe des patients
'1 = Homme, 0 = Femme
'If Rg(MonIndex, 16) = 1 Then
'****************************************
If Rg(MonIndex, 16) = "Féminin" Then
Me.féminin.Value = True
Me.masculin.Value = False
End If
If Rg(MonIndex, 16) = "Masculin" Then
Me.féminin.Value = False
Me.masculin.Value = True
End If
If Rg(MonIndex, 16) = "" Then
Me.féminin.Value = False
Me.masculin.Value = False
End If