vb.net图片加文字 vb在图片框显示文字

让VB在图片指定位置加入文字VB6.0中使用函数功能,可实现在vb的picture图中写文字,且字号及字体颜色可按要求改变,代码如下:
Option
Explicit
Dim
xx,
yy
As
Integer
Dim
fnt
As
Long
Dim
txt
As
String
Dim
colvb
As
String
Dim
wp
As
Variant
Public
Function
xp(colvb
As
Variant,
xx
As
Variant,
yy
As
Variant,
fnt
As
Variant,
txt
As
Variant)
Picture1.ForeColor
=
colvb
'QBColor(14)
Picture1.CurrentX
=
xx
Picture1.CurrentY
=
yy
Picture1.FontSize
=
fnt
Picture1.Print
txt
'
End
Function
Private
Sub
Form_Load()
Picture1.AutoRedraw
=
True
xx
=
500
yy
=
500
fnt
=
24
colvb
=
vbRed
txt
=
"这是VB对PICTURE图片框的图片上写字的演示"
wp
=
xp(colvb,
xx,
yy,
fnt,
txt)
xx
=
500
yy
=
2500
fnt
=
48
colvb
=
vbGreen
txt
=
"字号调大的演示"
wp
=
xp(colvb,
xx,
yy,
fnt,
txt)
End
Sub
求大神指点 vb.net 怎么绘制一张有文字的图呢?并用 PictureBox1 显示出来picture本身不是文本控件,文本是“画”上去的,换行需要用代码测量每个字在指定字体下的宽度,判断在当前picture的宽度之下,一行能容纳多少文字,剩下的文字就在下一行绘制 。
VB.NET中怎么在图片上直接输出文字 。向VB中有Print的方法两种方法:
图片框上盖个Label 向其输入内容 。
载入图片,通过内存直接 DrawImage绘制个新图,然后在图上盖文字 。最后赋值给图片框 。
VB6的print 实质是向图片框打印文字 , 不管有无图都能在上面Print. 考虑速度和实现难度问题,如果纯粹显示,最好直接盖个Label最简单 。第二种方法 需要考虑文字大小、颜色、坐标定位等等 。如果一行文字显示不下,不会自动换行,得自己切 。
【vb.net图片加文字 vb在图片框显示文字】vb.net图片加文字的介绍就聊到这里吧,感谢你花时间阅读本站内容 , 更多关于vb在图片框显示文字、vb.net图片加文字的信息别忘了在本站进行查找喔 。

    推荐阅读