RSS

Re: Issue with Get and Let properties in Class Module

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums

Issue with Get and Let properties in Class Module

•

Join Date: Feb 2008

Location: Sivakasi, Tamilnadu, India

Posts: 467

Reputation: selvaganapathy is an unknown quantity at this point

Rep Power: 1

Solved Threads: 83

selvaganapathy selvaganapathy is offline

Offline

Posting Pro in Training

Re: Issue with Get and Let properties in Class Module

Jul 24th, 2008

Yes, I agree dmf1978 points, Property is a special feature in VB6. It encapsulates a private member variable inside a class.

For Ex
'in a Class

 Help with Code Tags 
 VB Syntax (Toggle Plain Text) 
Private mLength As Integer
Public Property Get Length() As Integer
   Length = mLength
End Property
 
Public Property Let Length(ByVal vNewValue As Integer)
   mLength = vNewValue
End Property
Private mLength As Integer
Public Property Get Length() As Integer
   Length = mLength
End Property

Public Property Let Length(ByVal vNewValue As Integer)
   mLength = vNewValue
End Property

This is normal, But u can have global variable instead

Help with Code Tags

VB Syntax (Toggle Plain Text)

  Public Length as Intger

Here the Problem is "you cannot restrict the Value when it is Public variable" but you can do it in Properties.

Get and Let/Set Properties represents the Same thing. SO the Compiler enforce you to the Correct Syntax.

If you want give so many Option You can go For Procedure or Function.
This is available in Other Languages to Access the private Member GetXXX() and SetXXX() Functions.
So the AboveCode Can be

 Help with Code Tags 
 VB Syntax (Toggle Plain Text) 
Private mLength As Integer
Public Function GetLength() As Integer
   GetLength = mLength
End Sub 
Public Sub SetLength(ByVal vNewValue As Integer)
   mLength = vNewValue
End Sub
Private mLength As Integer
Public Function GetLength() As Integer
   GetLength = mLength
End Sub 
Public Sub SetLength(ByVal vNewValue As Integer)
   mLength = vNewValue
End Sub

but you need to Mention the function name while accessing it thru object
For Ex

 Help with Code Tags 
 VB Syntax (Toggle Plain Text) 
  Dim C as New Class1
  Dim Length as Integer
 
  C.SetLength 100   'Instead of C.Length = 100
  Length = C.GetLength() 'Instead of Length = C.Length
  Dim C as New Class1
  Dim Length as Integer

  C.SetLength 100   'Instead of C.Length = 100
  Length = C.GetLength() 'Instead of Length = C.Length

I hope this is helpful somewhat to you.

Last edited by selvaganapathy : Jul 24th, 2008 at 11:22 pm.

KSG

DaniWeb Home > Forums > Software Development > Visual Basic 4 / 5 / 6 > Issue with Get and Let...

Re: Issue with Get and Let properties in Class Module

Issue with Get and Let properties in Class Module

Re: Issue with Get and Let properties in Class Module