afficher et masquer les Frame(s) sous condition

chaelie2015 · 16 Septembre 2019

Bonsoir Forum
Je souhaite simplifier ce code
c-a-d si combobox1 est different de vide alors masquer frame2 et afficher frame3 sinon l'inversse.

VB:

Private Sub ComboBox1_Change()
If Frame1.ComboBox1.Value <> "" Then Frame2.Visible = False 'And Frame3.Visible = True
If Frame1.ComboBox1.Value = "" Then Frame2.Visible = True 'And Frame3.Visible = False
End Sub

Salutations

ChTi160 · 16 Septembre 2019

Bonsoir
peut être pour frame2

VB:

frame2.visible＝iif（frame1.combobox1.value＝“”,true,false)

jean marie

chaelie2015 · 16 Septembre 2019

ChTi160 à dit:
frame2.visible＝iif（frame1.combobox1.value＝“”,true,false）

Bonsoir JEAN
merci pour la réponse

VB:

Private Sub ComboBox1_Change()
Frame2.Visible = IIf(Frame1.ComboBox1.Value = “”, True, False)
Frame3.Visible = IIf(Frame1.ComboBox1.Value = “”, False, True)
End Sub

Souci est resolut
a+

patricktoulon · 16 Septembre 2019

bonsoir
la valeur de la combo en elle même peut être convertie en booléen

VB:

Private Sub ComboBox1_Change()
Frame2.Visible = not Frame1.ComboBox1.Value = “”
frame3.visible=not frame2.visible
End Sub

afficher et masquer les Frame(s) sous condition

chaelie2015

XLDnaute Accro

ChTi160

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

patricktoulon

XLDnaute Barbatruc

Discussions similaires