Visual Basic

Private X As Integer
Private Const CaptionText As String = "Enter some data"

Private Function FolderPath() As String
    Return String.Format("{0}\{1}", PathTextbox.Text, FileTextbox.Text)
End Function

Private pStringList As List(Of String)
Private ReadOnly Property StringList() As List(Of String)
    Get
        If pStringList Is Nothing Then pStringList = New List(Of String)
        Return pStringList
    End Get
End Property

Private pMyHeight As Integer
Private Property MyHeight() As Integer
    Get
        Return pMyHeight
    End Get
    Set(ByVal value As Integer)
        Dim H As Integer = MinHeight
        If value > MaxHeight Then
            H = MaxHeight
        ElseIf value > MinHeight Then
            H = value
        End If
        pMyHeight = H
        ResizeMe()
    End Set
End Property

tatchung wrote:

How do i include the ADODB component to vb6? I've searched the available components though I can't find Microsoft ActiveX Data Objects 2.5 Library or 2.6 for that matter. Is there anyway around this? Many thanks for the help

jalpam wrote:

Since in coding in VB.NET it does not provide me with any readymade class