admin 管理员组

文章数量: 1086019


2024年3月27日发(作者：nginx进一步配置)

精品文档

用vbs实现选择颜色

如果不用组件的话，代码如下：

set ie =

createobject("ation")

te "about:blank"

do until tate = 4 : 25 : loop

set doc = nt

set body =

set win = window

tml = ""

ext

mentById("dlg").choosecolordlg

a "text", ext

如果用组件的话，代码如下:

flag = 1+2

initialColor = &hff32ea

color = OpenColor(initialColor, flag)

MsgBox "Selected color: " & hex(color)

function OpenColor(initColor, flags)

set comdlg =

=

CreateObject("Dialog")

2016

1 / 7

精品文档

= initColor

= flags

lor

OpenColor =

end function

2016

2 / 7


本文标签： 组件 代码 颜色 配置 精品

版权声明：本文标题：用vbs实现选择颜色 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1711482623a596317.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。