السلام عليكم ورحمة الله تعالى وبركاته
الأساتذة الكرام
رجاءا لو سمحتم
عندي ملف تكست به قائمة من البيانات أريد تحميلها على قريد فيو
قمت بكاتبة هذا الكود لكن البيانات طلعت كلها في عمود واجد وبقية الأعمدة طلعت فارغة
الملف هو :
medic.rar (الحجم : 184.84 ك ب / التحميلات : 57)
الكود الذي كتبته هو :
Dim fichierALire As String = Application.StartupPath & "\" & "Forme.txt"
Dim champs() As String
Dim sr As New StreamReader(fichierALire)
While Not sr.EndOfStream
Dim ligne As String = sr.ReadLine()
champs = ligne.Split(CChar(vbTab))
dgv.Rows.Add(champs)
End While
ألف شكر لكم مسبقا
الأساتذة الكرام
رجاءا لو سمحتم
عندي ملف تكست به قائمة من البيانات أريد تحميلها على قريد فيو
قمت بكاتبة هذا الكود لكن البيانات طلعت كلها في عمود واجد وبقية الأعمدة طلعت فارغة
الملف هو :
medic.rar (الحجم : 184.84 ك ب / التحميلات : 57)
الكود الذي كتبته هو :
Dim fichierALire As String = Application.StartupPath & "\" & "Forme.txt"
Dim champs() As String
Dim sr As New StreamReader(fichierALire)
While Not sr.EndOfStream
Dim ligne As String = sr.ReadLine()
champs = ligne.Split(CChar(vbTab))
dgv.Rows.Add(champs)
End While
ألف شكر لكم مسبقا