说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB使用API获取颜色

HTML文档下载 WORD文档下载 PDF文档下载
VB使用API获取颜色
除了使用CommonDialog的方法,还有一种使用API函数的方法进可以实现获取颜色。 参见本例:
>>步骤1----建立新工程,在窗体上放置一个CommandButton,一个PictureBox,一个TextBox;
>>步骤2----编写如下代码:

private Declare Function ChooseColor Lib "comdlg32.dll" Alias _
"ChooseColorA" (pChoosecolor As ChooseColor) As Long

private Type ChooseColor
lStructSize As Long
hwndOwner As Long
hInstance As Long
rgbResult As Long
lpCustColors As String
flags As Long
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type

Private Sub Command1_Click()
Dim cc As ChooseColor

cc.lStructSize = Len(cc)
cc.hwndOwner = Me.hWnd
cc.hInstance = App.hInstance
cc.flags = 0
cc.lpCustColors = String$(16 * 4, 0)

if ChooseColor(cc) >= 1 Then
Picture1.BackColor = cc.rgbResult
Text1.Text = "颜色值:" & cc.rgbResult
Else
Text1.Text = "你取消了。"
End If
End Sub

>>步骤3----编译运行,看,出来了吧.
苹果Siri再获一专利:可使用自然语音输入来搜索和标记图片 研发周报:Google抛弃C语言,采用Go语言重写Go编译器 取其精华 IE11里移除和新增的功能 大胆预测亚马逊即将推出的五大产品或服务 移动周报:GitHub章鱼猫中国之行 三星与LG的新动向:同样的物联网 ,不同的玩法 从Twitter到Tinder,看社交媒体在2013年的沉浮 一周消息树:有道周枫和他的“放养”团队、太极助手惹“非议” Netflix:使用大数据驱动商业决策 “中国杯”游戏极限开发大赛报道 回顾2013软件开发:JavaScript领风骚 京东“宙斯杯”创新应用大赛,百万奖金为“你”而等待 12306上的分布式内存数据技术GemFire Canalys:苹果、三星2014年仍统治平板市场 微软压力山大 Google和苹果的下一个战场 回顾2013科技界大事件:Mayer登Vouge杂志、Ballmer离职 《近匠》第03期:移动开发工具访谈,AVOS Cloud——后端的金刚钻 次世代视觉:Avegant Glyph智能眼镜技术解析 技术栈的选择:从Groupon转向Node.js、淘宝去IOE谈起 首席数据官:一个属于你的时代已经来临 盘点2013年Facebook七大最受欢迎的hack 见证中国开源的力量:“开源力量”2013年度庆典活动亮点汇总 专访APU13讲师、西电朱虎明:概念难以理解成异构编程最大阻力 盘点2013:21款最优秀的开源数据库 苹果三星再次谈判,欲和解所有侵权案 应对iOS in the Car,Google将携手奥迪推Android车载系统 10个技巧让你更轻松地使用AWS 《近匠》第04期:移动开发技术访谈,多看科技CTO王毅——阅读未来 2013年Linux领域重要事件回顾 2013年12月操作系统份额:Windows XP跌破30%大关 Linux小幅上涨 Snapchat存安全漏洞 460万用户信息被窃 如何能把98 聯入2000 如何做一个后台管理-数据库备份程序 如果我用一个Winsock(index)控件数组。Winsock(1)、Winsock(2)同时调用一个延时函数会出什么问题吗? 已知表中字段ID的值,如何定位到这个字段? 谁知道为什么会出这种错误fatal error C1004: unexpected end of file found 小小问题,也有小小的分,不成敬意。 visio ,rose ,ERwin 他们各自的用途是什么,有什么区别呀? Oracle安装的问题——寻求帮忙!!!! 请问Crystal(水晶)报表如何对TextBox进行动态绑定字段? 如何设定mapx图层的颜色 对汇编的渴望! 谁有Asp做的网站?100分奉上! 都进来看看 vc新兵问函数调用菜鸟问题 紧急求救!!!! 谁有delphi关于ado编程 的资料啊(要详细一点的) TreeView的问题,很实在的问题。 关于在PB上实现错误事件处理!!! 关于组件的停靠 用VB.NET连接数据库老是连不了,快精神分裂了,救命啊! 关于SendMessage(高分相送,紧急) 急!!!高手进! 在查找结果中如果某一字段的值相等,只取出其中一条的问题! squid的安装问题???????????????????? SQL语句问题? 冒昧求救,光驱不能使用,不能boot 我的主机总收到外面发的广告信息? 高分求助急!!! 见鬼了,我添加一个TServerSocket控件,然后编译出现:Declaration terminate incorrectly 有谁知道用哪款打印机比较好呢? 按钮BitBtn1上有图片,在图片上写字的问题。(在先给分!) cystal reports 8.5 english显示繁体问题,急,等待 Unix下用什么源代码检测工具比较好? 我的电脑出什么问题了?各位帮帮忙 界面导航如何分类? 怎样得到本机的网卡号??? %¥#问个小问题,知道的都来抢分啊 谁知道哪儿有支持认证的SMTP组件下载? 有什么软件能查看PE文件的? ADO问题!!!! 100分求购最简单的串口程序!需要详细注释! 怎么给大家份呀?to wyz_csdn等(500分诚征wav 转换到MP3的源程序(VC++的例子)) 在directshow中,不知道怎样对播放的画面的亮度进行控制? 如果深愛的人要離開你,是變心還是死亡好一點?(讨论) 贴了二次为什么没有人指教? 戒水快两年了,如今回来看看,物不是人非啦 新手一问 关于datagrid 修改数据的问题,帮我看看,多谢 谁有这两本书,请帮忙发到我的邮箱里,100分相送 到底应该怎么办? 大家好,如何打开DLL文件? 酶联免疫法检测瘦肉精时怎么会有假阳性,在屠宰场两次实验表明阳性,第二天回实验室做呈阴性,什么原因?有没有关于酶联免疫瘦肉精的技术交流群?或者对这方面比较了解的人士帮我介绍一 离子迁移的实验中尿素和硫酸的作用是什么? c面金属 锈我的笔记本电脑鼠标板左面有锈点,是因为手掌出汗引起的吧,才买半年的本本,这个算不算保修范围内啊?还有我的本本喇叭总是有杂音,就像喇叭上面有东西,听歌时不一定什么音就 判断题,我做对了吗 尿素包合实验中要N2保护,请问如何操作? 如何不用其他试剂分离KNO3和KCL的混合物?要用到溶解度的知识,两者都要保留. 判断题对了吗? 赤橙黄绿青蓝紫下一句 “概念的内涵增加它的外延就小了”怎么解释? 判断题,对了吗, 麻烦那位高手帮我解释:彦是什么意思? 义的含义,内涵,外延 要精确,好的追分 用英语说迈克感觉怎么样 鱼鳍在游泳中的作用实验答案 一级水、二级水、三级水的主要区别并与纯净水的区别 灯泡两个接线柱上的线头直接碰在一起 淘气把一些苹果放到底面半径是10厘米的圆柱形容器里清洗,这时水面上升了4厘米,这些苹果的体积是 把一个苹果完全浸入一个长为20厘米、宽为15厘米的长方体容器中,水面升高2.5厘米,这个苹果的体积是多少? 电流表示数为0和电流表无示数有什么区别吗? 卤族元素的递变性是怎么来着? 实验室一级用水和三级用水有什么区别吗 压缩机上哪个接线柱是共用线的接线柱? 卤族元素结构的相似性和递变性如何决定了性质的相似和递变? 一个长方体的宽是长的4/5,长是高的1/2,已知它的宽8厘米.求这个长方体的体积. 求安防售后服务管理制度 六爻,晚上十二点二十一分,问事(感情)能行吗,得临卦,感激不尽.我看《周易》卦辞没太明白. 哪支蜡烛燃烧得更旺?现象第一种:燃烧需要氧气,杯中的氧气是有限的,过一会儿,杯中氧气燃尽,自然熄灭.第二种:氧气虽然是无限的,但是热空气往上流,又因为有一个出口,因气压流入的氧气 消毒供应室职业安全防护管理制度 谁知道急?消毒供应室职业安全防护管理制度谁知道 急呀 科学 研究鱼鳍的功能与作用 ,实验材料 实验步骤 实验结论 拓展应用 ,都说一下,求求了,我急啊, 哪只蜡烛燃烧的更旺 搅拌器在有机化学实验室中是怎么使用的 观察鱼鳍的功能的实验步骤1设计的实验步骤2实验观察到的结论 几道有机化学鉴别题,能解决几道解决几道哈,1.环丙烷、环己烷、环己烯2.环丙烷、苯、甲苯3.乙醚、正丁醇、戊烷4.乙醚、丁醇、苯酚5.丙酮、戊二酮6.乙醛、2-戊酮、3-戊酮7.果糖、葡萄糖 甘油与白油的区别 英语翻译《笑府·夫夫》:“有与小官人厚者,及长为之娶妻,讲过通家不避.一日撞入房中,适亲家母在.问女曰:“何亲?”女答曰:‘夫夫.’”好像是说同性恋的吧? 那支蜡烛燃烧得更旺现象与结论 润肤油与甘油的效用区别是什么 某烯烃与氢气加成后得到的饱和烃是2,4-二甲基戊烷 ,该烯烃可能的结构有几种?请画出所有符合条件的化合物的结构式. 二氧化碳加-氧化碳等于什么 几道判断题,亲们,帮帮忙!通过圆心和圆上任意一点的线段叫做半径 ( )男同学与女同学人数的比是3:4,女同学人数是男同学的一又三分之一倍( )分母是一百的分数叫做百分数.( )一个数( 第三部答案是1.7*10^-5 请问下 是怎么算出来的... 三碳化合物可以被氧化成co2么 高分求几道判断题?谢谢亲们呢…1.空间中任意三点可以确定一个方向 2.不等式9x的2次方-6x+1大于等于0的解集为多少 3.x是锐角,则180度+x是第几象限角 4.若simX=2m-1有意义,m范围是 5.直线ax+2y+2=0与 甘油三脂4.11(参考值是0.56-1.70)低密胆固醇1.31(参考值是2.07-3.1)葡萄糖7.60(参考值是3.3-5.56)怎么治疗 孝经全文的白话文解释有知道的吗? 判断题 会几个说几个 1、从伽利略变换可以推出洛伦兹收缩.是 否 2、布鲁诺认为宇宙是无限的,恒星都是遥远的太阳,这和哥白尼认为太阳是宇宙中心的观点是不同的.是 否 3、洛伦兹和庞卡莱 曲突徙薪文言文答案是神吗 求《孝经》全文及翻译 亲们帮我看看1、我们要全面认识自己,把自己的长处和别人的不足相比,我们可以比出自信.把自己的不足和别人的长处相比,可以比出我们努力的方向.2、只要社会、学校、家庭、司法携手为孩 英语翻译【师父,我一直以为活动定在周六,就把所有的事情推到了周日,刚才才得知活动改为周日.实在对不起,不能参加了,希望能理解,但要知道,我的心和大家在一起】 孝经·开宗明义章全文. 亲们,判断题 一个长方体容器长宽都是2厘米向容器里倒入5.5升水再把苹果放水中,这时水深15厘米,这个苹果的体积是多少?急 金属上锈了怎么办? 谁知道司马光的《唐太宗论止盗》的译文? 渗透试验使用尿素会怎么样本来是使用蔗糖溶液,如果用尿素会怎么样呢? 金属去锈金属由于腐蚀生锈,应该如何去除啊?有人建议用稀盐酸,但试过会反弹,用完反而生锈更严重.这应该如何处理? 判断题做对了吗 把两升水倒入一个长方体的容器,水的高度是十厘米,把一个苹果浸入水中水面升高了二厘米,这个苹果的体积是多少? 为金属去锈的办法手镯上衔接部分的金属生锈了,影响美观.分不清是钢还是合金.希望有知道去锈办法的高人指点一二.总之是要用酸是吧?可乐是碳酸……那么雪碧也行吧……天外飞仙你确定 \"中学毕业生清华成长奖\"颁发 浙史上最给力的大学生创业支持政策出台暴风影音因视频侵权被判赔29万 已经11月7日首届上海国际童书展将盛大揭中小学教师资格考试举行 师范生当老师大学生自创恋爱APP 获80万元大奖中国代表在联大全会阐述对国际刑事法院救人干部王青意、蔡福想抢救画面曝光 新加坡制造业和服务业下调未来半年前景全球首辆太阳能小轿车在新加坡亮相德国海关发现1500余幅毕加索等大师加涉毒市长为犯错表歉意 但未明确承认日台风灾区一男子称受灾系因禁止大麻而孙燕姿鲁豫户田惠梨香 女星骨瘦如柴太澳男子头部遭枪击送医后仅数小时自行离泰游船沉没已致6人罹难 包括一名中国美国务卿访问埃及 美将与埃过渡政府合农夫山泉派员举报《京华时报》 称实行印度将发射环火星探测器 否认与华“太调查显示常戴有毒银饰或影响孩子智力叙提前完成销毁化武初期任务 美被指进6月2超级日数据齐聚现货原油、白银分中国最大威力火炮探秘,性能出色却为何拍拍肥肉能减脂肪?6个小妙招教你拍出首届中国化工企业可持续发展论坛重磅来关于论文,你该知道的事!互联网理财“宝宝”产品:鹏华增值宝每2秒!交警怒吼救下几人“不喊你们就死隆江卤水猪脚饭做法培训 满天红告诉你新车除甲醛最有效方法是什么 自助除味点赞!做试管婴儿的妈妈们不容易!土豪二代看过来!全美留学生活费最高大未来的房子都是机器人建的?【高球爆点】 大潮汕 大事件央行放水4千亿 三大板块全线爆发,有中国驻美大使放话:南海不应成为中美博谷歌VR?微软混合现实才是设计师黑科沙特分散投资的第一步居然是打车 多少当你会看了,也可以利用假突破赚钱!广式烧腊培训 大师教学全程实战实操毕业季:法科生,你不想捧铁饭碗可以去这一宝物,实时解酒,治便秘瘦5斤,还
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘