تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] جلب بينات من الداتا جريد فيور الى فورم 2 تاكست بوكس
#11
(25-02-19, 03:03 PM)anis كتب : السلام عليكم . هذه اول مشاركة لى ببرنامجكم الرجاء مساعدتي 
السؤوال : جلب بينات من الداتا جريد فيور على الفورم1 واظهارها علي الفورم 2 بالتابل ديتيلس او تاكست بوكس

(10-03-19, 11:16 PM)anis كتب :
(25-02-19, 03:03 PM)anis كتب : السلام عليكم . هذه اول مشاركة لى ببرنامجكم الرجاء مساعدتي 
السؤوال : جلب بينات من الداتا جريد فيور على الفورم1 واظهارها علي الفورم 2 بالتابل ديتيلس او تاكست بوكس

(26-02-19, 09:17 PM)حريف برمجة كتب : اضغط المجلد كامل ،،

انته ففقط ضغطت ايقونة تشغيل البرنامج .

(10-03-19, 11:16 PM)anis كتب :
(25-02-19, 03:03 PM)anis كتب : السلام عليكم . هذه اول مشاركة لى ببرنامجكم الرجاء مساعدتي 
السؤوال : جلب بينات من الداتا جريد فيور على الفورم1 واظهارها علي الفورم 2 بالتابل ديتيلس او تاكست بوكس

(10-03-19, 11:16 PM)anis كتب :
(25-02-19, 03:03 PM)anis كتب : السلام عليكم . هذه اول مشاركة لى ببرنامجكم الرجاء مساعدتي 
السؤوال : جلب بينات من الداتا جريد فيور على الفورم1 واظهارها علي الفورم 2 بالتابل ديتيلس او تاكست بوكس

(26-02-19, 09:17 PM)حريف برمجة كتب : اضغط المجلد كامل ،،

انته ففقط ضغطت ايقونة تشغيل البرنامج .

PHP كود :
 Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        Dim form 
As New Form3

        form
.الاسمTextBox.Text Table1DataGridView(1Table1DataGridView.SelectedRows(0).Index).Value
        form
.اللقبTextBox.Text Table1DataGridView(2Table1DataGridView.SelectedRows(0).Index).Value
        If 
(Not String.IsNullOrWhiteSpace(Table1DataGridView(3Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
            form
.تاريخ_الولادةDateTimePicker.Value Convert.ToDateTime(Table1DataGridView(3Table1DataGridView.SelectedRows(0).Index).Value.ToString)
 
       End If
 
       form.مكان_الولادةTextBox.Text Table1DataGridView(4Table1DataGridView.SelectedRows(0).Index).Value
        form
.الجنسComboBox.Text Table1DataGridView(5Table1DataGridView.SelectedRows(0).Index).Value
        form
.العمرTextBox.Text Table1DataGridView(6Table1DataGridView.SelectedRows(0).Index).Value
        form
.رقم_جواز_السفرTextBox.Text Table1DataGridView(7Table1DataGridView.SelectedRows(0).Index).Value
        If 
(Not String.IsNullOrWhiteSpace(Table1DataGridView(8Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
            form
.تاريخ_الاصدارDateTimePicker.Value Convert.ToDateTime(Table1DataGridView(8Table1DataGridView.SelectedRows(0).Index).Value.ToString)
 
       End If
 
       If (Not String.IsNullOrWhiteSpace(Table1DataGridView(9Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
            form
.تاريخ_الانتهاءDateTimePicker.Value Convert.ToDateTime(Table1DataGridView(9Table1DataGridView.SelectedRows(0).Index).Value.ToString)
 
       End If
 
       form.بطاقة_التعريف_الوطنيةComboBox.Text Table1DataGridView(10Table1DataGridView.SelectedRows(0).Index).Value
        form
.رقم_بطاقة_التعريفTextBox.Text Table1DataGridView(11Table1DataGridView.SelectedRows(0).Index).Value
        form
.جنسية_اخريComboBox.Text Table1DataGridView(12Table1DataGridView.SelectedRows(0).Index).Value
        form
.اسم_الابTextBox.Text Table1DataGridView(13Table1DataGridView.SelectedRows(0).Index).Value
        form
.اسم_الجدTextBox.Text Table1DataGridView(14Table1DataGridView.SelectedRows(0).Index).Value
        form
.اسم_ولقب_الامTextBox.Text Table1DataGridView(15Table1DataGridView.SelectedRows(0).Index).Value
        form
.المهنةTextBox.Text Table1DataGridView(16Table1DataGridView.SelectedRows(0).Index).Value
        form
.الصفةComboBox.Text Table1DataGridView(17Table1DataGridView.SelectedRows(0).Index).Value
        form
.ايمايلTextBox.Text Table1DataGridView(18Table1DataGridView.SelectedRows(0).Index).Value
        form
.العنوان_بالاماراتComboBox.Text Table1DataGridView(19Table1DataGridView.SelectedRows(0).Index).Value
        form
.الهاتف_بالاماراتTextBox.Text Table1DataGridView(20Table1DataGridView.SelectedRows(0).Index).Value
        form
.العنوان_بتونسTextBox.Text Table1DataGridView(21Table1DataGridView.SelectedRows(0).Index).Value
        form
.الهاتف_بتونسTextBox.Text Table1DataGridView(22Table1DataGridView.SelectedRows(0).Index).Value
        form
.الحالة_الاجتماعيةComboBox.Text Table1DataGridView(23Table1DataGridView.SelectedRows(0).Index).Value
        form
.اسم_ولقب_الزوج_ة_TextBox.Text Table1DataGridView(24Table1DataGridView.SelectedRows(0).Index).Value
        form
.جنسية_الزوج_ة_TextBox.Text Table1DataGridView(25Table1DataGridView.SelectedRows(0).Index).Value
        form
.جنسية_اخريComboBox.Text Table1DataGridView(26Table1DataGridView.SelectedRows(0).Index).Value
        If 
(Not String.IsNullOrWhiteSpace(Table1DataGridView(27Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
            form
.الصلوحيةDateTimePicker.Value Convert.ToDateTime(Table1DataGridView(27Table1DataGridView.SelectedRows(0).Index).Value.ToString)
 
       End If
 
       If (Not String.IsNullOrWhiteSpace(Table1DataGridView(28Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
            form
.انتهاء_الصلوحيةDateTimePicker.Value Convert.ToDateTime(Table1DataGridView(28Table1DataGridView.SelectedRows(0).Index).Value.ToString)

 
       End If
 
       form.الملاحظاتTextBox.Text Table1DataGridView(29Table1DataGridView.SelectedRows(0).Index).Value

        Form3
.Show()
 
       Me.Hide() 


الملفات المرفقة صورة/صور
               
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: جلب بينات من الداتا جريد فيور الى فورم 2 تاكست بوكس - بواسطة anis - 10-03-19, 11:16 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] حفظ تنسيق الفورم ثم تطبيقة علي فورم اخر فيجوال بيسك abo ragab 7 1,238 09-07-25, 12:45 AM
آخر رد: abo ragab
  [VB.NET] تكست بوكس EMADW 3 454 09-05-25, 05:09 PM
آخر رد: princelovelorn
  [VB.NET] استدعاء داتا كريت فيو من فورم اخر EMADW 1 421 16-04-25, 06:10 PM
آخر رد: مصمم هاوي
  [VB.NET] عدم ظهور فورم نهى على خليل 0 294 02-04-25, 02:59 PM
آخر رد: نهى على خليل
  مشكاه غريبه ظهرت لى فى فورم خالد كامل1 1 332 15-02-25, 02:11 PM
آخر رد: خالد كامل1
  كود لتغير لون الخط فى التكست بوكس خالد كامل1 1 343 31-01-25, 06:22 PM
آخر رد: أبو خالد الشكري
  [كود] كود تغيير حجم النص في التكست بوكس hassan 8 8,800 30-01-25, 02:33 AM
آخر رد: خالد كامل1
  مساعدة في استيراد البيانات من الليست بوكس fireswored1 4 481 22-01-25, 08:43 PM
آخر رد: fireswored1
  [VB.NET] تعبئة كومبو بوكس بقواعد البيانات الموجوده علي السيرفر Mustafa Shaker 6 4,113 23-12-24, 03:59 PM
آخر رد: aljzazy
  ابغي ارجع قيمة الداتا قراد فيو من جديد عندي مشكله khalidalwdi 3 637 05-12-24, 02:21 AM
آخر رد: aljzazy

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


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