23-03-19, 08:50 PM
السلام عليكم ورحمة الله
عندي كود يسحب الداتا من قاعدة البيانات من موقعي وينزلهم في ال DataGridView
المشكله عندي في الوقت
ينزل الوقت
كذا
00:00:00
كمثال
اريد اغير الى
00:00
يعني امسح اول ثلاث ارقام
بس حاولت ما ضبط معاي
هذا الكود
بحثت كثير بس ما حصلت حل
افيدوني بارك الله فيكم
وشكرا
عندي كود يسحب الداتا من قاعدة البيانات من موقعي وينزلهم في ال DataGridView
المشكله عندي في الوقت
ينزل الوقت
كذا
00:00:00
كمثال
اريد اغير الى
00:00
كود :
If itm3.Length = 8 Then
timek = itm3.Substring(3)
End If
يعني امسح اول ثلاث ارقام
بس حاولت ما ضبط معاي
هذا الكود
كود :
Private Sub BackgroundWorker2_DoWork(sender As Object, e As DoWorkEventArgs) Handles BackgroundWorker2.DoWork
Using cmd As New MySqlCommand(String.Format("SELECT id,dati,time,mode,band FROM cq_qso Where dxcallsign like '{0}' and cals like '{1}' order by dati DESC ", Opencontest, Label10.Text))
cmd.Connection = connection
cmd.CommandType = CommandType.Text
Using sda As New MySqlDataAdapter(cmd)
sda.Fill(table)
ProgressBar2.Maximum = table.Rows.Count - 0
BackgroundWorker2.ReportProgress(table.Rows.Count - 0)
End Using
End Using
End Sub
Private Sub BackgroundWorker2_ProgressChanged(sender As Object, e As ProgressChangedEventArgs) Handles BackgroundWorker2.ProgressChanged
ProgressBar2.Value = e.ProgressPercentage
Me.Label12.Text = e.ProgressPercentage & " Percent Completed!"
End Sub
Private Sub BackgroundWorker2_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles BackgroundWorker2.RunWorkerCompleted
Me.ProgressBar2.Visible = False
Label12.Text = "DONE!"
Cursor = Cursors.Default
For Each row As DataRow In table.Rows
dgvSelectAll.Rows.Add(row.ItemArray)
Label11.Text = dgvSelectAll.Rows.Count - 0
Label11.Text = String.Format("Number of QSO : {0} ", Label11.Text)
Next
End Sub
بحثت كثير بس ما حصلت حل
افيدوني بارك الله فيكم
وشكرا