(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 Object, e As EventArgs) Handles Button2.Click
Dim form As New Form3
form.الاسمTextBox.Text = Table1DataGridView(1, Table1DataGridView.SelectedRows(0).Index).Value
form.اللقبTextBox.Text = Table1DataGridView(2, Table1DataGridView.SelectedRows(0).Index).Value
If (Not String.IsNullOrWhiteSpace(Table1DataGridView(3, Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
form.تاريخ_الولادةDateTimePicker.Value = Convert.ToDateTime(Table1DataGridView(3, Table1DataGridView.SelectedRows(0).Index).Value.ToString)
End If
form.مكان_الولادةTextBox.Text = Table1DataGridView(4, Table1DataGridView.SelectedRows(0).Index).Value
form.الجنسComboBox.Text = Table1DataGridView(5, Table1DataGridView.SelectedRows(0).Index).Value
form.العمرTextBox.Text = Table1DataGridView(6, Table1DataGridView.SelectedRows(0).Index).Value
form.رقم_جواز_السفرTextBox.Text = Table1DataGridView(7, Table1DataGridView.SelectedRows(0).Index).Value
If (Not String.IsNullOrWhiteSpace(Table1DataGridView(8, Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
form.تاريخ_الاصدارDateTimePicker.Value = Convert.ToDateTime(Table1DataGridView(8, Table1DataGridView.SelectedRows(0).Index).Value.ToString)
End If
If (Not String.IsNullOrWhiteSpace(Table1DataGridView(9, Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
form.تاريخ_الانتهاءDateTimePicker.Value = Convert.ToDateTime(Table1DataGridView(9, Table1DataGridView.SelectedRows(0).Index).Value.ToString)
End If
form.بطاقة_التعريف_الوطنيةComboBox.Text = Table1DataGridView(10, Table1DataGridView.SelectedRows(0).Index).Value
form.رقم_بطاقة_التعريفTextBox.Text = Table1DataGridView(11, Table1DataGridView.SelectedRows(0).Index).Value
form.جنسية_اخريComboBox.Text = Table1DataGridView(12, Table1DataGridView.SelectedRows(0).Index).Value
form.اسم_الابTextBox.Text = Table1DataGridView(13, Table1DataGridView.SelectedRows(0).Index).Value
form.اسم_الجدTextBox.Text = Table1DataGridView(14, Table1DataGridView.SelectedRows(0).Index).Value
form.اسم_ولقب_الامTextBox.Text = Table1DataGridView(15, Table1DataGridView.SelectedRows(0).Index).Value
form.المهنةTextBox.Text = Table1DataGridView(16, Table1DataGridView.SelectedRows(0).Index).Value
form.الصفةComboBox.Text = Table1DataGridView(17, Table1DataGridView.SelectedRows(0).Index).Value
form.ايمايلTextBox.Text = Table1DataGridView(18, Table1DataGridView.SelectedRows(0).Index).Value
form.العنوان_بالاماراتComboBox.Text = Table1DataGridView(19, Table1DataGridView.SelectedRows(0).Index).Value
form.الهاتف_بالاماراتTextBox.Text = Table1DataGridView(20, Table1DataGridView.SelectedRows(0).Index).Value
form.العنوان_بتونسTextBox.Text = Table1DataGridView(21, Table1DataGridView.SelectedRows(0).Index).Value
form.الهاتف_بتونسTextBox.Text = Table1DataGridView(22, Table1DataGridView.SelectedRows(0).Index).Value
form.الحالة_الاجتماعيةComboBox.Text = Table1DataGridView(23, Table1DataGridView.SelectedRows(0).Index).Value
form.اسم_ولقب_الزوج_ة_TextBox.Text = Table1DataGridView(24, Table1DataGridView.SelectedRows(0).Index).Value
form.جنسية_الزوج_ة_TextBox.Text = Table1DataGridView(25, Table1DataGridView.SelectedRows(0).Index).Value
form.جنسية_اخريComboBox.Text = Table1DataGridView(26, Table1DataGridView.SelectedRows(0).Index).Value
If (Not String.IsNullOrWhiteSpace(Table1DataGridView(27, Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
form.الصلوحيةDateTimePicker.Value = Convert.ToDateTime(Table1DataGridView(27, Table1DataGridView.SelectedRows(0).Index).Value.ToString)
End If
If (Not String.IsNullOrWhiteSpace(Table1DataGridView(28, Table1DataGridView.SelectedRows(0).Index).Value.ToString)) Then
form.انتهاء_الصلوحيةDateTimePicker.Value = Convert.ToDateTime(Table1DataGridView(28, Table1DataGridView.SelectedRows(0).Index).Value.ToString)
End If
form.الملاحظاتTextBox.Text = Table1DataGridView(29, Table1DataGridView.SelectedRows(0).Index).Value
Form3.Show()
Me.Hide()