تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] ما الخطاء في هاذا الكود
#11
جربه الان انسخه ولصق مثل ماهو
انت لم تضع system.IO
هذا الكود

كود :
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           Dim TextFile As String
           TextFile = My.Computer.FileSystem.ReadAllText("ãÓÇÑ ÇáãáÝtext.txt")

           For i = 1 To TextFile.Split(vbNewLine).Count
               Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
           Next
       Catch MUDZ As Exception

    End Try
    End Sub
End Class

واذا كنت تريده دون وضع مسار فهذا الكود

كود :
Imports System.IO
Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Try
            '(f)ضع ملف التكست في ركويست ثم ضع اسمه بدل حرف
            Dim TextFile As String = My.Resources.f


            For i = 1 To TextFile.Split(vbNewLine).Count
                Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
            Next
        Catch MUDZ As Exception

        End Try
    End Sub
End Class
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة:
#12
السلام عليكم ورحمة الله وبركاتة
استاذنا الفاضل أنا حربت الكود بتاعك عندي وشغال زي الفل بس طبعا أنا غيرت مسار الملف فأعتقد أن المشكلة عندك بمسار الملف تأكد منه وبعدين تأكد من عدد أدوات التكست بوكس مناسب لعدد أسطر الملف بتاعك
Email : mrma11581@gmail.com
الرد }}}
تم الشكر بواسطة:
#13
للاسف نفس الخطاء باضبط اشك من النضام ؟؟؟؟؟؟
الحمد لله رب العالمين على كل شي
الرد }}}
تم الشكر بواسطة:
#14
(26-12-14, 11:12 AM)hassan كتب : للاسف نفس الخطاء باضبط اشك من النضام ؟؟؟؟؟؟

اخوووي اتأكد من الفيجوال بيسك شغال ع وش هل هو شغال ع نيتورك 4 ؟؟؟ او 3.5 اذا كان شغال اقل من اربعه فحطه على 4.5 او 4 وهذا قد يكون سبب
وجرب هذا الكود
كود :
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           '(f)ضع ملف التكست في ركويست ثم ضع اسمه بدل حرف
           Dim TextFile As String = My.Resources.f


           For i = 1 To TextFile.Split(vbNewLine).Count
               Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
           Next
       Catch MUDZ As Exception

       End Try
   End Sub
End Class
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة:
#15
(26-12-14, 11:16 AM)mudz كتب :
(26-12-14, 11:12 AM)hassan كتب : للاسف نفس الخطاء باضبط اشك من النضام ؟؟؟؟؟؟

اخوووي اتأكد من الفيجوال بيسك شغال ع وش هل هو شغال ع نيتورك 4 ؟؟؟ او 3.5 اذا كان شغال اقل من اربعه فحطه على 4.5 او 4 وهذا قد يكون سبب
وجرب هذا الكود

كود :
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           '(f)ضع ملف التكست في ركويست ثم ضع اسمه بدل حرف
           Dim TextFile As String = My.Resources.f


           For i = 1 To TextFile.Split(vbNewLine).Count
               Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
           Next
       Catch MUDZ As Exception

       End Try
   End Sub
End Class

نفس الخطاء للاسف
الحمد لله رب العالمين على كل شي
الرد }}}
تم الشكر بواسطة:
#16
(26-12-14, 02:46 PM)hassan كتب :
(26-12-14, 11:16 AM)mudz كتب :
(26-12-14, 11:12 AM)hassan كتب : للاسف نفس الخطاء باضبط اشك من النضام ؟؟؟؟؟؟

اخوووي اتأكد من الفيجوال بيسك شغال ع وش هل هو شغال ع نيتورك 4 ؟؟؟ او 3.5 اذا كان شغال اقل من اربعه فحطه على 4.5 او 4 وهذا قد يكون سبب
وجرب هذا الكود


كود :
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           '(f)ضع ملف التكست في ركويست ثم ضع اسمه بدل حرف
           Dim TextFile As String = My.Resources.f


           For i = 1 To TextFile.Split(vbNewLine).Count
               Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
           Next
       Catch MUDZ As Exception

       End Try
   End Sub
End Class

نفس الخطاء للاسف

اسمع سوي مثل م اقولك الان

رووح بروجيكت ____,> اخر خيار بعد تلقى خانة (Target Framework)
وش مكتوب فيها وقولي الان
أو ارفق المشروع حقك الان
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة:
#17
(26-12-14, 02:50 PM)mudz كتب :
(26-12-14, 02:46 PM)hassan كتب :
(26-12-14, 11:16 AM)mudz كتب :
(26-12-14, 11:12 AM)hassan كتب : للاسف نفس الخطاء باضبط اشك من النضام ؟؟؟؟؟؟

اخوووي اتأكد من الفيجوال بيسك شغال ع وش هل هو شغال ع نيتورك 4 ؟؟؟ او 3.5 اذا كان شغال اقل من اربعه فحطه على 4.5 او 4 وهذا قد يكون سبب
وجرب هذا الكود




كود :
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           '(f)ضع ملف التكست في ركويست ثم ضع اسمه بدل حرف
           Dim TextFile As String = My.Resources.f


           For i = 1 To TextFile.Split(vbNewLine).Count
               Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
           Next
       Catch MUDZ As Exception

       End Try
   End Sub
End Class

نفس الخطاء للاسف

اسمع سوي مثل م اقولك الان

رووح بروجيكت  ____,>  اخر خيار  بعد تلقى خانة (Target Framework)
وش مكتوب فيها وقولي الان
أو ارفق المشروع حقك  الان

NET.Framework 4.5


المشروع في المرفقات


الملفات المرفقة
.rar   WindowsApplication17.rar (الحجم : 66.16 ك ب / التحميلات : 37)
الحمد لله رب العالمين على كل شي
الرد }}}
تم الشكر بواسطة:
#18
لقد وجدت خطأ في مكان تعريفات الفورم
المفروض يكون system على كلن عدلت الخطا والمشروع مرفق وشكرا لك
Heart


الملفات المرفقة
.rar   تم التعديل.rar (الحجم : 74.51 ك ب / التحميلات : 38)
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
تم الشكر بواسطة:
#19
(26-12-14, 03:19 PM)mudz كتب : لقد وجدت خطأ في مكان تعريفات الفورم
المفروض يكون system على كلن عدلت الخطا والمشروع مرفق وشكرا لك
Heart

الله يعطيك العافيه مفروض انا الي اشكرك مو انت بس يالله هههههههههه 


اخوي بس اذا ممكن كيف عدلت الخطاء عشان استفيد انا

ووش الخطاء
الحمد لله رب العالمين على كل شي
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 169 02-03-24, 07:36 PM
آخر رد: new_programer
  ماهو حل هذا الخطأ في الكود melad2002 7 264 25-02-24, 12:25 AM
آخر رد: justforit
  كيفية انشاء سكريبت لقاعدة بيانات من خلال الكود heem1986 1 194 20-02-24, 12:00 AM
آخر رد: Kamil
  [VB.NET] أرغب فى استخدام هذا الكود بالتحديد على الإصدار 10 AmeenRashed 3 206 19-01-24, 12:42 PM
آخر رد: Taha Okla
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 464 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify
  [VB.NET] اريد تعديل في الكود عند طباعة DGV abu_hisham7 1 431 03-12-23, 02:40 AM
آخر رد: abu_hisham7
  رجاء التعديل على الكود المرفق - كلاس لعرض كود المورد new_programer 4 357 13-10-23, 01:47 AM
آخر رد: new_programer
  كيفية التحكم فى حجم الفورم من خلال الكود Ahmed.vb 4 510 11-10-23, 07:17 PM
آخر رد: bidaya
  اريد ارسال pdf عبر واتساب عن طريق ال API محتاج تعديل على الكود moh61 0 518 03-08-23, 03:41 PM
آخر رد: moh61
  اريد تغير حجم ال Panel عند التفيذ من داخل الكود moh61 2 403 23-07-23, 12:22 AM
آخر رد: أبووسم

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم