ايران ويج

با عرض خسته نباشيد خدمت تمام عزيزان

من ميخام اطلاعات رو داخل يك ليست باكس نشن بدم كه البته لين طلاعات دارداي چدين ستون ميباشند
مخواستم ببينم اين اين كار رو بايد با چه اكتيوكسي انجام بدم

مثل قسمت سرچ ويندوز كه اطلاعات را روي چنديدن ستون نشون ميده

يا اكتيوكس ديتا گريد كه به ديتا بيس متصل ميشه اگر هم بشه داخل ديتا گريد بدون اتصال به ديتا بيس اطلاعات ريخت خيلي خوب ميشه

لطفا راهنمايي كنيد
با تشكر

اين چيزي كه شما مي خواي همون ديتا گريده
كه اگه به ديتابيس وصلش كني كه تقريبا هيچ مشكلي نداري فقط ستون ها روانتخاب مي كني و نشون مي ده
البته توي وي بي 6 كه يادمه مي شد بدونه ديتابيس هم باهاش كار كرد

من تا جايي ميدونم نميشه اگه شما ميدونيد بگويد چجوري ميشه توي ديتا گريد بدون ديتا بيس چيزي نوشت

راست ميگي الان كه كدهاي قبلي رو نگاه مي كردم ديدم يه ديتابيس درست كرده بودم و با اون نشون مي دادم ولي نياز به MSSQL نداري به همين روش زير مي شه البته اين كدها مال دوران جونيه و vb6 اميد وارم به درد بخوره

کد: 
Public DB As ADODB.Recordset

Public adr As Integer

Public dis As Integer

Public tp As Integer

Public Dirty As Boolean

Private Sub about_Click()

    frmAbout.Show

End Sub

Private Sub clear_Click()

    DB.MoveFirst

    For i = 1 To DB.RecordCount

        For j = 0 To 15

            DB.Fields(j) = "FF"

        Next

        DB.MoveNext

    Next

    Set MSHFlexGrid1.DataSource = DB

    MSHFlexGrid1.Visible = False

    For i = 1 To DB.RecordCount

        MSHFlexGrid1.Row = i

        MSHFlexGrid1.Col = 0

        a = UCase$(Hex$((i - 1) * 16))

        If Len(a <> 4) Then a = String(4 - Len(a), "0") + a

        MSHFlexGrid1.Text = a

    Next i

    MSHFlexGrid1.Visible = True

End Sub

متشكر به درد خورد :)

خيلي ممنون Amaze

MALEK_mybb1.2_import12520

ha_60

MALEK_mybb1.2_import12520

ha_60

MALEK_mybb1.2_import12520