VB 有没方法把rtf 或txt文本内容转成BMP图片
如题
如果是txt，
可以将其内容逐行或逐段读到字符串中，
然后用Form或PictureBox控件的Print方法显示
再使用窗口截屏功能保存到bmp文件
也可以用VB调用Word.Application对象在Word里面打开相应txt或rtf文件，再将Word窗口截屏保存到bmp文件
rtf可以load到richedit中，再保存界面就差不多了。
我的想法就是将文本读进richtext后，通过获得文本框的hwnd，然后截屏再保存，就达到LZ的要求了
关注下.
借鉴chenjl1031发表的文本框控件Text1中显示位图是可以的，这需要用API函数BitBlt将位图从Picture1复制到Text1中，要先建立DC。代码作修改:
VB code:
Option Explicit
Private Declare Function GetDC Lib "user32.dll" (ByVal hwnd As Long) As Long
Private Declare Function ReleaseDC Lib "user32.dll" (ByVal hwnd As Long, ByVal hdc As Long) As Long
Private Declare Function BitBlt Lib "gdi32.dll" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Private Const SRCCOPY As Long = &HCC0020
Private Sub Command1_Click() '将TEXTBOX文本作为图象转到PICTUREBOX中
Dim TextDC As Long
Dim Wpic As Long, Hpic As Long
Wpic = Picture1.Width
Hpic = Picture1.Height
'取得文本框DC
TextDC = GetDC(Text1.hwnd)
Call BitB
相关问答：
看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1 ......
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
vb是不是很牛啊 怎么那么多的病毒都是vb做的啊 c#行不行？
c#在XP运行不了，除非让别人先装上.net.
VB相对于C,C++,ASM等等，局限性大多了。
别再说什么语言不如什么语言的话了，只有你不会用或用着不顺手的� ......
Private Sub Form_Load()
recs = Adodc1.Recordset.RecordCount '求当前记录数
If recs > 0 Then '已有考生
Adodc1.Recordset.MoveLast '移到最后一条记录
num = V ......
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
