关于VB的API
贴一个关于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函数好多哦。你顺便总结下比我哈哈