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

VB如何让窗口始终在最前面?

HTML文档下载 WORD文档下载 PDF文档下载
VB如何让窗口始终在最前面?


调用一个API函数SetWindowPos可实现此功能。

首先添加一个公用模块,将下面的代码放到模块的声明段中。

Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Public Const HWND_TOPMOST = -1
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOZORDER = &H8

将下面的子程序放到模块中

Public Sub SetFormTopmost(TheForm As Form)

SetWindowPos TheForm.hwnd, HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOZORDER + SWP_NOMOVE + SWP_NOSIZE

End Sub

最后,通过调用该子程序设置你想要放置的窗体。例如,你想将窗体frmMyForm放在最前面,代码如下:

SetFormTopmost frmMyForm.


请注意,在VB的API查看器中将SWP_NOZORDER设成&H4,正确值就为&H8。要了解更多此函数的信息,可访问下面的网址:http://www.microsoft.com/msdn/sdk/platforms/doc/sdk/win32/func/src/f84_2.htm

查看SetWindowPos的详细用法

实现图象局部放大的原理和方法-Delphi资料 使用Delphi实现滚动式面板窗口 通用的MsgBox-Delphi资料 图象放大镜——实现图象局部放大的原理和方法-Delphi资料 图形的特殊显示效果-Delphi资料 图形整体拉出效果-Delphi资料 一个实用的Delphi屏幕拷贝程序的设计 用Delphi 显示122种图形特效 用Delphi编写DLL实现动态改变分辨率 用Delphi进行OpenGL编程学习心得 用Delphi开发windows95屏幕保护预览程序 用Delphi实现壁纸更换 用DELPHI实现位图显示特技 用DELPHI中Canvas特性开发图形软件 用构件变换法实现动画效果-Delphi资料 在Delphi中使用动态图标 在Delphi中显示Windows图标 在多媒体文件中批量抓取图象-Delphi资料 怎样读出不同格式图形的高和宽-Delphi资料 怎样使用PageUp、PageDown滚动窗体-Delphi资料 怎样制作全透明的窗口-Delphi资料 DELPHI:FormContainer简易手册 Delphi:用FormContainer渐变效果 Delphi4的窗口融合技术 Delphi使用技巧ABC Delphi使用技巧四则 DELPHI中自适应表单的实现 TList的用法-Delphi资料 不规则窗口的实现-Delphi资料 不用标题栏也移动窗体-Delphi资料 窗口建立和关闭时的特效-Delphi资料 控制台窗口的问题 为什么要学vc?我都疯了! 我需要xml的解析器,能在unix ,linux使用。哪有的download 在Redhat Linux6.2中,如何输入中文? exchange server 5.5 支持win2000 server吗? 不好意思 , 小弟没分了 , 再问一个问题 , SLE控件中有没有响映回车键的事件. 汇编里数据类型间的转换函数有哪些? 谁知道base64的编码方法? cathy0505活泼有余,roani典型的北方闺女,MM书看的太多了,做梦爱 难道没有人会ADO事务处理吗?请帮忙回答‘这个事务操作错在哪?’ 请给以人道主义援助!!! 如何自定义消息??? 求救!请教高手VC里如何产生一个类似CDialogBar或CToolBar的可任意停靠的东西,并且拖动时没有虚框显示。 错误提示:“无法为更新行集定位:一些值可能已在最后读取后改变”。看一下,谢谢。 SQL Server 存储过程中错误处理问题,请教高手 請教: ADO 的 RecordSet 的打開方式和鎖方式 如何选择三层架构的中间件产品? 小呆猫谢谢了,再请教一下。。。 我想问一下,如何能在程序中锁定键盘和鼠标 西摩斯(厦门)医疗软件开发有限公司急招精通Delphi,MS SQL Sever软件设计师! 大家帮忙啊... 关于 int[][][] a = new int[3][3][3] 再问clavy(有巢无车氏) 和 wqxtt(wqxtt) 关于WINCE 下ACCESS 与 WINDOWS 下ACCESS 的转换 关于C/S结构的问题?快帮我啊!!! 各位programer加班有加班工资吗? 代理服务器的原理?——有谁知道! 请问怎么在一个对话框程序的文本框中绘图 请问windows网络程序PING编程技术里的几个问题,ICMP回显里面的timestamp是怎么纪录进去的 什么地方可以Down rose?或谁寄给我一个? 编写一个函数,通过指针连接两个字符串!!!!!!!!!!!! 用applet怎样打开一个文件吗? 请问哪种ORB产品实现了com服务器/corba客户机的桥 我读《深入探索C++对象模型》的感受,cber能再回答我一次么? 谁有DELPHI的有关网络编程方面的资料?给我一份可以吗? 关于stringgrid的问题????? 痛苦啊,难道要放弃BCB吗? 大家认为在开发过程中是否不能用全局变量? 如何让LINUX支持我显卡 高手,谁来帮我一下~! 取字符 在SDK中,如何获得客户区的宽度和高度呢??(哪两个函数呢?) 哪里有ATL的电子书下载?最好是中文的! 高手谁能帮帮我呀~~~~~~~! 请教:如何在statusbar的panel中显示一个图标呢? VC++中如何使用OLE对象? 初来乍到,发现这儿JJMM还挺多的。。。 请高人指教~! CSDN中碰到这种问题,该如何解决呢? 如何学习director 你能帮我一下吗?~ 企业商务管理软件,开放全部的源代码及开发文档! 若S=1^2-2^2+3^2-4^2+……+99^2-100^2+101^2,则A=__,B=__.填空抱歉哈 是的后面是:S被103除得到的余数是__________ 一、单选题(共 10 道试题,共 30 分.) V 1. 如果人们对闲暇的需求增加,则( ). A. 工资率会上升,劳动求助《西方经济学》答案 三角形ABC中,∠C=90°,若a:c=7:25,b=48,则a= (-3)^100×(-3)^-101等于( ) A.-3 B.3 C.1/3 D.-1/3 ____ghost exists in the world.That's your illusion.A.No such a thing as B.No such a thing as aC.No such thing as a D.No such thing as选D为什么不是C?____for a long time,the fields are all dried up.A.There has been no rain B.Having no rainC.There 在三角形ABC中,角C等于90°,COSA=5分之3,a=2,则,b+c=? /wɔtʃ/ /´dɔ:tə/ /ri´pɔ:t/ /tru:/根据音标写单词 一辆汽车以每小时60千米的速度从武汉开往长沙,3小时行了全程的4/5, 一、单选题(共 10 道试题,共 30 分.) V 1.管理人员的工作能一、单选题(共 10 道试题,共 30 分.)V 1.管理人员的工作能力越强,管理幅度().A.越大B.越小C.不变D.满分:3 分2.下列不属于人群关系 混凝土如何算量?如算出几方 各种算法 计算方式? 如果A和B都是非零自然数,A-B=1,那么A和B的最大公因数是( ).要步骤,很详细. 一、单选题(共 50 道试题,共 100 分.)英语试题一、单选题(共 50 道试题,共 100 分.)V1.____he works hard,I don’t mind when he finishes the experiment.A.As soon asB.As well asC.So far asD.So long as满分:2 分2.She has 新劳动法规定月工资计算方法应该怎么算?30天?31天? 1/a-1/b=5/24,其中a和b都是非零自然数,那么a+b=? 经济类题目,懂的朋友帮帮忙,一、单选题(共 50 道试题,共 100 分.)V 1.当存在外部经济时,6.如果价格上升10%能使买者的购买减少1%,则该商品的需求价格弹性()A.缺乏弹性B.富有弹性C.具有单 这道题用简便算法,怎么算,请写出过程, b为非零自然数,与它相邻的两个自然数分别是( )和( ) 一、英语单选题(共 20 道试题,共 100 分.)一、单选题(共 20 道试题,共 100 分.)V1._______ joyful he was to meet his father again!A.WhatB.HowC.How aD.What a 满分:5 分2.This flower smells ________.I like it a lot.A.badB. 请用简便的方法计算这道题 已知AB是两个不等零的自然数,如果A>B,那么A分之一>B分之一 一、单选题(共 50 道试题,共 100 分.)V 1.ROM与RAM的主要区别是( ) A.断电后,ROM内保存的信息会 我问专家我15岁一般能长多高的,他却告诉我一个公式让我自己去算,各位帮我算算. a点、b点、个代表什么、 0.027+9·9x0·27怎样简便计算 请问制图公式十分之二胸围怎么算本人是在学打版的!忘了怎么算 A-B 表示什么意义 0.027+9.9x0.27简便计算要过程 魔兽世界3.35版本中战斗贼的暴击上线是多少?(别给我什么计算公式,就告诉我面板上显示多少?)面板上显示多少就算够了? 如果A➗B=75,那么(Ax10)➗(Bx5)=( ) 在三角形ABC中,角A,B,C的对边分别为a,b,c,且满足4sin^2(A+C)/2-cos2B=7/2求角B度数如果B=根号3,a+c=3.且a>c,求a,c 计算1+2+3+4+5+6+7+8+.+52 a、b表示什么数? 在三角形ABC中,a,b,c分别为角A,B,C的对边,4sin²(B+C)/2-cos2A=7/2(1)求A的度数(2)若a=√3,b+c=3,求b与c的值 (1.8+3.72)+8.2=( )+( + ) It is not until you have lost your health____you know its value.A.until B.when C.what D.that ____ at the news that I didn’t know what to say to comfort her.A.So sad she looked B.So sad did she look C.So sadly she looked D.So sadly did she look Ther 在三角形abc中,角a,b,c所对的边分别为a,b,c,已知c=2,acosb-bcosa=7acosB-bcosA=7/2.第一问:求bcosA的值。第二问:设a=4.求三角形ABC的面积 计算:-27+(-32)+(-8)+72 计算:(+4.3)-(-4)+(-2.30-(+4) 请英语高手再帮做20道单选题(一共两套题,一套已解决)1.I didn’t forget the book because my wife ____ me to bring it.a)recalled b)mentioned c)reminded d)remembered2.The surgeon is treating several _______ of this disease.a)conditio 已知在▲ABC中,角A等于2分之1角B等于3分之1角C,它的最长边为2,求这个三角形的面积? 2.25×0.9÷2.25×0.9简算 问题是这样的:我国是一个多地震的国家.从板块学说来看,我国多地震的主要原因是:A.东部和西南部处于板块交界地带B.东部和西北部处于板块交界地带C.我国全部位于环太平洋地震带上D.我 在三角形ABC中,角A,B,C所对的边分别是a,b,c,已知c等于2,C等于3分之派,若三角形的面积等于根号3,求a,b 如果b÷a=8,那么a÷b=多少 一、单选题(共 40 道试题,共 80 分.) 1.垄断竞争厂商短期均衡时____一、单选题(共 40 道试题,共 80 分.)1.垄断竞争厂商短期均衡时____ A.厂商一定获得超额利润B.厂商一定不能获得超额利润C. 在三角形ABC中,已知角A,B,C的对边分别为a,b,c.且a=2,B-C=二分之派,三角形ABC的面积为根号三.求边b. 如果a*b=a×b-a,那么3.4*8的值是多少 试卷总分:100 测试时间:-- 单选题 一、单选题(共 40 道试题,共 100 分.)V 1.今科学 在三角形ABC中,a,b,c分别是角A,B,C,的对边,如果a,b,c成等差数列,角B是30度,三角形面积是三分之二求b 如果a➗b=5/8,那么a比b少()%,b比a多()%.有釆纳 一、单选题(共 10 道试题,共 40 分.) 1. "短期"和"长期"的根本区别在于() A. 在短期内至少有一种资源 已知三角形的三边为abc,a-b=b-c=2,它的最大角的正弦值为二分之根号三,则三角形面积为多少? 如果a➗b=5/8,那么a比b少()%,b比a多()%. 一、单选题(共 10 道试题,共 40 分.)V 1.力的作用线都在同一平面内且汇交于一点的力系称( )力系.A.一、单选题(共 10 道试题,共 40 分.)V 1.力的作用线都在同一平面内且汇交于一点的力 已知a,b,c是三角形ABC的三条边,满足a/3=b/4=c/5,且a+b+c=24 (1)试求a,b,c的值 (2)判断三角形ABC的形状 a=0.00...012(100个0) b=0.0..08(101个0) 求a+b= a-b= a*b= 一、单选题(共 10 道试题,共 40 分.)V 1.等截面直杆在两个外力的作用下发生轴向压缩变形时,这对外力一、单选题(共 10 道试题,共 40 分.)V 1.等截面直杆在两个外力的作用下发生轴向压缩 已知a,b,c为三角形ABC的三边,(a-c):(a+b):(c-d)= -2:7:1,且a+b+c=24,试判断三角形ABC的形状 若|A+2|+(B-1)2=0,则(A+B)101=( ) 一、单选题(共 10 道试题,共 30 分.)1.新民主主义共和国的政体是:A.苏维埃代表大会制度B.参议会制度C.人民代表会议制度D.人民代表大会制度满分:3 分2.意识的反作用或能动性,从根本上说 已知a.b.c为三角形ABC的三边长,且(c-a):(a+b):(c-b)=2:7:1,a+b+c=24判断三角形形状
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn