Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub lctupdatedtgrd_CellContentClick(sender As System.Object, e As System.Windows.Forms.DatagridViewCellEventArgs) Handles lctupdatedtgrd.CellContentClick`
- Dim img1 as Byte()
- img1= lctupdatedtgrd.CurrentRow.Cells(91).Value
- Dim ms1 as New MemoryStream(img1)
- Me.artworkpicbox.Image= Image.FromStream(ms1)
- End Sub
- Private Sub ResetToolStripMenuItem1_Click(sender As System.Object, e As System.EventArgs) Handles ResetToolStripMenuItem1.Click
- Dim currentfilename as String= Nothing
- Dim original as Image= Nothing
- currentfilename=filepath.Text
- If Not (finalcopy.Image Is Nothing) Then
- Dim fs as FileStream
- fs= New Filestream(currentfilename, IO.FilemMode.Open, IO.FileAccess.Read)
- finalcopy.Image=Image.FromStream(fs)
- fs.Close()
- original= finalcopy.Image
- End if
- End Sub
Add Comment
Please, Sign In to add comment