Dim a = New Bitmap( _ My.Application.Info.DirectoryPath & "\ping.png") Dim b As New Bitmap(a.Width, a.Height) Dim g As Graphics = Graphics.FromImage(b) g.DrawImage(a, 0, 0) PictureBox1.Image = b g.Dispose()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)