主题：请教关于处理照片的一个问题

     e.Form.Controls("PictureViewer1").Visible =False

    Dim r As Row =Tables("员工").Current

    Dim p As WinForm.Painter = e.Form.Controls("Painter1")

    Dim g As Graphics = p.Graphics

    g.DrawImage(getImage(r("照片")),8,8,100,100)

    

    Dim g1 As Graphics = p.Graphics

    g1.DrawImage(getImage("delete.ico"),100,90,50,50)

    p.Repaint()

Else

    e.Form.Controls("PictureViewer1").Visible =True

End If