If FileSys.FileExists(CF_Address & "FMEA\\" & Tables("MainTable").current("Main_ID") & "\\ProcStructPic.jpg") Then
Dim p As WinForm.Painter = e.Form.Controls("Painter2")
Dim g As Graphics = p.Graphics
g.DrawImage(getImage(CF_Address & "FMEA\\" & Tables("MainTable").current("Main_ID") & "\\ProcStructPic.jpg"),0,0,p.Width,p.Height)
p.Repaint()
End If