时间: 2021-07-31 作者:daque
底下的步调不妨获得IE的版本号: private type dllversioninfo cbsize as long dwmajorversion as long dwminorversion as long dwbuildnumber as long dwplatformid as long end type private declare function dllgetversion _ lib "shlwapi.dll" _ (dwversion as dllversioninfo) as long private function getieversionstring() as string dim dvi as dllversioninfo dvi.cbsize = len(dvi) call dllgetversion(dvi) getieversionstring = "internet explorer " & _ dvi.dwmajorversion & "." & _ dvi.dwminorversion & "." & _ dvi.dwbuildnumber end function