- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 能不能把jpg文件压成160*120，大小在10K至15K之间 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=67173)
-- 发布时间：2015/4/19 21:23:00
-- 能不能把jpg文件压成160*120，大小在10K至15K之间
能不能把jpg文件压成160*120，大小在10K至15K之间？
不改高与宽，怎样控制图片像素？达到控到图片大小的效果！
-- 发布时间：2015/4/19 22:22:00
--
For Each File As String In FileSys.GetFiles(tpath)
Dim f As Io.FileInfo = FileSys.GetFileInfo(File)
Dim s As String
s = f.name
Dim img As image = getImage(file)
Dim bmp As new bitmap(img,120,160)
bmp.save(spath & s & ".jpg")
bmp.Dispose
Next
怎样在上面设置BMP.JPG的像素，以达到控制图片文件大小的效果？
-- 发布时间：2015/4/19 23:27:00
--
120,160不就是像素吗？
-- 发布时间：2015/4/20 1:40:00
--
这是指高度和宽度，我说的是分辩率！
此主题相关图片如下：qq截图20150420013740.jpg
-- 发布时间：2015/4/20 8:38:00
--
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=67185