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

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

創(chuàng)新互聯(lián)公司專業(yè)為企業(yè)提供華寧網(wǎng)站建設(shè)、華寧做網(wǎng)站、華寧網(wǎng)站設(shè)計(jì)、華寧網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計(jì)與制作、華寧企業(yè)網(wǎng)站模板建站服務(wù)，十年華寧做網(wǎng)站經(jīng)驗(yàn)，不只是建網(wǎng)站，更提供有價(jià)值的思路和整體網(wǎng)絡(luò)服務(wù)。

急?。≡赩B.NET中窗口位置調(diào)整問題?。。。?/h2>

'點(diǎn)擊窗口的任何位置拖動(dòng)窗體

Dim ctX As Single, ctY As Single

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

ctX = X: ctY = Y

End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then

Me.Left = Me.Left + X - ctX

Me.Top = Me.Top + Y - ctY

End If

End Sub

如何用VB做一個(gè)窗體像QQ窗體那樣靠邊就能隱藏

方法有二：

1。寫代碼判斷窗體和鼠標(biāo)位置，并且做相應(yīng)的動(dòng)作

2。使用屏幕邊緣自動(dòng)隱藏控件