| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
买学问 - 大牛一对一辅导,有问必答买学问 - 专业的付费知识问答平台
共有 330 人关注过本帖
标题:word中vb如何设置下拉列表内容控件的默认显示的项
只看楼主 加入收藏
zwmdlj
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2008-6-16
  问题点数:0  回复次数:0   
word中vb如何设置下拉列表内容控件的默认显示的项
创建新的下拉列表内容控件并将其插入到文档后如何将某一项设置默认选项,比如将"Monkey" 设成默认选项
Dim objcc As ContentControl
Dim objMap As XMLMapping
 
Set objcc = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
objcc.Title = "My Favorite Animal"
If objcc.ShowingPlaceholderText Then _
 objcc.SetPlaceholderText , , "Select your favorite animal "

objcc.DropdownListEntries.Add "Cat"
objcc.DropdownListEntries.Add "Dog"
objcc.DropdownListEntries.Add "Horse"
objcc.DropdownListEntries.Add "Monkey"
objcc.DropdownListEntries.Add "Snake"
objcc.DropdownListEntries.Add "Other"
2018-12-28 17:04







关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023970 second(s), 8 queries.
Copyright©2004-2019, BCCN.NET, All Rights Reserved