تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] حفظ مدخلات الفورم للمستخدم
#1
السلام عليكم ورحمة الله وبركاته
عندي سؤالين مرتبطين ببعض :
أولاً: عندي هذا الكود  Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim TxtBox1, txtbox2, txtbox3 As New TextBox()
       With TxtBox1
           .Location = New Point(64, 40)
           .Size = New Size(100, 20)
           .TabIndex = 0
           .Text = ""
           With txtbox2
               .Location = New Point(64, 20)
               Size = New Size(100, 20)
               .Multiline = True
               .ScrollBars = ScrollBars.Both
               .TabIndex = 1
               .Text = ("")
               With txtbox3
                   .Location = New Point(64, 60)
                   .Size = New Size(100, 20)
                   .Multiline = True
                   .TabIndex = 0
                   .Text = ""
               End With
           End With
       End With
       Controls.Add(TxtBox1)
       Controls.Add(txtbox2)
       Controls.Add(txtbox3)

   End Sub
السؤال: هل يمكن اختصار هذا الكود بكود واحد لانشاء عدة تكست بوكس
السؤال الثاني : كيف يمكن حفظ المدخلات في هذه التكست لأني جربت بالطريقة SETTING ولكن لم تنفع , وشكرا لكم
الرد }}}}
تم الشكر بواسطة:
#2
السؤال الاول انا ما اقدر افيدك فيه
لاكن السوال الثانى فى فكرة لو تقدر تطبقها وهى عن طريق خفظ المدخلات على شكل لينات فى ملف txt على الكمبيوتر
يارب اذا اعطيتني علما...اعطني معه حكمه...واذا اعطيتني مالا....اعطيني معها كرما...واذا اعطيتني قوه...اعطني معها رحمه...واذا اعطيتني سلطه...اعطني معها عدلا...واذا اعطيتني مسئوليه...اعطيني معها امانه...واذا اعطيتني نجاحا...اعطني معها تواضعا...اللهم امين
الرد }}}}
تم الشكر بواسطة:
#3
PHP كود :
Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Me
.Controls.Add(Textb("Text1"6420))
 
       Me.Controls.Add(Textb("Text2"6445))
 
       Me.Controls.Add(Textb("Text3"6470))
 
   End Sub
    Function Textb
(ByVal mName As StringAs IntegerAs Integer) As TextBox
        Dim txt 
As New TextBox()
 
       txt.Name mName
        txt
.Location = New Point(xy)
 
       txt.Size = New Size(10020)
 
       AddHandler txt.TextChangedAddressOf Text_TextChanged
        txt
.Text GetSetting("A""B"mName)
 
       Return txt
    End 
Function

 
   Private Sub Text_TextChanged(sender As ObjectAs EventArgs)
 
       SaveSetting("A""B"sender.namesender.text)
 
   End Sub 
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إلغاء تركيز مؤشر الفأرة عند بداية تشغيل الفورم عبد العزيز البسكري 14 171 07-12-17, 09:27 PM
آخر رد: عبد العزيز البسكري
  [VB.NET] سؤال :- في تصميم الفورم dubai.eig 0 69 15-11-17, 11:09 AM
آخر رد: dubai.eig
  [VB.NET] عند فتح فورم يتم اغلاق الفورم النشط altho8 0 60 15-11-17, 12:47 AM
آخر رد: altho8
  رجاء ا ..اضافة داتاغريد على الفورم العيدروس 3 167 12-11-17, 02:45 AM
آخر رد: العيدروس
  [VB.NET] سؤال : بخصوص الفورم dubai.eig 6 127 09-11-17, 07:16 PM
آخر رد: dubai.eig
  [سؤال] الطباعة على الفورم تنمية المعرفة 9 140 30-10-17, 10:44 PM
آخر رد: Mohamad Anan
  [سؤال] الطباعة على الفورم تنمية المعرفة 1 75 30-10-17, 10:42 PM
آخر رد: Mohamad Anan
  الفورم الافتتاحي العيدروس 7 172 25-10-17, 09:59 PM
آخر رد: العيدروس
Photo [سؤال] لا استطيع إظهار زري التصغير والتكبير في الفورم عمرو المطري 2 89 23-10-17, 01:19 AM
آخر رد: عمرو المطري
  [VB.NET] عمل شاشة مؤقته تظهر عند تشغيل الفورم hglogtd 2 108 11-10-17, 07:36 PM
آخر رد: hglogtd

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


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