Utilisation des propriétés d'un objet avec une variableRésolu

Question

Bonjour, je voulais savoir s'il était possible de mettre le nom d'un control (bouton) dans une variable et d'utilisé ensuite les propriétés de ce control avec la variable.

Exemple:

Dim Temp as string
Temp = "Commande1"

Temp.Visible = False

Cette façon ne marche pas

Merci de votre aide

Antoine

cs_EBArtSoft · Accepted Answer

Option Explicit

Private Sub Command1_Click()
    Dim Obj As Object
    Set Obj = Me.Controls("Command1")
    MsgBox Obj.Visible
End Sub

@+

E.B.

cs_ITALIA · Answer

Non je ne pense pas.....

It@li@

jrivet · Answer

Une variable de type string n a pas de propriete Visible....

Essai de le mettre dans une Sub Par exemple:

Private sub VisibleChange(Obj as object, VisibleValue as Boolean)
Obj.Visible = VisibleValue
End Sub

J ai essayer et ca marche, apres je sais aps si c est exactement ce que tu voulais ;)

@+

-------------------------------------------------
Essai ca sinon on trouvera autre chose
-------------------------------------------------

 :big)

jrivet · Answer

Oubli...

Cela ne marchera que si l objet passe en parametre a une propriete Visible...
-------------------------------------------------
Essai ca sinon on trouvera autre chose
-------------------------------------------------

 :big)

cs_liquide · Answer

salut, essais ca :


Private Sub Command1_Click()
Dim mObj As Object

Set mObj = Command1

mObj.Visible = False
MsgBox mObj.Name & vbCrLf & "est rendu invisible"

End Sub

Bonne prog, poele_a_frire@hotmail.com
liquide

cs_liquide · Answer

jrivet, j'ai essayé et ca passe(enfin .. chez moi)


Private Sub VisibleChange(Obj As Object, VisibleValue As Boolean)
    Obj.Visible = VisibleValue
End Sub

Private Sub Command2_Click()
    VisibleChange Command2, False
End Sub

Bonne prog, poele_a_frire@hotmail.com
liquide

Utilisation des propriétés d'un objet avec une variable

6 réponses

Discussions similaires