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

显示Windows系统的标准ABOUT窗口-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
显示Windows系统的标准ABOUT窗口-VB资料
吴斌
 ABOUT窗口是应用程序向用户传达自身一些基本信息的最佳方式。Windows系统的
许多软件,如程序管理器、文件管理器、书写器等,都带有一个风格一致的ABOUT
窗口。在这些软件中,只要选择“帮助”菜单命令“关于XXX...”,就会弹出
这个标准ABOUT窗口,其中显示有关Windows及相应软件的版本、工作方式和版权等
信息。在VB应用程序中,可以通过调用API函数ShellAbout,方便地借用这个标准
ABOUT窗口,并将自己的基本信息加入其中。
  首先,在module文件中加入下列声明语句:
  Declare Function ExtractIcon% Lib "shell.dll" (ByVal hinst%, ByVal
lpszExeName$,ByVal iIcon%)
  Declare Function GetWindowWord Lib "User"( ByVal hWnd As Integer,
ByVal nIndex As Integer)As Integer
  Declare Function ShellAbout Lib "shell.dll"(ByVal hWnd As Integer,
ByVal szApp As String,ByVal szOtherStuff As String,ByVal hIcon As
Integer)As Integer
  Public Const GWL_EXSTYLE=(-20)
  Public Const GWL_STYLE=(-16)
  Public Const GWL_WNDPROC=(-4)

Public Const GWW_HINSTANCE=(-6)

  然后,在调用ABOUT窗口的菜单项的Click事件中加入下列代码:
 Dim Ret As Integer
  Dim Icon As Integer
  Dim Inst As Integer
  Inst=GetWindowWord(Me.hWnd,GWW_HINSTANCE)
  '从可执行文件中抽取图标
  Icon=ExtractIcon(Inst,"DEMO.EXE",0)
  '调用Windows系统标准ABOUT窗口
  Ret=ShellAbout (Me.hWnd,"1234","123" & Chr$(13) & Chr$(10) & "
123456",Icon)


MongoDB 2.6.2 发布,大大改进查询功能 清华毕军&华为马云:SDN是学术和产业都看好的领域 向三星和苹果发难:亚马逊FirePhone 3D手机强势来袭 支付宝移动端与NFC芯片商、手机商合作 推出近场支付产品 Go 1.3正式发布,改进正则表达式! API设计如龙生九子,Tunneling、Hypermedia等更受开发者青睐 NFV+SDN,博科打造开放式网络平台 亚马逊开放双SDK:摄像购物,追踪脸部玩游戏 解析淘宝Hadoop作业平台——宙斯Zeus 亚马逊的心思:要Android不要谷歌 Vuforia SDK全面更新:3.0版可实时生成虚拟场景和物体 Stream SDK:以手为“剪”,随时随地分享精彩内容 一周消息树:惠普研发基于Linux开源操作系统 打造全新计算机 我从谷歌学到的那些事:Toilet文化、代码实验室 对话大神Scott Shenker:从物理博士到SDN's Uncle 巨头们的又一战:健康数据服务平台 移动应用广告新竞争,Facebook不再一家独大 为什么Fire Phone手机价格不便宜? 老牌播放器暴风影音发力线下与自制内容 APP运营:“小数据”为合理化推送定位 TCL H5TV:回归电视本质,与开发者共赢 烽火星空徐国龙:依托平台,坚持开放与标准,企业移动化快速研发之道 首届bong线上黑客马拉松第一阶段达成! 12支团队晋级 APSys 2014,AMD将发表基于异构体系的DNN实现与评估 PagerDuty实战分析:将MySQL迁移至XtraDB并成功运行EC2 Molecule:自食其力的免费HTML5游戏框架 智能家居升级:Nest启动开发者计划,并开放API Docker,从这里做起! 《近匠》云巴创始人张虎:低门槛云服务为小团队创造更多机会 Oculus公司同意收购Xbox 360手柄设计团队 公有云VS私有云 哪个数据更安全? 客户端会出现commandtext does not return a result set提示怎么办? 在BCB中,怎样向一个存储过程的一个DateTime类型的输入参数传递值??????? 我在datawindow中加个按钮,script在那里写,请帮帮忙 祝檬檬生日快乐~~~~~! win2K pro版无法启动! QueryPerformCounter()函数的用法? 求教:如何在delphi 5 中使用HTML Help(.CHM) 神经元网络BP算法源代码? =急=急=急=这个SQL语句是什么意思?? 从数据库读出的一个问题 我昨天在使用过程中发现如下问题,希望能得到您的答复! 请教一个如何写如下的存储过程:查找'abcd',允许错两个字符(错误位置任意),例如'abef'可以, 但是'aefg'不行 小弟学习c有一段时间,究竟学到什么程度才能开始学c++呀? 各位,有没有碰到过这种情况! =急=急=急=大家来看看这个SQL语句是什么意思~~ 在ACESS2000的查询中如何/可否使用ISNULL函数。请举例。 c++ 搞什么呀?不是说有专家回答吗?人呢? blob字段的长度限制是:????? 这样的公司我呆下去还有没有意义? unix 消息队列 这是什么意思??? XML还有什么好处? 读写文本文件的问题??急 程序中每一个按钮和动作对应一个存储过程好吗? 按回车键时,在TEXT中输入大于号怎么实现,谢谢! 请问高手:怎样在interDev6.0中调试程序??? 在jb6中,如何制作包含jdbc和自定义包的jar文件。 问一个很菜的问题:怎么使用编译器? 一个让我头疼的问题,大家来帮帮我! 送分!!!送分!!!!救命救命!!一共200分 何处有单独的SQL Anywhere 5.5下载,只是驱动一下,并不用PowerBuilder开发 www.%s.co.cn如何解决? 请问怎样用VBA将office文档转换为txt文件?? 绝对超难问题,答对的话给50分!!! 为学java散分 说说borland c++的发展史吧 谁能告诉哪里能申请教育网的免费邮件地址,或你给我一个算了,100分给你! BP神经元网络算法的原代码 如何在网页上看ASP的原码? 我用另一台机的SYBASE备份文件拿到本机来恢复,居然不行!请教高手! 关于模板的问题,还请大家多多指点! 我用串口接受数据,可是??? 焦急中!!!vc里面的spin控件和editbox控件联系起来怎么编程? 简单任务,快来完成啊………… 有奖赏的 100分哪…… 我的程序把数据集另存为Excel时,在未关闭程序的情况下为何无法打开Excel.代码如下... 把一个html分成左右两个frame。现在需要使用scrolling的时候,好像是在一个页面里面一样。请问。可以用javascript实现吗? 关于从客户端访问Sybase数据库的问题??? 正在看《Visual Basic编程标准》,我想不管是新手还是老手,建议大家都看看!!!推荐!!!!!!!! ado+access更新数据时提示"缺少更新或刷新的键列信息"?为什么 一个有关用户对象的问题。 设NA表示阿伏伽德罗常数,下列说法正确的是A.NA个N2分子和NA个CO分子质量比为1:1B.1molH2O的质量等于NA个H2O质量的总和C.在任何条件下1molH2所含的原子数为NAD.1molH2SO4中所含的粒子数目一定是NA为 怎样提高高中的数学和英语成绩? 凸透镜成像虚像如何观察 用na表示阿伏伽德罗常数的数值,下列说法中正确的是A,在常温常压下 11.2L氯气所含的分子数目为0.5NaB 32gO3含的原子数目为2Na C 5.6铁与足量盐酸反应转移的电子数为0.3NaD 16gCH4与18gNH4+所含质子数 高中如何快速提高英语成绩现在快高三了 英语成绩基础很差满分150才考50现在有什么好的方法能够在 短时间 提高英语成绩 铝有几个化合价? 探究凸透镜成像的规律将所有规律用字母列出来,分别是用来干什么的都列出来,例如放大镜,投影仪什么的,3Q 谁知道如何快速提高高中各科(语文,英语,理综)的成绩?尽可能详细点 凸透镜成像规律 什么是实像什么是虚像我是说,为什么同样是凸透镜成的像,为什么有的是实像有的是虚像最好有个图,说清楚点,谢啦 以NA 表示阿伏伽德罗常数,下列说法正确的是A 53g碳酸钠中含有NA个碳酸根离子B 0.1mol 氢氧根离子含NA个电子C 31g白磷中含4NA个P原子D 标准状况下,11.2L臭氧中含NA个氧原子 同种元素(原子团)的化合价和离子所带的电荷,通常数值与符号都相同.这句话对吗?例如Na的化合价为1,但是它也可能失去二个电子带正电,即为Na+.与那句话相背了 某品牌合格奶粉蛋白质的含量为百分之18,含氮为百分之2.88,每100g奶粉中添加0.1g三聚氰氨,理论上能加...某品牌合格奶粉蛋白质的含量为百分之18,含氮为百分之2.88,每100g奶粉中添加0.1g三聚氰氨, 一均匀带电球壳,面电荷密度sigma,球面上任意小面元dS上所受静电力. 计算电介质球体的退电场书上有,太简略.外电场为E. 每100g幼儿奶粉中含12—25g蛋白质 蛋白质含氮元素的平均质量分数为百分之16,三聚氰胺化学式为C3N6H6每100g奶粉中含氮元素的质量分数范围是? 牛奶和奶粉中添加三聚氰胺,是因为?但添加后会给 一半径为R的绝缘球壳,即球面半径为R,它的面积怎么就是4πR2了? 关于数学的分数翻译(英文)比如说下面的分数用英语应该怎么说5-7 100g奶粉中添加0.1g三聚氰胺能增加多少g蛋白质的检测值 设NA代表阿伏伽德罗常数,下列说法中正确的是A 2.3g钠离子所含电子数目为0.2NAB 2g氢气所含原子数目为NAC 17gNH3所含的电子数为NAD NA个氧分子和NA个氢分子的质量比等于16:1 正确么?如果在电容器两板间插一块厚为d的金属板则可看作两板间距缩小了d如果在电容器两板间插一块厚为d的金属板则可看作两板间距缩小了d应该不止d吧 在“研究凸透镜成像规律”的实验中,当烛焰位于凸透镜一倍焦距内时,眼睛通过透镜观察到的虚像可能在“研究凸透镜成像规律”的实验中,当烛焰位于凸透镜一倍焦距内时,眼睛通过透镜观察 以NA表示阿伏伽德罗常数,正确的是:() A.53g碳酸钠中含有NA个CO32- B.0.1molOH-含NA个电子 C.1.8g重水(D2O)中含NA个中子 D.标准状况下11.2L臭氧中含有NA个中子 今天做凸透镜成像的实验 当u 在研究凸透镜成像的试验中,当烛焰离凸透镜的距离小于焦距时,眼睛通过透镜观察到得没图! 电荷q均匀地分布在半球面ACB上,球面的半径为R,CD为通过半球顶点C与球心o的轴线,P,Q为CD轴线上与o点距离相等的两点.已知P点的电势为Up,求Q点的电势. 设NA表示阿伏伽德罗常数的值 带电球体的电场怎么求如图, 半径为R的半球.一正方体的四个顶点在半球的底面上,四个顶点在半球的球面上,则该正方形的表面积是多少rt 答案是4R^2 在探究凸透镜成像规律的实验中:1.如果没有太阳光,怎样利用白炽灯粗略的量出焦距?2.某同学在做实验时,先把蜡烛放在较远处,使物距大于2倍焦距,测出物距,然后移动凸透镜,观察光屏上成清 电路中接入一个平行板电容器,开关闭合瞬间,电容器视为短...电路中接入一个平行板电容器,开关闭合瞬间,电容器视为短路还是断路? 半径为R的半球,一个正方体的四个顶点在半球的底面上,四个顶点在半球的球面上,则该正方体的表面积为A.2πR B.4R的平方 C.2R的平方 D.4πR的平方 在研究凸透镜成像规律时在“探究凸透镜成像”的实验时,王平同学保持透镜的位置不变,先后把烛焰放在A、B、C、D、E、G各点,如图所示,分别调整光屏的位置,把烛焰放在_____点,光屏上的像最 一均匀带电球表面,半径为R,电荷为+q,求表面内外任一点场强 原子化合价与其原子的离子所带电荷数目相等,为什么氢离子带一个负电荷,氢原子化合价是正一? 离子是带电荷的原子和原子团,对吗,为什么啊 在进行“研究凸透镜成像规律”的实验中,物距分别30,14,6厘米正立或倒立,放大或缩小,实像或虚像,像距的大致范围是多少 是表格. 在化学中原子的化合价可以理解成离子电荷吗? 我们知道,由带电荷的原子或原子团组成离子,原子团组成的离子结构图是像原子组成的离子那样的吗?如果不是,那是怎样的? 半径为R的球体均匀带电q,分别计算求内,外任意一点的电势 探究凸透镜成像规律 "多原子离子"和“原子团”有区别吗.. 什么样的原子能组成带电荷的原子集团? 关于探究凸透镜成像的规律的问题是眼前要调整蜡烛、光屏、凸透镜的高度,使他们的中心在一条直线上.这句活错在什么地方? 离子____的原子或原子团. 凸透镜成像中的虚像的位置,虚像是否成在像同侧,而观察又是要在一侧?为什么呢? 在探究凸透镜成像规律时,小明用9个红色的发光二极管按“F”字样镶嵌排列在白色方格板上替代蜡烛作为光源,又用同样的白色方格板做成光屏,实验使用的凸透镜焦距为10 cm,实验装置如图甲 我们物理老爷子叫我们写探索凸透镜成像的规律实验报告包括有:实验名称,原理,器材,数据,数据处理,结论,当u>2f,F<a<2f,u<f 铝的化合价是多少 请问原子的结构中原子核带正电绕核电子带负电是假设出来的吗?正负电荷差别在那里? 真空中两平行带电平板相距为d,面积为s,且有d^2 虚像为什么不可以承载在光屏上 原子所带的正负电荷量一定相等? "探索凸透镜成像的规律'怎样理解? 铝有负的化合价吗? 摩擦后的带正电的玻璃棒为什么能吸引小纸片,从原子的正负电荷解释一下,小纸片原本是带正电还是负电啊! 过球的一条半径的中点作垂直于该半径的球面,则所得的面积与球的表面积的比为? 凸透镜成像为什么没有缩小的虚像?虚像有缩小的吗? 正负电荷的定义?什么是正电?什么是负电?他们有什么区别?如题正与负的定义和本质区别是什么? 高中怎么样提高数学英语成绩? 铝有哪几种化合价
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘