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

VB怎样用VB在应用程序中调用API

HTML文档下载 WORD文档下载 PDF文档下载
VB怎样用VB在应用程序中调用API
作者:小锋
由于 API 过程存在于 Visual Basic 应用程序之外的文件中,在使用时必须指定过程的位置和调用参数。可以用 Declare 语句提供这类信息。在声明了 API 过程之后,可以把它当做 Visual Basic 自己的过程使用。 
  如果在 Visual Basic 中直接调用 API,那么 Visual Basic 环境下固有的安全机制将受到不利影响。这意味着在测试和调试程序时可能会遇到更多的系统故障。为了减少这种危险,在声明 API 过程、传递参数和指定类型的时候务必要小心。无论在什么情况下,一定要经常保存已经完成的工作。API 可以提供不同凡响的功能,但是要用好它也不容易。
  下例将演示如何调用 Windows API 中的过程。调用函数 SetWindowText 来改变一个窗体的标题栏。当然,在实际应用中,通常总是利用 Visual Basic 的 Caption 属性来改变标题栏。该示例的目的在于说明如何声明并调用过程。
声明 API 过程
  首先,在模块的声明部分对过程进行声明:
  Private Declare Function SetWindowText Lib "user32" _
  Alias "SetWindowTextA" (ByVal hwnd As Long, _
  ByVal lpString As String) As Long
  过程的精确语法定义可以用 API Viewer 应用程序找到,在 Win32api.txt 文件中也可以找到它。如果将 Declare 放在 Form 或者 Class 模块内,那么必须在它的前面加上 Private 关键字。同一个 API 过程在一个工程中只需声明一次;然后可以任意调用。


调用 API 过程
  在声明了函数之后,调用它的方式与标准的 Visual Basic 函数相同。在下例中,Form Load 事件调用了上面声明的过程。
  Private Sub Form_Load()
    SetWindowText Form1.hWnd, "Welcome to VB"
  End Sub
  在运行这段代码时,函数首先使用 hWnd 属性确定要修改标题栏的窗口(Form1.hWnd),然后将标题栏修改为“Welcome to VB”。
  需要牢记的是:Visual Basic 不能验证传递到 API 过程的值是否正确。如果传递了错误的值,那么过程将出错,并可能因此导致 Visual Basic 应用程序停止运行。这样就不得不重新加载和启动应用程序。在测试 API 过程时千万要小心,一定要经常地保存自己的工作。
  极少数 API 调用能够识别缺省的 Variant 数据类型。最好声明具体的变量类型并使用 Option Explicit,这样,API 的可靠性要高得多。
鼠标取词-VB资料 谈变VB中APP.PAHT的注意事项 探讨高效的排序合并算法-VB资料 剔除INI文件中的注释部分-VB资料 提取可执行文件中的图标-VB资料 添加记录到文档菜单-VB资料 突破 SendKeys 的限制-VB资料 突破SendKeys的限制 -VB资料 圖面背景透明的技巧-VB资料 退出并关闭 Windows-VB资料 托盘程序详解(二) -VB资料 托盘程序详解(一) -VB资料 我怎样确定我的程序是否在运行?-VB资料 无重复随机数序列产生器 -VB资料 显示打开方式对话框建立文件的关联 -VB资料 显示动画鼠标图标-VB资料 修复VB5启动时可能出现的一个bug 修改IE的环境菜单-VB资料 修改安装向导生成的缺省安装目录 -VB资料 修改屏保口令 -VB资料 修改屏幕保护的口令 -VB资料 旋转字体 -VB资料 延时函数-VB资料 一个关于乘法溢出问题的探讨 -VB资料 一组VB实用小程序 一组VB应用技巧 隐藏和显示任务栏-VB资料 应用 WSH 读写注册表和建立快捷方式 -VB资料 VB用 IIF 和 SWITCH 以精减代码 VB用BASIC语言设计Windows风格的用户接口 VB用Form 的 Mouse_Move事件来检查鼠标是否在窗口内: 如何在图片框中按鼠标时知道当前鼠标在图片框中的坐标?谢谢! 【骂人】destroy(只想灌的爽)进来 散分~~~~前5名!谢~ 请教两个问题,专家请进! 请问在什么地方可以找的计算机方面的中英文对照翻译? Dll向主窗口发送自定义消息? 如何用MoveWindow()和SetWindowPos()来改变窗口大小(最好有个例子)! script参数怎样传输到applet中 怎样把jpg转换位BMP,在线急等 我要开放mssql的访问,在防火墙中是不是只要开放1433端口就可以了? 外面买的2000安装盘有的里面只有一个程序,叫什么ghost,好象运行它后就可以非常快的安装2000,请问这个ghost是用哪个软件做的? 系统初始化把所有数据库里面的内容删除,保留表的结构,这是怎么实现的? 如何将AnsiString转换成LPCWSTR? 我想请问一下,当panel显示时如果下面有<select >控件是,这个控件不被盖住,结果好象panel破了下一样,请问题怎么办!谢谢 如何把这个程序转换成java程序,我够菜的:( 高分请教如何实现本地网址过滤?就好像反黄软件,或公安的监控软件一样。 又有问题了 谁能贴一个关于TQUERY,TTABLE等控件的数据库应用的详细使用 我会jsp+servlet sql server完成小项目 找相关工作还咬什么? vs.net的问题,看看你遇到过没有? 答者有分!怎样用超链接调outlook发邮件? 怎样把不同机子上的vc++模块连到一块 关于自增自减运算符的问题-缘引老师的教案 在SCO上配置Informix遇到n多问题 急!寻解线性代数方程组的算法程序或者相关资料 假设在 MDI 程序中打开了3个文档,现在想将其中一个文档提到前面显示 php语法的一个小问题 MM,有个难题急需解决(关于 DateTimePicker控件的) 请看图,长得巨像梁朝伟的工地民工!! §§如何从Variant变量中取出有符号long型值? 关于vc++和visual prolog的接口问题 Exchange 2000 Lotus connector 怎样把<<石器时代>>游戏里的图片和动画弄出来??? 有关PHP使用相对路径访问ACCESS数据库的方法。 大版主,特别是阿信,进来看! 怎么把数字以16进制格式输出 一个奇怪的顺序问题 怎样知道自己被“黑”了? 求一个三角形的组合问题 如何删除CListCtrl的单条或多条选中项 设个标志位,只取0,1两个值,该定什么类型好? 请问如何在vbscript的函数中嵌入asp的response.redirect方法 买了本VB书,很多的案例却不能用,高手帮忙看看! 求书Professional Active Server Pages 3.0 英文版!!!!! 谁有mdeamon服务器设置的相关中文资料呀?本人急需。 请问wacom合肥哪里有卖? 如何获取系统语言? ¥¥谢谢王小石,问题全部解决!我就剩50分了,都给你,过你天有分了,接着给你!! GDI的问题 放分大思考:如果没有IT,我们现在都在做什么?欢迎大家讨论哦 请问存储过程写在那里?我找aspx页面怎么没有看到呢?提示一下就好了 在显微镜下观察临时装片时,发现有异物,移动装片时异物不会跟着移动,是说明异物在物镜或目镜上可试用什么 第五题,全部 黎明鸟 程光锐1.通过阅读全诗,说说最吸引你的是那个诗节,谈谈理由.2.品析下列诗句,体会诗句所蕴含的思想感情.(1)很久很久,你没有唱出歌声了.(2)突然从梦中醒来,惶惑而又急速,你就殷 用低倍镜观察菠菜叶的下表皮细胞时,发现视野中有一异物,移动装片异物不动,换上高倍镜后异物仍在,异物可能在:A.物镜上B.目镜上C.镜筒上D.材料中另:怎么判断异物是在目镜上还是物镜上? 本人高一 物理和化学比较好 数学也不错 不过我感觉不理解 完全是套方法 不会创新 我应该怎么改进?我比较擅长实际问题 请问我应该如何发展我是对数学不理解 物理化学 不用背公式 题就 海洋地壳的平均厚度是多少? 若在低倍镜视野下发现有一异物,当移动装片时,异物不动,转换高倍镜后,异物仍可观察到,这个异物在目镜上还是反光镜上 如何考到满分? 用 "双线桥" 表示下列氧化还原反应 (1)2Cl2+2NaBr===2NaCl+Br2(2)NaBRO3+5NaBr+3H2SO4=3NaSO4+3Br2+3H2O (3)3cu+8HNO3=3CU(NO3)3+2NO+4H2O (4)4Mg+10HNO3=4Mg(NO3)2+NH4NO3+3H2O 一个学习小组的四名同学观察并测量了一个长方体 赵星说:“如果高再增加2dm,它恰好是一个正方体.” 吴尘说:“长方体的前后左右四个面的面积之和是60平方分米” 李越说:“它的底面周 初中体育考试长跑满分多少 怎么用双线桥表示CL2+2NABr=2NACL+Br2的氧化还原反应的得失电子情况啊? 四人学习小组对一个长方体进行观察和测量,交流如下:小红说如果在增加3分米,它恰好是一个正方体.小军说长方体的前后左右四个面的面积之和是160平方分米.小林说它的底面周长是32分米. 豫卫食字(2006)第N010号 是药品还是什么鸿翔蜂胶茯苓山药片 备案文号是:豫卫食字(2006)第N010号执行标准:企标Q/ZZHX001-2006这是药品还是什么 吃完对身体会不会有什么危害 什么是光子,什么是光波?回答不要太复杂.若答案很长,请删去一些. 字字皆辛苦的意思求求了 帮个忙 这个药是真的吗 豫卫食字(2006)第H023号 两年没上学了,英语忘光光的,怎样利用电脑学英语才能够达到高效,优质的效果,期待获得高人的指点 3003铝锰合金表面无任何处理的情况下,在室外应用,能够使用多少年 豫卫食字(2006)第0375号是什么? 一个具有E=13.6eV动能的、处于基态的氢原子与一个静止的、同样处于基态的氢原子发生正碰,试确定碰撞的性 铝合金(3003、4045/3003/4045、4343/3003/4343)怎么清洗机加工除油清洗,有超声波清洗机,有什么简易的清洗方式或者说是用什么清洗剂合适? 标准文号豫卫食字(2006)第0202号 是什么药品? 氢原子的基态能-13.6eV是势能和动能的总和吗 哪里有卖吸痰器的? =-=物理犀利且理解能力强的进.质量的单位为什么是kg(或g或t)呢?kg(或g或t)不是用来表示重的么?质量只是表示多少,为什么单位用kg(或g或t)? 1,已知氢原子基态能量为-13.6eV,下列说法中正确的有:A.用波长为600nm的光照射时,可使稳定的氢原子电离B.用光子能量为10.2eV的光照射时,可能使处于基态的氢原子电离C.氢原子可能向外辐射出11eV 验电计接地问题,为什么接地以后再移动极板距离,两个极板上的电荷量不发生改变?类似的接地什么情况下极板的电荷量会发生改变? 物理方面懂得多的高后进来看看,1电阻是指什么对电流的阻碍,或者说对电流的抵消,转化2电阻怎么用电压来除以,而为什么电阻乘电流是电压3为什么电压与电流一会乘一会儿除,电功率就是电 导体内电流增大,是说明导体内部的自由电子流动速度加快了,还是自由电子的数目(电荷量)增多了? 3003合金铝和6063合金铝有什么区别 物体震动发声的现象真是太多了,伱能向同学说出一些比较新奇的发声现象吗?例如:蝉是怎样发声的?格式:1.观察2.3.猜想4.设计,实验5.终结讨论得出结论 例如:题目(声音的传播)1.声音的产生 金属的氦外电子在电压升高的影响下成为自由电子的数量会增加吗. 如图,在直角梯形ABCD中,ad‖bc 角bad等于90°对角线bd垂直dc,ad等于4 bc等于9 则bd等于 急求一皮带轮设计,有图最好,在下先把题目发下:试设计一普通V带传动,主动轮转速n1=960r/min,从动轮转速n2=320r/min,带型为B型,电动机功率P=4KW,两班制工作,载荷平稳.请知道的亲~把计算过程和答 AgNO3溶液加稀HNO3加BaCl2溶液有什么现象 铝合金5182和5052的差别有什么差别 一道刚体转动的题(有关皮带轮)6.如图所示,两均质轮的半径分别为R1、R2,质量分别为m1、m2,两轮用皮带(质量不计)连接,如在主动轮A上作用一外力矩M,在被动轮B上则有摩擦力矩Mr,并设皮带 She has two________(bowl)of rice for breakfast 请问:酶原激活的生物学意义. 有没人能笑着面对死亡的? 中国色狼真多!是啊.怎么防狼啊? 酶原激活的本质是什么 “不曾哭泣的年轻人是野人,不曾欢笑的老人是愚人”什么意思? 为什么张策断定古鼎是假的 脂肪肝是怎么形成的rt 如果是你们,假设你们是老人,你们会朝一个年轻人弯下身子笑着朝他点点头吗? 23.牛顿第二定律的表达式可以写成m=F/a,对某个物体来说,它的质量m   A . 跟合外力F成正比 B. 跟合外力F与加速度a都无关   C. 跟它的加速度a成反比 D. 跟合外力F成反比, 脂肪肝的形成每个病的形成都应该有个原因吧,那脂肪肝的呢?是怎么形成的啊? 7.化学中常用类比的方法可预测许多物质的性质.如根据H2+Cl2=2HCl推测:H2+Br2=2HBr.但类7.化学中常用类比的方法可预测许多物质的性质.如根据H2+Cl2=2HCl推测:H2+Br2=2HBr.但类比是相对的,如根据2 中国夏朝时欧洲处在甚么时代? 脂肪肝怎样形成的 请问H2+cl2==2Hcl+Q1 H2+Br2==2HBr+Q2 其中Q为正值 为什么Q1大于Q2可是cl2的非金属性强于Br哒?从这的角度上来说,应该cl2更易反应吧 小鸟为什么早晨要叫? 脂肪肝是怎样形成的 在电脑的数学符号 ^ 这是什么意思啊?例如这个方程x^2-2x+4y-4=0 求解!本人在线等,速度! 清晨,被鸟儿叫醒陈嘉瑞阅读答案 脂肪肝是如何形成的呢 我是高二物化班的、我化学物理有点问题、我觉得物理读题理解很困难、不知道用什么方法.而且化学有机推断题很难有思路. 给我要一点清晨如同鸟叫的音乐有鸟叫的 好像在清晨树林一样能听到鸟叫的地方太少拉我希望在早晨安静一会儿 过的舒服点啊 16岁少女骗倒四省10余派出所:浙江王毅出席中意政府委员会第五次联席会议日报:中国加强游说美朝对话国外如何处理医患纠纷?网站展示完全用CSS画的苹果鼠标英智库发布2013年幸福国家排名杭州地铁周边公共交通配套薄弱遭吐槽46名中国与印度非法采金者在加纳被捕美国最新汇率报告未将中国列为“汇率操温家宝十年教育工作回顾:珍视成绩努力普京获评福布斯2013全球“头号强人简氏关注中国海军最大演习:最大看点并学者称一线城市过高生活成本让人幸福感乐清一淫贼夜潜女邻居家中 持刀强逼她中国三大舰队穿越岛链 专家:给日本实温家宝亲笔信谈教育 坦言工作做得不够90后北漂进京3个月逃回老家:北京太叫停网友为重病患者募捐? 宁国民政局温家宝写亲笔信鼓励汶川地震受灾羌族女美主持人面对华文媒体就\"杀光中国人萨米人的收鹿季:驯鹿背上用刀做记号后开自动挡车等红灯切忌挂P挡!今日17时至明日16时车流量大 请错好地砖手感沉 直角锐利平整度高苏宁生活广场今日开业 吃喝玩乐一站享华城国际广场臻品房源邀您品鉴装修买家具 就要比一比逛沙漠、看草原两三天搞定 赶紧报名跟秦鹰突击队携“剑齿虎”亮相国庆假期出行实用提醒从文庙创始的一所现代学校在传承与创新东方家园建材家居广场:现金豪礼最高可除10月3 4日有雨外假期均适宜户外买红木家具要约定好具体材质红木雅居阁大优惠 20件红木家具只需铜川最东极 洛河边上古村落吉士堡“涂鸦部落”马咀村 农业部副部长:很申请后5个工作日企业可拿到营业执照乌金木 一个被名字改变命运的“王子”国网榆林供电公司:全力铺就安全“高速漆水河、沮河两岸将打造四“长廊”榆林新改建厕所165座
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘