vb.net操作word
PublicSubTextbox1_KeyDown(ByValsenderAsSystem.Object,ByValeAsSystem.Windows.Forms.Key...
Public Sub Textbox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDownIf e.KeyCode = Keys.Enter ThenDim p As String = InputBox("请输入")Dim WDAPP As ObjectWDAPP = CreateObject("Word.Application")WDAPP.Documents.Add(TextBox1.Text)WDAPP.Selection.Find.ClearFormatting()With WDAPP.Selection.Find.Text = pDim i As Stringi = WDAPP.Selection.Information(3)WDAPP.Selection.TypeText(text:=p)WDAPP.documents.add(TextBox2.Text)WDAPP.Selection.MoveDown(Unit:=WDAPP.wdParagraph, Count:=1)
WDAPP.Selection.EndKey() WDAPP.Selection.ParagraphFormat.TabStops.Add(Position:=WDAPP.CentimetersToPoints(15.24), Alignment:=WDAPP.wdAlignTabRight, Leader:=WDAPP.wdTabLeaderDashes) WDAPP.Selection.TypeText(Text:=vbTab) WDAPP.Selection.TypeText(Text:=i) WDAPP.Selection.TypeText(Text:=vbCrLf) End With End If 两个textbox分别是读的文件地址，和写的文件地址。
这是执行后的报错
应该怎么修改，还有我打开那个被写的文件时候说是被绑定了不能操作，这是什么情况
求在源码上修改
打开写的word报错的 展开
WDAPP.Selection.EndKey() WDAPP.Selection.ParagraphFormat.TabStops.Add(Position:=WDAPP.CentimetersToPoints(15.24), Alignment:=WDAPP.wdAlignTabRight, Leader:=WDAPP.wdTabLeaderDashes) WDAPP.Selection.TypeText(Text:=vbTab) WDAPP.Selection.TypeText(Text:=i) WDAPP.Selection.TypeText(Text:=vbCrLf) End With End If 两个textbox分别是读的文件地址，和写的文件地址。
这是执行后的报错
应该怎么修改，还有我打开那个被写的文件时候说是被绑定了不能操作，这是什么情况
求在源码上修改
打开写的word报错的 展开
1个回答
展开全部
将WDApp.wdParagraph直接修改成数值4，也就是变成 Unit:=4 试试看！
同时将后面的：Alignment:=WDAPP.wdAlignTabRight改成：Alignment:=2,
将Leader:=WDAPP.wdTabLeaderDashes改成： Leader:=2
如果今后遇到这种问题，直接打开Word，然后
sub xx()
msgbox wdParagraph
end sub
就可以得到wdParagraph的真实值。
同时将后面的：Alignment:=WDAPP.wdAlignTabRight改成：Alignment:=2,
将Leader:=WDAPP.wdTabLeaderDashes改成： Leader:=2
如果今后遇到这种问题，直接打开Word，然后
sub xx()
msgbox wdParagraph
end sub
就可以得到wdParagraph的真实值。
更多追问追答
追问
没用，而且说是word被锁定了。。。。怎么办
追答
没遇到过被锁定的问题，是不是文档设置了保护密码！？
或者“通知-只读”窗口弹出，表示你重复打开了N次本文档！
从你的代码看不出什么问题！
本回答由电脑网络分类达人 郭强推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
博思aippt
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员，对于Word文档生成PPT的操作，我们有以下建议：1. 使用另存为功能：在Word中编辑完文档后，点击文件->另存为，选择PowerPoint演示文稿（*.pptx）格式，即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
