VB 能否利用 TEXT 折行特性，把中英文混排文字段落分为几行？

Question

KENT回复：建立一个临时数据库文件，TEXT内容存入MEMO属性的临时数据字段，
再调出打印。

Answer 1

可以用以下方法取得每行的字符数,然后在每行后加一个会车符
Dim i As Integer
Dim j As Integer
Dim leng As Integer
Dim all As Integer
i = SendMessage(Me.Text1.hwnd, EM_GETLINECOUNT, 0, 0)
For j = 1 To i
    leng = SendMessage(Me.Text1.hwnd, EM_LINELENGTH, all + 1, 0)
    all = leng + all
Next

Answer 2

数值！
EM_GETLINECOUNT 和 EM_LINELENGTH 的数值是多少！
我在那里可以找到这些数值！SendMessage 的技术资料太不好查了！

Answer 3

你可以用api viewer来查看Public Const EM_LINELENGTH = &HC1
Public Const EM_GETLINECOUNT = &HBA

Answer 4

利用 EM_FMTLINE能否加回车符?

Answer 5

就是从 text 或 richtext 中的中英文混排的文字
转换为一个字符串数组！ 
谢了！

Answer 6

用 vb5 实验有问题，今天实验一下，没错！耽误 Tony_Yuan 得分了！抱歉！