USERCONTROL

ALEXANDREMOTA 13/08/2007 13:21:40
#230698
Como posso fazer para que uma informação fique em uma propriedade do usercontrol. Por exemplo: Na propriedade Texto eu digito a e fecho o form. Quando eu abrir novamente não está mais lá. Como faço para que isso não aconteça?
RODRIGOGBGOMES 13/08/2007 17:36:56
#230770
perai,^vamos ver se eu entendi.... vc qr preencher umas textboxes... ai vc fecha o form... e qndo abrir denovo vc qr as textboxes com os valores q vc informou?
ALEXANDREMOTA 13/08/2007 17:42:03
#230772
Isso. Que nem acontece em todos os objetos e usercontrols.
USUARIO.EXCLUIDOS 13/08/2007 22:31:17
#230793
'adiciona um label ao usercontrol:

Dim iTexto As String

Property Get Texto() As String
Texto = iTexto
End Property

Property Let Texto(i As String)
If i = "" Then MsgBox "Insira um texto!"
iTexto = i
label1.Caption = i
End Property
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
iTexto = PropBag.ReadProperty("texto", "") 'faz a leitura da string salva
label1.Caption = iTexto
End Sub


Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
Call PropBag.WriteProperty("texto", iTexto, "") 'salva a string
End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar