نمونه کد: ذخیره و خواندن لیست با WriteList و ReadList — مینیمال و کاربردی

وقتی داده‌ها چندتایی هستند (لیست خرید، کلمات بازی، تاریخچه جستجو) به‌جای دست‌وپنجه نرم‌کردن با متن، از WriteList و ReadList استفاده کنید؛ List را می‌دهید و B4A خودش هر آیتم را در یک خط فایل می‌نویسد و موقع خواندن همان List را برمی‌گرداند. اینجا هم اول یک حلقه ۵ آیتم می‌سازیم و بعد با حلقه دوم آیتم‌های خوانده‌شده را در Log چاپ می‌کنیم تا مطمئن شوید داده سالم برگشته. این روش برای داده‌های کوچک تا چند هزار آیتم کاملاً کافی است و نیازی به دیتابیس ندارد.

بدون نیاز به کتابخانه جانبی (فقط کتابخانه‌های داخلی B4A)

این قطعه‌کد به‌صورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکراری‌نبودن بررسی شده است. برای دیدن تکه‌کدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه می‌شود.

دسته‌بندیتکه کدها
تعداد بازدید۰
تعداد فروش۰
فرمت تحویلفایل دانلودی (بعد از پرداخت آنی فعال می‌شود)
پشتیبانیتیکت پشتیبانی در پنل کاربری

ویژگی‌های کلیدی

  • کد B4A آماده استفاده
  • توضیح کامل فارسی
  • کاملاً رایگان
  • بدون کتابخانه جانبی

هنوز نظری ثبت نشده است. اولین نفر باشید!

برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال می‌شود)

B4A — کد نمونه رایگان این تکه‌کد را می‌توانید مستقیم در پروژه بیسیک۴اندروید استفاده کنید 
Sub btnSave_Click
    Dim lst As List
    lst.Initialize
    For i = 1 To 5
        lst.Add("آیتم شماره " & i)
    Next
    File.WriteList(File.DirInternal, "saved_text.txt", lst)
    ToastMessageShow(lst.Size & " آیتم ذخیره شد", False)
End Sub

Sub btnLoad_Click
    If File.Exists(File.DirInternal, "saved_text.txt") Then
        Dim lst As List = File.ReadList(File.DirInternal, "saved_text.txt")
        For i = 0 To lst.Size - 1
            Log(lst.Get(i))
        Next
        ToastMessageShow("تعداد " & lst.Size & " آیتم خوانده شد", False)
    End If
End Sub

محصولات مشابه

تخصصی بیسیک۴اندرویدسورس‌کد آمادهآموزش گام‌به‌گامکتابخانه‌های کاربردیتحویل آنی بعد از پرداختپشتیبانی واقعی ۲۴/۷بروزرسانی رایگان+۹۷۰ محصول فعال