15-12-15, 10:52 PM
(15-12-15, 10:47 PM)HASAN6.0 كتب : ضع هذا الكود
في اول سطرPHP كود :
Imports System.IO
ثم هذا
PHP كود :
Private Sub DataGridView1_SelectionChanged(sender As Object, e As EventArgs) Handles DataGridView1.SelectionChanged
If DataGridView1.Rows.Count = 0 Then Exit Sub
If IsNothing(DataGridView1.CurrentRow) Then Exit Sub
Dim picfile As String = Application.StartupPath & "\pictures\" & DataGridView1.CurrentRow.Cells(1).Value.ToString.Trim
If File.Exists(picfile) Then
PictureBox1.Image = Image.FromFile(picfile)
Else
PictureBox1.Image = Nothing
End If
End Sub
بدل الكود السابق
الله ينور عليك ويرحم والديك ويجعل ايامك كلها افراح وجعلك الله ممن يظلهم الله في ظله يوم لاظل الا ظله وجزاك الله خيرا وجعلك الله وكل اهلك واسرتك من اهل الجنان يالله يارحمن
