STRING NA PROPRIEDADE DO CONTROL

GANDA.NICK 12/01/2013 21:28:01
#417273
Olá a todos



é o seguinte, se eu tiver uma label indexada ou não eu posso aceder a ela por uma string que contenha o nome do control ([Ô]Label1[Ô]).

Indexada, ex:
Dim sControl As String, Indice As Integer
    
sControl = [Ô]Label1[Ô]
Indice = 0

Me.Controls(sControl)(Indice).Caption = [Ô]ola[Ô]


ou

Me.Controls([Ô]Label[Ô] & [Ô]1[Ô])(0).Caption = [Ô]ola[Ô]



sem estar indexada:
Me.Controls([Ô]Label[Ô] & [Ô]1[Ô]).Caption = [Ô]ola[Ô]


é possivel fazer o mesmo mas para a propriedade do control ????

ex:
Dim sProp As String, Indice As Integer, sControl As String
    
sProp = [Ô]Caption[Ô]
Indice = 0
sControl = [Ô]Label1[Ô]

Me.Controls(sControl)(Indice).sProp = [Ô]ola[Ô]


ou 

Me.Controls(sControl)(Indice). & [Ô]Caption[Ô] = [Ô]ola[Ô]



Acho que estão a perceber a ideia!!! Não sei se será possivel...

Todas as opiniões que tiverem sobre este assunto serão bem vindas....


té +
MARCELO.TREZE 13/01/2013 17:31:09
#417284 Resposta escolhida
eu acho que a propriedade você não conseguirá acessar como se fosse uma string..

até conseguirá, porém terá de criar uma função comparativa com todas possibilidades.

ex:

Select Case sProp
Case [Ô]Caption[Ô]
Me.Controls(sControl)(Indice).Caption = [Ô]ola[Ô]
Case [Ô]Text[Ô]
Me.Controls(sControl)(Indice).Text = [Ô]ola[Ô]
End Select


entendeu como teria de proceder
Tópico encerrado , respostas não são mais permitidas
Voltar