当前位置:编程学习 > VB >>

vb 图片上打印文字

请问vb怎么在jpg图片制定位子上打印文字并保存?谢谢。我是从txt里读取文字,再批量打印。 --------------------编程问答--------------------
Picture1.ScaleMode = 3
Picture1.CurrentX = 10
Picture1.CurrentY = 10
Picture1.Print "文字输出ABC"
--------------------编程问答--------------------
Option Explicit

Dim sTxt As String '读取的文字

Private Sub Command1_Click()
    Picture1.ScaleMode = 3
    Picture1.CurrentX = 10
    Picture1.CurrentY = 10
    Picture1.AutoRedraw = True
    Picture1.Print sTxt
    SavePicture Picture1.Image, "c:\tt.bmp"
    
End Sub

Private Sub Form_Load()
    sTxt = "zdfbzfbnsgnjdgfnmdghmdghszfdbsfdhbsfhsfghnsdfgnh" '读取的文字
    Picture1.Picture = LoadPicture("c:\pp.bmp")
End Sub


参考文献:
http://topic.csdn.net/u/20080331/19/6c605dcc-2f22-4de7-a7f2-c6c122a615f7.html?1759399285
http://topic.csdn.net/u/20081020/17/452ec679-d433-44d2-9035-ab067cb4add6.html?seed=607738466
--------------------编程问答-------------------- --------------------编程问答-------------------- 如果文字样式比较多样的话,建议你使用GDI+来绘制。 --------------------编程问答-------------------- 我正需要呢,有完整代码吗
补充:VB ,  API
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,