نیاز به کمک فوری در ویژوال بیسیک

شروع موضوع توسط ari84 ‏13 آگوست 2019 در انجمن منطق و الگوریتم برنامه‌نویسی

  1. ari84

    ari84 New Member

    ارسال‌ها:
    3
    تشکر شده:
    0
    امتیاز دستاورد:
    1
    من دوتا لیست باکس دارم که یکی شون ورودی از تکست باکس داره یکی دیگشون ورودی از تکس باکس اولی که گفتم داره حالا من میخوام تکست باکسام رو هسیوشون کنم به صورت خدکار وموقع ورود لود بشه باید چی کار کنم.
    باتشکر از انجمن.:)
     
    نوشته شده توسط ari84 در ‏13 آگوست 2019
  2. the_king

    the_king مدیرکل انجمن

    ارسال‌ها:
    10,959
    تشکر شده:
    11,121
    امتیاز دستاورد:
    113
    مقادیر داخل TextBox ها رو داخل یک فایل ذخیره کنید و از داخل همون فایل هم بخونید.
    برای نوشتن محتویات Text1 و Text2 در یک فایل :
    کد (Text):
        Open "Texts.txt" For Output As #1
        Print #1, Replace(Text1.Text, vbCrLf, "<BR>")
        Print #1, Replace(Text2.Text, vbCrLf, "<BR>")
        Close #1
    و برای خواندن مجدد اونها از فایل :
    کد (Text):
        Dim Text As String
        If Dir("Texts.txt") = "" Then Exit Sub
        Open "Texts.txt" For Input As #1
        Line Input #1, Text
        Text1.Text = Replace(Text, "<BR>", vbCrLf)
        Line Input #1, Text
        Text2.Text = Replace(Text, "<BR>", vbCrLf)
        Close #1
     
    نوشته شده توسط the_king در ‏13 آگوست 2019

به اشتراک بگذارید