你可以用 TextOut API麼VB声明
Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
说明
文本绘图函数。也请参考SetTextAlign
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
hdc Long,设备场景的句柄
x,y Long,绘图的起点,采用逻辑坐标
lpString String,欲描绘的字串
nCount Long,字串中要描绘的字符数量
注解
在一个路径中,如绘图背景模式是“不透明”(opaque)——请参考SetBkMode函数,那么创建的轮廓将由字符单元格减去字符构成。如背景模式为透明,轮廓就由字符的字样本身构成
Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
说明
文本绘图函数。也请参考SetTextAlign
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
hdc Long,设备场景的句柄
x,y Long,绘图的起点,采用逻辑坐标
lpString String,欲描绘的字串
nCount Long,字串中要描绘的字符数量
注解
在一个路径中,如绘图背景模式是“不透明”(opaque)——请参考SetBkMode函数,那么创建的轮廓将由字符单元格减去字符构成。如背景模式为透明,轮廓就由字符的字样本身构成
解决方案 »
- 急急急~~~菜鸟出道,请VBA, excel大神指教!!!! 在线等
- 怎样用vba(vb)开发开发ftp客户器端
- 请问,,类模块没有可见界面,那定义属性是不是很难,还有方法和事件,
- 这个sql语句怎么写??
- 谁能讲讲到底vb程序的编码特色,难道什么事情都要靠事件激发吗,有没有更好的方式
- 靠,这是什么鸟错误,大侠们,有谁遇到过这问题???
- 如何将两个时间值相减后的值转为分种数?
- 求助:在VB中,将Access中的数据导入Excel中,如何保持原有格式?
- 谁有枚具网络邻居的源码?
- ADODC控件和Microsoft.Jet.OLEDB.4.0连接ACCESS2000的数据库为什么会出错!!!!
- 可以在VB中控制FLASH的显示质量,那么如何在VB中控制其窗口上的FLASH的播放速度呢?希望大家帮帮忙!高分相送!
- 怎样控制RICHTEXTBOX的行间距啊,希望大家能帮助,在线等待,答对有奖,先谢了!
Me.CurrentY=Me.CurrentY+120
Me.Print "ABCD"
Me.CurrentY=Me.CurrentY+120
Me.Print "汉字"