泡泡乐园欢迎各位朋友光临!
.NET2005中如何定位窗体的位置和大小
上一篇 /
下一篇 2006-11-11 22:56:23
/ 个人分类:学习
SupeSite/X-Space官方站)y-j8~/~B1tCPublic Class Form1SupeSite/X-Space官方站4z?"bg!fR6] V
Private loaded As Boolean = FalseSupeSite/X-Space官方站+^5M$zlAwWtm
n y
SupeSite/X-Space官方站 v
@)xM5D Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosedSupeSite/X-Space官方站+TUzZ7G
My.Settings.Save()
.Et ^5]4X&g k0 End SubSupeSite/X-Space官方站O/oD&MG\
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
9p
Y| Q$iJ"vj0 With My.SettingsSupeSite/X-Space官方站}x)X*Z)N'N4~?/`
Me.Size = New Size(.Width, .Height)SupeSite/X-Space官方站:WNST&_Fw?
Me.Location = New Point(.Left, .Top)SupeSite/X-Space官方站]cJ{-J'E:V(De
End With
y5}D!mOIiV0 loaded = True
L pK~3U;h(_dG'}0 End SubSupeSite/X-Space官方站!e$dV6n?_4p H
SupeSite/X-Space官方站O#l wZ#H4Ox Private Sub Form1_Move(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Move
%ev(|e2i&D0 If loaded Then
vv,re
U]0 With My.SettingsSupeSite/X-Space官方站/IOp*s)_0o;s&W
.Top = Me.Top
8Ct$e#rG2Oc0 .Left = Me.LeftSupeSite/X-Space官方站 W8\aT8z/T!o"f'F
.Height = Me.HeightSupeSite/X-Space官方站`LGwu
.Width = Me.WidthSupeSite/X-Space官方站'p E,[Kl
End WithSupeSite/X-Space官方站4@7kVv6E!B2]^V9H
End IfSupeSite/X-Space官方站^;}Vp.B*LD
End Sub
'NP7[*~%}0
SupeSite/X-Space官方站ySw(ZmrZ Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ResizeSupeSite/X-Space官方站n]e&m/GG3`B1B'j't
If loaded ThenSupeSite/X-Space官方站^w F'_rw8s
With My.SettingsSupeSite/X-Space官方站^ Z@M'@.N!y-`
.Top = Me.TopSupeSite/X-Space官方站!uTS"tRW
.Left = Me.LeftSupeSite/X-Space官方站y.g\"q
FG!X
.Height = Me.HeightSupeSite/X-Space官方站!dL?q7QYiX
.Width = Me.WidthSupeSite/X-Space官方站dW;?$yWWRb
End With
RDnmC0 End If
'@ z:h;]:Q$W0 End SubSupeSite/X-Space官方站r.W@)J yV
End ClassSupeSite/X-Space官方站4U5`6Ar2[ff
o4}U,B3_3r-a0
导入论坛
收藏
分享给好友
管理
举报
TAG:
学习