【文件属性】:
文件名称:文字转图片控件
文件大小:48KB
文件格式:OCX
更新时间:2022-04-29 07:24:53
文字字符转图 转换控件 文本转换为图
文本文字转换为图片控件,有使用说明.....
'显示rtf文件.RText,显示txt文件.Text
Me.TextPicture1.RText = Clipboard.GetText
'转换为图片
Me.TextPicture1.UserControl_ToPicture
'输出图片
'到剪贴板
'Clipboard.Clear '清空剪贴板内容
'Clipboard.SetData Me.TextPicture1.Picture
'到控件
Me.Picture1.Cls
Me.Picture1.Picture = Me.TextPicture1.Picture
'Me.Picture1.PaintPicture Me.TextPicture1.Picture, 0, 0, Me.Picture1.Width, Me.Picture1.Height
'保存图片
Me.TextPicture1.PText = Text1.Text '保存的全路径包括全文件名
Me.TextPicture1.UserControl_SaPicture '保存图片