怎樣得到當(dāng)前的屏幕分辨率？

怎樣得到當(dāng)前的屏幕分辨率？
    在程序設(shè)計(jì)中我們經(jīng)常要改變窗體的大小，而這也依賴于屏幕的分辨率，下面的例子將演示如何得到當(dāng)前屏幕的分辨率：
    ResWidth = Screen.Width Screen.TwipsPerPixelX
    ResHeight = Screen.Height Screen.TwipsPerPixelY
    ScreenRes = ResWidth & "x" & ResHeight
    ResWidth和ResHeight分別表示屏幕的寬和高，比如這樣的結(jié)果：
    800x600