[vb.net] 이미지(png, jpg, bmp 등) 파일을 아이콘(ico) 파일로 변환

728x90

        Dim fileName As String = "EX.png"
        Dim newFileName As String = "ico.ico"
        Dim bmp As System.Drawing.Bitmap = System.Drawing.Image.FromFile(fileName, True)
        Dim ico As System.Drawing.Icon = System.Drawing.Icon.FromHandle(bmp.GetHicon())
        Dim icofs As Stream = File.Create(newFileName)
        ico.Save(icofs) : icofs.Close()