2014-02-18 52 views

回答

1

说,我在Word文档中添加了4个内容控件(复选框)。因此,下面的行会根据用户输入检测到第一个遇到的内容控制

Reboot_Y_N = MsgBox ("Do you require reboot (Y/N)?",vbQuestion + vbYesNo,"Reboot") 
If Reboot_Y_N = vbYes Then 
    ObjDocImp.ContentControls.Item(1).Checked = True 
    ObjDocImp.ContentControls.Item(3).Checked = True 
    ObjDocImp.ContentControls.Item(5).Checked = True 
    ObjDocImp.ContentControls.Item(7).Checked = True 
     Else 
    ObjDocImp.ContentControls.Item(2).Checked = True 
    ObjDocImp.ContentControls.Item(4).Checked = True 
    ObjDocImp.ContentControls.Item(6).Checked = True 
    ObjDocImp.ContentControls.Item(8).Checked = True 
End If 
相关问题