当前位置:编程学习 > VB >>

关于VB的API

贴一个关于VB的API,然后细讲各语句用法,讲的越细越好
追问:来自手机问问。。。。。。
答案:Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)'添加Sleep函数声明

Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long '添加Messagebox函数声明
Sub Main()'main主函数

Call Sleep(3000)'调用sleep函数,和调用普通函数用法一样

Call MessageBox(0,"Helloworld!","MessageBox",0)'调用Messagebox函数,和Msgbox差不多,只不过Msgbox是MessageboxAPI函数的封装。

End Sub

 

 

注:函数声明是通过api浏览器查找到得,

其实如果C编程研究深入,你会发现其实vb很多地方的功能其实是封装了一堆api实现的。

'先声明

Private Declare Function Beep Lib "kernel32 " (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long  '该api实现主机按照指定频率发声,第一个参数dwFreq为发声频率单位赫兹,取值为人类可见声范

'围,第二个参数dwDuration设定 发声时间,单位毫秒

 

Private Sub form_load()
a= Beep(10000, 5000) '再过程中调用

end
End Sub

'本例程序运行后发声5秒,然后终止运行

API函数好多哦。你顺便总结下比我哈哈

上一个:关于VB编程问题
下一个:怎样学习好VB

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,