هل يمكن استعمال iniread لقراءه اسطر متعددة

تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
هل يمكن استعمال iniread لقراءه اسطر متعددة
#1
هل يمكن استعمال iniread لقراءه اسطر متعددة
مثلآ يوجد ملف Settings.txt مكتوب فيه 
إقتباس :Set=test1
Set=test2
Set=test3
somethingelse=0
somethingelse=2
هل يمكن اضافة الكلام الى بعد Set ال هما test1 test2 test3 فى listbox بدون تكرار الكود مثل هذا 

كود :
Dim test As iniFile = New iniFile(Application.StartupPath + "\Settings.ini")

       For Each I In test.IniReadValue("Settings", "Set")
           ListBox1.Items.Add(I.ToString())
       Next
ini class
كود :
Imports System.Text

Public Class iniFile

   Public path As String

   Private Declare Auto Function WritePrivateProfileString Lib "kernel32" (ByVal section As String, ByVal key As String, ByVal val As String, ByVal filePath As String) As Long

   Private Declare Auto Function GetPrivateProfileString Lib "kernel32" (ByVal section As String, ByVal key As String, ByVal def As String, ByVal retVal As StringBuilder, ByVal size As Integer, ByVal filePath As String) As Integer

   Public Sub New(ByVal INIPath As String)
       MyBase.New()
       Me.path = INIPath
   End Sub

   Public Sub IniWriteValue(ByVal Section As String, ByVal Key As String, ByVal Value As String)
       iniFile.WritePrivateProfileString(Section, Key, Value, Me.path)
   End Sub

   Public Function IniReadValue(ByVal Section As String, ByVal Key As String) As String
       Dim temp As StringBuilder = New StringBuilder(255)
       Dim i As Integer = iniFile.GetPrivateProfileString(Section, Key, "", temp, 255, Me.path)
       Return temp.ToString
   End Function
End Class
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل يمكن عمل برنامج دورى كرة قدم على الفيجوال abo philomena 4 91 أمس, 06:08 AM
آخر رد: elgokr
  [VB.NET] كيف يمكن معرفة حجم قاعدة بيانات اكسسمن خلال VB.NET كريم جودي 4 74 11-08-18, 03:25 PM
آخر رد: كريم جودي
  [VB.NET] كيف يمكن تفادي مشكلة اقلاع البرنامج اكثر من مرة larbihamri 4 144 20-07-18, 03:29 AM
آخر رد: YousefOkasha
  [سؤال] هل يمكن تغيير ال opacity للفورم بعد التحميل ؟ dametucorazon 4 79 12-07-18, 09:29 AM
آخر رد: elgokr
  هل يمكن ان اجعل جدول على شكل مسودة اي بعد الحذف تحول البيانات الى المسودة hassan 14 1 93 09-06-18, 03:48 PM
آخر رد: elgokr
  [سؤال] كيف يمكن نقل صفيف من البيانات إلى عدة خلايا sheet- دفعة واحدة ferouk 1 67 04-06-18, 10:43 PM
آخر رد: mrnooo2000
  اين يمكن اقتناص هذا الحدث viv 5 147 01-06-18, 11:36 PM
آخر رد: viv
  كيف يمكن الحصول على احصائيات من قاعدة البيانات blida02 6 150 30-05-18, 03:50 AM
آخر رد: mrnooo2000
  هل يمكن اختصار هذا الكود blida02 6 155 29-05-18, 04:29 PM
آخر رد: blida02
  [VB.NET] اريد وضع صورة في الفورم والصورة متحركة هلي يمكن ان اضع الصورة في بكتشر بوكس fatma mohmed 1 104 28-05-18, 04:16 AM
آخر رد: elgokr

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


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