vb中的text中内容怎么一键导出文字到word 只有文字啊 顺便看看能不能导出到2010的版本
2个回答
展开全部
当然是可以的,可用如下方法实现:
用shell启动word
获取新打开word窗口的句柄
向目标窗口发送文本即可。
发送文本用SendMessage或postmessage等API函数
用shell启动word
获取新打开word窗口的句柄
向目标窗口发送文本即可。
发送文本用SendMessage或postmessage等API函数
追问
小白求代码、、、
追答
之前的回答也算是个玩笑,方法很多,不必这么大量调用API;
VB对于word,excel等都有相应操作,如下给出源码,楼主看了便知
Dim MyWord As Object, NewDoc As Object '声明
Private Sub Command1_Click()
Set MyWord = CreateObject("Word.Application") '创建
MyWord.Visible = False '隐藏
MyWord.Caption = "源自VB输出文本" '标题
Set NewDoc = Nothing '初始化
Set NewDoc = MyWord.Documents.Add '增加纪录
NewDoc.Paragraphs(1).Range.Text = Text1.Text '写入内容
MyWord.ActiveDocument.SaveAs (App.Path & "\VB输出.doc") '保存
MyWord.Visible = True '显示结果
End Sub
更多功能,查阅msdn关于wordbasic的描述。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询