728x90
반응형
Dim fileName AsString="EX.png"
Dim newFileName AsString="ico.ico"
Dim bmp AsSystem.Drawing.Bitmap=System.Drawing.Image.FromFile(fileName, True)
Dim ico AsSystem.Drawing.Icon=System.Drawing.Icon.FromHandle(bmp.GetHicon())
Dim icofs As Stream=File.Create(newFileName)
ico.Save(icofs) : icofs.Close()
Visual Basic이 보이는 그림책, 성안당
14,400원 (포스팅일기준) |

반응형
댓글