property שהוא recordset

[אודי777]

property שהוא recordset

היי לכולם יש למישהו מושג איך אני בונה class שה - property שלו הוא recordset ? (כלומר איך אני מאתחל property כ- recordset) אם יש חומר שמסביר על כך אשמח מאוד להסתכל שם תודה

 

[ארזירון]

לדוגמא

אפשר משהו כזה, ואפשר לותר על השורה הראשונה ב-GET

Private prvMyRs As ADODB.Recordset Public Property Get MyRS() As ADODB.Recordset If prvMyRs Is Nothing Then Set prvMyRs = New ADODB.Recordset Set MyRS = prvMyRs End Property Public Property Set MyRS(ByVal vNewValue As ADODB.Recordset) Set prvMyRs = vNewValue End Property​