27-09-19, 05:17 PM
السلام عليكم اخوتي
عندي استعلام يعمل بشكل جيد عند وضعه في زر
ولكن عند وضعه في ال BackgroundWorker لايعمل
اين الخطأ اخوتي
ارجو ان اجد الحل
وهدا هو الكود المستخدم
عندي استعلام يعمل بشكل جيد عند وضعه في زر
ولكن عند وضعه في ال BackgroundWorker لايعمل
اين الخطأ اخوتي
ارجو ان اجد الحل
وهدا هو الكود المستخدم
PHP كود :
Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
dtEmployee_Table.Clear()
daEmployee_Table = New SqlDataAdapter("select * from Employee_Table order by Employee_ID ", connSQL)
daEmployee_Table.Fill(dtEmployee_Table)
DataGridView1.DataSource = (dtEmployee_Table)
With DataGridView1
.RowsDefaultCellStyle.SelectionBackColor = Color.BlueViolet
.RowsDefaultCellStyle.SelectionForeColor = Color.White
.ColumnHeadersDefaultCellStyle.BackColor = Color.SkyBlue
.Columns(0).DefaultCellStyle.BackColor = Color.Azure
.DefaultCellStyle.WrapMode = DataGridViewTriState.True
.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
.Columns(0).Visible = False
.Columns(1).Width = 354
.Columns(1).HeaderText = "إسم الموظف"
.Columns(2).Width = 354
.Columns(2).HeaderText = "الوظـيـفـه"
.DefaultCellStyle.Font = New Font("Times New Roman", 12, FontStyle.Bold)
.ColumnHeadersDefaultCellStyle.Font = New Font("Times New Roman", 12, FontStyle.Bold)
.Columns(0).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
.ColumnHeadersDefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
End With
Dim daEM As New SqlDataAdapter
Dim dtEM As New DataTable
daEM = New SqlDataAdapter("select * from Employee_Table order by Employee_Name ", connSQL)
daEM.Fill(dtEM)
ComboBox1.DataSource = dtEM
ComboBox1.DisplayMember = "Employee_Name"
ComboBox1.Text = ""
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Control.CheckForIllegalCrossThreadCalls = False
If Not BackgroundWorker1.IsBusy Then
BackgroundWorker1.RunWorkerAsync()
End If
End Sub

