在VB.NET中通過那個函數(shù)可以獲取當(dāng)前屏幕的分辨率?

您可以用下面給出這一小段代碼檢測當(dāng)前屏幕分辨率，然后根據(jù)結(jié)果作出反應(yīng)──例如，重新調(diào)整窗體大小以適應(yīng)用程序戶分辨率。

專注于為中小企業(yè)提供成都網(wǎng)站建設(shè)、網(wǎng)站制作服務(wù),電腦端+手機端+微信端的三站合一,更高效的管理,為中小企業(yè)軹城免費做網(wǎng)站提供優(yōu)質(zhì)的服務(wù)。我們立足成都，凝聚了一批互聯(lián)網(wǎng)行業(yè)人才，有力地推動了上千余家企業(yè)的穩(wěn)健成長，幫助中小企業(yè)通過網(wǎng)站建設(shè)實現(xiàn)規(guī)模擴充和轉(zhuǎn)變。

Public Function CheckRez(pixelWidth As Long, pixelHeight As Long) As Boolean

'

Dim lngTwipsX As Long

Dim lngTwipsY As Long

'

' convert pixels to twips

lngTwipsX = pixelWidth * 15

lngTwipsY = pixelHeight * 15

'

' check against current settings

If lngTwipsX Screen.Width Then

CheckRez = False

Else

If lngTwipsY Screen.Height Then

CheckRez = False

Else

CheckRez = True

End If

End If

'

End Function

Next, run the following code at the start of the program:

If CheckRez(640, 480) = False Then

MsgBox "Incorrect screen size!"

Else

MsgBox "Screen Resolution Matches!"

End If

vb 中怎么取屏幕的長和寬

Screen.Width 是屏幕的絕對寬度，單位是twip（1twip=1/1440英寸）

Screen.Height 是屏幕的絕對高度，單位是twip

Screen.Width/Screen.TwipsPerPixelX 是屏幕的相對寬度，單位是像素pixel，其值根據(jù)分辨率大小而不同,TwipsPerPixelX是美像素有多少twip

Screen.Height/Screen.TwipsPerPixelY 是屏幕的相對寬度，單位是像素pixel

如何在代碼中設(shè)置vb.net運行初始界面與屏幕右上角對齊？

獲取屏幕大小寬和高 和初始化窗口的尺寸 屏幕減尺寸等于你想要的left值 和top值 即屏幕比你窗體高多少 寬多少就是你右對齊的初始值 右上角對齊top依舊為0