图片框大小不对

Question

我试图在运行时将图片框添加到我的表单中，但每次图片框都显示为 15 x 15 像素，即使我已经更改了大小。这是在图片框中添加的方法。它位于 class 中，Img 属性指的是已添加的 PNG 文件。

Public Sub Draw(_Position As Point)
    Dim pb As New PictureBox()
    pb.SizeMode = PictureBoxSizeMode.AutoSize
    pb.Width = 240
    pb.Height = 336
    pb.Top = 10
    pb.Left = 10
    pb.Image = Img
    CardProgram.Controls.Add(pb)
End Sub

当我运行这个程序的时候，结果是这样的：

编辑 2：我已将尺寸更改为原始图像大小，但分辨率仍然很低：

关于如何正确显示此图像的任何想法？

Answer 1

像下面这样更改您的代码，希望它能起作用。你给了先设置PB再设置size

Public Sub Draw(_Position As Point)
        Dim pb As New PictureBox()
        CardProgram.Controls.Add(pb)
        pb.SizeMode =        PictureBoxSizeMode.AutoSize
        pb.Width = 240
        pb.Height = 336
        pb.Top = 10
        pb.Left = 10
        pb.Image = Img

    End Sub

Answer 2

现在可以了。出于某种原因，当我将图像上传到 ImageList 时，它们被存储为 16x16 图像。所以我删除并重新上传它们，然后将 ImageList 的 ImageSize 属性更改为正确的尺寸。代码现在看起来像这样：

Public Sub Draw(_Position As Point)
    Dim pb As New PictureBox()
    CardProgram.Controls.Add(pb)
    pb.Top = 10
    pb.Left = 10
    pb.Image = Img
    pb.SizeMode = PictureBoxSizeMode.StretchImage
    pb.Size = pb.Image.Size
End Sub

感谢您的帮助！

图片框大小不对

Picturebox is the wrong size

vb.net

picturebox

winforms

visual-studio-2012