منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف استخرج بيانات حقل بدون تكرار - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : كيف استخرج بيانات حقل بدون تكرار (/showthread.php?tid=2649)

كيف استخرج بيانات حقل بدون تكرار - aftfm - 23-04-14

السىلام عليكم ورحمة الله وبركاته

اخواني اريد استخراج بيانات حقل فيه بيانات قد تتكرر
المطلوب استخراج بيانات الحقل بدون تكرار ووضعها في متغير

RE: كيف استخرج بيانات حقل بدون تكرار - Sniper.ps - 23-04-14

السلام عليكم ورحمة الله وبركاته

أخي الكريم راجع الرابط التالي

http://vb4arb.com/vb4/showthread.php?2019-Select-Distinct

وفقك الله

RE: كيف استخرج بيانات حقل بدون تكرار - aftfm - 23-04-14

الف شكر عزيزي Sniper.ps

لكني اريد وضعها في متغير من نوع ListBox

RE: كيف استخرج بيانات حقل بدون تكرار - سعود - 23-04-14


المثال مرفق

اسم سعود مكرر عدة مرات


RE: كيف استخرج بيانات حقل بدون تكرار - Sniper.ps - 23-04-14

السلام عليكم ورحمة الله وبركاته

أخي الكريم تفضل المثال في المرفقات .. ولأنني أستخدم Visual Studio 2013 .. الكود المستخدم هو
كود :
Imports System.Data.OleDb
Public Class Form1
    Dim CnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & Application.StartupPath & "\sniper.mdb"
    Dim Con As New OleDbConnection(CnString)
    Dim DataSet1 As New DataSet
    Dim DataAdapter1 As OleDbDataAdapter
    Dim CMD As New OleDbCommand
    
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        DataAdapter1 = New OleDbDataAdapter("Select Distinct(StrNames1) From Table1", Con)
        DataSet1.Clear()
        DataAdapter1.Fill(DataSet1, "Table1")
        ListBox1.DataSource = DataSet1.Tables(0)
        ListBox1.DisplayMember = "StrNames1"
    End Sub
End Class

وفقك الله

RE: كيف استخرج بيانات حقل بدون تكرار - Sniper.ps - 23-04-14

جزاك الله كل خير أخي الحبيب سعود .. لم أرى ردك Smile