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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تاثير فى الفورم Mohamed20 2 43 12-02-17, 10:00 PM
آخر رد: Mohamed20
  تثبيت الفورم على امر معين anes 8 135 12-02-17, 02:07 AM
آخر رد: مساعدة
  التعديل الذي أقوم به في الفورم لا يظهر عند عمل RUN نسيم 10 405 23-01-17, 12:02 AM
آخر رد: aboyasneen
  فصل جزء من ايمج بلون محدد الى ايمج اخرى على الفورم samira20 3 99 19-01-17, 03:09 PM
آخر رد: silverlight
  اريد كود غلق الفورم الحالى وفتح فورم اخر ali.alfoly 8 3,142 04-01-17, 09:18 PM
آخر رد: jojo2014
Sad [سؤال] عدم ظهور التغيرات على الفورم بعد التشغيل أحمد عبد الكريم 2 132 28-12-16, 10:17 PM
آخر رد: HASAN6.0
  اظهار او اخفاء الرسائل للمستخدم العواد الصغير 11 302 09-11-16, 06:43 PM
آخر رد: العواد الصغير
Bug مشكلة في تصميم الفورم shwehdi4pc 4 234 31-10-16, 02:14 PM
آخر رد: shwehdi4pc
  طباعة الفورم rabeh.ram 7 317 27-10-16, 04:13 AM
آخر رد: rabeh.ram
  حفظ اعدادات الفورم والادوات العواد الصغير 8 312 23-10-16, 07:59 AM
آخر رد: العواد الصغير

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


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