[البراء]

بسم الله الرحمن الرحيم
اخي amgadtamer بارك الله فيكم تم حل هذه المشكلة بعد ما وصلنا الى طريق مسدود ضاقت فلما استحكمت حلقاتها ....فرجت وكنت اظنها لا تفرج
الاستاذ amgadtamer انا غير قادر ان افهم Function برجاء ان تشرح لي Function وطريق عملها
بارك الله فيك

Function fillGrid(ByVal selectext As String) As DataTable
Dim adapter As New OleDbDataAdapter(selectext, con)
Dim dt As New DataTable
adapter.Fill(dt)
Return dt
End Function