16,554
社区成员
发帖
与我相关
我的任务
分享
Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
Dim G As Graphics = Me.CreateGraphics
G.DrawImage(PictureBox1, New Rectangle(PictureBox1.X, _
PictureBox1Point.Y,PictureBox1Width, PictureBox1Height))
End Sub
Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles Me.Resize
Me.Refresh()
End Sub