weixin_42429467的博客Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load PictureBox1.Image = Image.FromFile("C:\Users\hasee\Desktop\中国居民平衡膳食宝塔.jpg") End Sub
a771948524的博客Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long '创建一个椭圆,该椭圆与X1,Y1和X2,Y2坐标点确定的矩形内切 ...