Vb.net 使用word.interop寻址表并添加复选框

Vb.net 使用word.interop寻址表并添加复选框,vb.net,word-automation,Vb.net,Word Automation,我使用excel已经有一段时间了,但是我在Word自动化方面遇到了一些问题。我目前想动态格式化word文件。下面的代码应该是打开一个现有文件,并对同一页面上的两个不同表进行更改 我想知道如何将“插入”菜单中的复选框动态添加到表格单元格中,或更改表格单元格中已存在复选框的选中状态。谢谢你的建议!其设置为立即写入文本值,但这是例如,直到解决此问题 Dim oWord = New Microsoft.Office.Interop.Word.Application Dim Dir As

我使用excel已经有一段时间了,但是我在Word自动化方面遇到了一些问题。我目前想动态格式化word文件。下面的代码应该是打开一个现有文件,并对同一页面上的两个不同表进行更改

我想知道如何将“插入”菜单中的复选框动态添加到表格单元格中,或更改表格单元格中已存在复选框的选中状态。谢谢你的建议!其设置为立即写入文本值,但这是例如,直到解决此问题

    Dim oWord = New Microsoft.Office.Interop.Word.Application
    Dim Dir As String = System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
    oWord.Documents.Open(Dir & "\welcomeletter.docx")
    Dim oDoc = oWord.ActiveDocument

    oWord.Visible = True

    Dim tbl As Word.Table = oDoc.Tables(1)

    tbl.Cell(1, 1).Range.Text = "Checkbox1"
    tbl.Cell(2, 1).Range.Text = "Checkbox2"

    Dim tbl2 As Word.Table = oDoc.Tables(2)

    tbl2.Cell(1, 1).Range.Text = "Checkbox3"

对于那些寻求答案的人,我只需要使用wingdings字体并在我需要的字段中插入一个复选框:

tbl2.Cell(1, 1).Range.Text = chw(253) etc.
我找不到任何关于实际编辑复选框的内容