婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 用vbs實現選擇顏色

用vbs實現選擇顏色
熱門標簽：墨西哥地圖標注app 上海辦理400電話選號 龍巖400電話申請 天津智能外呼系統排名 機器人打電銷適用于美業嗎 智云億呼電話機器人 外呼系統說話聲音小怎么辦 企業400電話辦理價錢低 外呼系統群
如果不用組件的話，代碼如下：

set ie = createobject("internetexplorer.application")
ie.navigate "about:blank"
do until ie.readystate = 4 : wscript.sleep 25 : loop
set doc = ie.document
set body = doc.body
set win = doc.parentwindow
body.innerhtml = "OBJECT id=dlg CLASSID='clsid:3050f819-98b5-11cf-bb82-00aa00bdce0b'>/OBJECT>"
body.innertext = doc.getElementById("dlg").choosecolordlg
win.clipboarddata.setdata "text", body.innertext
ie.quit

如果用組件的話，代碼如下:

flag = 1+2
initialColor = hff32ea
color = OpenColor(initialColor, flag)
MsgBox "Selected color: "  hex(color)
function OpenColor(initColor, flags)
set comdlg = CreateObject("MSComDlg.CommonDialog")
comdlg.Color = initColor
comdlg.Flags = flags
comdlg.ShowColor
OpenColor = comdlg.Color
end function

組件相關文件下載http://xiazai.jb51.net/jbtools/vb6controls.rar

標簽：黃山 鄂爾多斯 錫林郭勒盟 阜新 承德 齊齊哈爾 麗水 青島

巨人網絡通訊聲明：本文標題《用vbs實現選擇顏色》，本文關鍵詞  用,vbs,實現,選擇,顏色,用,；如發現本文內容存在版權問題，煩請提供相關信息告之我們，我們將及時溝通與處理。本站內容系統采集于網絡，涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《用vbs實現選擇顏色》相關的同類信息！
  • 本頁收集關于用vbs實現選擇顏色的相關信息資訊供網民參考！
    • 推薦文章
    主站蜘蛛池模板： 贵定县| 双峰县| 滦南县| 兖州市| 酉阳| 新田县| 读书| 中西区| 鹿邑县| 五指山市| 卓尼县| 淮滨县| 屯留县| 宁乡县| 通山县| 大英县| 泾川县| 阳西县| 贺州市| 友谊县| 宜兴市| 文登市| 咸宁市| 嘉兴市| 西乌| 山东| 米脂县| 贺州市| 宁阳县| 建水县| 高密市| 通海县| 湘潭县| 龙陵县| 贵德县| 潜山县| 休宁县| 安阳县| 兰州市| 随州市| 扎兰屯市|