如何确定当前屏幕分辨率计算机二级考试
文章作者 100test 发表时间 2009:07:25 11:19:20
来源 100Test.Com百考试题网
Microsoftaccess2000
本文说明如何创建用户定义的样例VisualBasicforApplications函数以确定当前屏幕分辨率。您可以使用本函数确定是在标准VGA模式(640x480)还是在SuperVGA模式(800x600、1024x768或1600x1200)下运行。
正文:
下面的示例说明如何创建并使用样例GetScreenResolution()函数。
备注:您可能有某些在现有Microsoftaccess库中定义的MicrosoftWindowsAPI函数;因此,您的声明可能被重复。如果您收到重复过程名称错误消息,请在代码中删除或注释出声明语句。
新建模块,然后键入下列“声明”和函数:
*****************************************************************
DECLARATIONSSECTION
*****************************************************************
OptionExplicit
TypeRECT
x1AsLong
y1AsLong
x2AsLong
y2AsLong
EndType
NOTE:Thefollowingdeclarestatementsarecasesensitive.
DeclareFunctionGetDesktopWindowLib"User32"()AsLong
DeclareFunctionGetWindowRectLib"User32"_
(ByValhWndAsLong,rectangleAsRECT)AsLong
*****************************************************************