حفظ مدخلات الفورم للمستخدم

تقييم الموضوع :
  • 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 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ضبط حجم الفورم مع دقة الشاشة mos3ab 5 636 أمس, 08:44 PM
آخر رد: Ali Naser
  كود ضبط حجم الفورم 100% Marwan9990 3 84 11-08-18, 01:31 AM
آخر رد: elgokr
  كيف التخلي عن شكل الفورم العادي معاذ العامري 4 127 29-07-18, 10:41 AM
آخر رد: معاذ العامري
  طباعة ليبل من الفورم نور الهدى الهدى 10 242 26-07-18, 09:02 PM
آخر رد: نور الهدى الهدى
  [VB.NET] إنهاء مهام الفورم larbihamri 6 126 22-07-18, 10:38 PM
آخر رد: elgokr
  [كود] تكرار خلفية الفورم الصوتية m.reyati 6 105 19-07-18, 07:57 PM
آخر رد: anoname
  [VB.NET] سؤال بخصوص تصغير الفورم محمد اسماعيل 10 159 18-07-18, 05:57 PM
آخر رد: محمد اسماعيل
  احتاج كود عدم السماح للمستخدم بتجاوز المحاولات maram2423 4 111 28-06-18, 07:44 AM
آخر رد: elgokr
Exclamation [VB.NET] كيف عمل هذا الفورم لعرض هذا النتائج به elgokr 10 2,020 23-06-18, 10:47 PM
آخر رد: YousefOkasha
  [سؤال] كيف اجعل الفورم يعمل على جميع الشاشات بدون تغيير او ضياع الكائنات داخل الفورم في vb.n اسيل1 1 158 20-06-18, 06:20 PM
آخر رد: محمد كريّم

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


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