VB指導(dǎo):使用twips獲得屏幕信息

字號(hào):

一個(gè)出色的visual basic程序應(yīng)該可以在不同的系統(tǒng)和配置下運(yùn)行。例如,視頻設(shè)備在不同系統(tǒng)中的設(shè)置很有可能是不一樣的。joe使用的是800x600分辨率的老式顯示器,而alice使用的是1600x1200像素的21寸顯示器。
    對(duì)于某些程序,這些視頻的差別并不是很重要,但在一定情況下你一定希望你的程序能夠充分利用屏幕的全部區(qū)域和分辨率。為了實(shí)現(xiàn)這一點(diǎn),你可以使用screen對(duì)象來(lái)獲得有關(guān)顯示硬件的信息。
    vb使用twips(緹)作為屏幕的量度,每一個(gè)緹相當(dāng)于1/1440英寸。你可以通過(guò)screen對(duì)象的兩個(gè)屬性來(lái)設(shè)置屏幕的大小,即screen.width 和 screen.height。在理論上你可以使用這些屬性來(lái)決定實(shí)際的屏幕尺寸,如下所示:
    screenwidthininches = screen.width/1440
    screenheightininches = screen.height/1440
    緹的值也可以用于設(shè)置選項(xiàng)在屏幕上的位置。你可以使用它們來(lái)定位窗體在屏幕上合適的位置而不超過(guò)屏幕范圍之外。例如,以下代碼段將窗體定位在屏幕的中央:
    form1.move (screen.width - form1.width) / 2, (screen.height - form1.height) / 2
    這里是另一個(gè)范例,其將窗體定位在屏幕的右下角,程序適用于任何系統(tǒng)(盡管可能有些窗體被windows任務(wù)欄覆蓋)。
    form1.move screen.width - form1.width, screen.height - form1.height