如何生成图片报表?
请问各位vb高手,我想在做报表的时侯直接生成图片用email发出去,请问该如何做,有没有这方面的例子,万分感谢!!!!!!!!!! 问题点数：75、回复次数：12Top
1 楼itxjh（itxjh）回复于 2001-10-26 11:43:04 得分 70
这是个乖问题，让我想想先！Top
2 楼mkiss（小kiss）回复于 2001-12-21 16:56:44 得分 0
没有高手吗！加分了Top
3 楼mkiss（小kiss）回复于 2001-12-26 09:59:41 得分 0
没有人会！Top
4 楼WizardBear（飞猫_重起机器）回复于 2001-12-26 10:23:15 得分 0
用柯达控件，在一张空白图片上写报表内容，然后另存成图片就行啦。。。Top
5 楼mkiss（小kiss）回复于 2001-12-26 10:37:47 得分 0
楼上的说详细一点好吗？Top
6 楼wufang（蓝点）回复于 2001-12-26 10:46:46 得分 0
g..zTop
7 楼mkiss（小kiss）回复于 2001-12-27 08:45:27 得分 0
tttTop
8 楼mkiss（小kiss）回复于 2001-12-29 09:40:00 得分 0
tttTop
9 楼mkiss（小kiss）回复于 2001-12-31 15:39:55 得分 0
再up一下，看来今年解决不了了。Top
10 楼WizardBear（飞猫_重起机器）回复于 2002-01-08 14:04:46 得分 5
mkiss(小kiss)：
就是相当于编辑一个图片，往图片上写字，可以实现吧？
把你的报表当成文字写到图片上！！！！Top
11 楼mkiss（小kiss）回复于 2002-01-08 16:09:20 得分 0
WizardBear(WizardBear):具体一点好不好!给点例子okTop
12 楼WizardBear（飞猫_重起机器）回复于 2002-01-30 09:25:59 得分 0
放一个picturebox控件：
With Picbox1
.ForeColor = &H0&
.FontSize = 48
.CurrentX = 1 * Picbox1.Width / 15
.CurrentY = 4 * Picbox1.Height / 50
Picbox1.Print strTitle '给相片加字
.FontSize = 36
.CurrentX = 1 * Picbox1.Width / 15
.CurrentY = 40 * Picbox1.Height / 50
Picbox1.Print "姓名:" & strName '给相片加字
.CurrentX = 1 * Picbox1.Width / 15
.CurrentY = 45 * Picbox1.Height / 50
Picbox1.Print "性别:" & strSex '给相片加字
'加图案
.CurrentX = 12 * Picbox1.Width / 15
.CurrentY = 3 * Picbox1.Height / 50
Picbox1.PaintPicture LoadPicture(App.Path + "\photo-8.jpg"), .CurrentX, .CurrentY
End With
Top
