api函数在vb中的应用

《api函数在vb中的应用》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、API函数在VB中的应用API函数在VB中的应用：所谓API就是应用程序接口（ApplicationProgramingInterface），是一些用C语言编写，由操作系统自身调用的函数。_CLOSE=H10DeclareFunctionFindp;H1ConstSp;H4'FormatFloppy()过程声明PublicSubFormatFloppy()DimsBufferAsString,lResultAsLongsBuffer=String$(255,0)lResult=Getp;"rundll32

2、.exeshell32.dll,SHFormatDrive"CallCenterDialog("Format-3?Floppy(A:)")X=Shell(Procs,1)CallCenterDialog("Format-3?Floppy(A:)")k=LockD3AsLongD3=LockScrScrhght%DimlpDlgRectAsRECTDimlpdskrectAsRECTDimhTaskBarAsLonghTaskBar=FindWindop;,WinText)CallGetWindo-lpDlg

3、Rect.TopCallGetWindo-lpdskrect.TopX%=(Scrwdth%-wdth%)/2y%=(Scrhght%-hght%)/2CallSetWindowPos(hTaskBar,0,X%,y%,0,0,SWP_NOZORDEROrSWP_NOSIZE)DoEventsEndSub程序的执行程序输入完成后，点击VB运行菜单中的启动或全面编译命令，点击软盘格式化按钮后选择要格式化的容量，即可对3.5英寸盘进行格式化操作。调用版本信息框在e.haskAsLonghetersAsStrin

4、glpDirectoryAsStringnShop;HCPublicConstSESE_MASK_NOCLOSEPROCESS=H40PublicConstSEE_MASK_FLAG_NO_UI=H400DeclareFunctionShellExecuteEXLib"shell32.dll"Alias"ShellExecuteEx"(SEIAsSHELLEXECUTEINFO)AsLong'ShoeAsString,OSEIASSHELLEXECUTEINFODimrAsLongask=SEE_MASK_

5、NOCLOSEPROCESSOrSEE_MASK_INVOKEIDLISTOrSEE_MASK_FLAG_NO_UI.he.lpParameters=vbNullChar.lpDirectory=vbNullChar.nShow=0.hInstApp=0.lpIDList=0EndWithr=ShellExecuteEX(SEI)ShowProperties=SEI.hInstAppEndFunction程序的执行程序输入完成后，点击VB运行菜单中的启动或全面编译命令，点击属性按钮按钮，即可查看C:AUT

6、OEXEC.BAT的属性。