Visual Basic 6: Property Let e Get

[Gmalex]

Mi potreste spiegare mejo le routine Property Let e Get? grazie

[xegallo]

Originariamente inviato da Gmalex
Mi potreste spiegare mejo le routine Property Let e Get? grazie

sono delle routine che comprendono anche la set per creare le proprieta alle tue classi in vb

la get si riferisce alla lettura in pratica quando il programma va a leggere il valora di una proprità va a chiamare questa funzione
esempio

' nel modulo di classe MyClass
private m_Nome as string
property get Name as string
   me.name = m_Nome
end property
'-------------------------

'in un form
dim MyObj as new MyClass
dim sNome as string
sNome = MyObj.name

in fase di esecuzione quando arriviamo all'ultima riga VB per dare il valore a sNome va a prendere il valore che restituisce Property Get Name


se una proprietà non contiene anche una property let o set allora diventa di sola lettura

quando si usa let

let si usa per impostare un valore a una proprietà

' in un modulo di classe Myclass
Property let Nome ( byval sNewValue as string)
   m_Name = sNewValue
end Property

'-----------------------
'in un form
MyObj.nome = sName

in fase di esecuzione quando arriviamo all'ultima riga VB per dare il valore a MyObj.Nome passa il valore(byval) a sNewValue che lo passera a m_Name che nella property Get Name diventerà il nuovo valore della propietà name della Classe


quando si usa set

set funziona analogamente a let ma solo per quelli che non sono i tipi fondamentali di VB quali numeri stringhe ecc
perciò se devo passara ad esempio un recordset usero una property set e non let

per leggere si continua ausare get


spero ti possa aiutare

[Gmalex]

si...+ o - sei stato 100^((2*sqrt(81))-4^2)...volte + chiaro (:gren: ) ma...non riesco a capire perchè si usano quelle variabili Private m_variabile... ...se puoi aiutarmi...me lo spieghi...grazie :adhone:

[xegallo]

è una questione di comodità
infatti quando hai questo codice

private m_Nome as string
property get Name as string
   Me.Nome = m_Nome
end property

Property let Nome ( byval sNewValue as string)
   m_Name = sNewValue
end Property

e vuoi impostare un nuovo valore
la property let non va a chiamare la property get
come sarebbe in questo caso

Property let Nome ( byval sNewValue as string)
   Me.Nome = sNewValue
end Property

risparmiando tempo di esecuzione e salti di codice in fase di debug

[Gmalex]

Grazie