Dim w As Integer = e.Sender.Width Dim h As Integer = e.Sender.Height Dim l As Integer = e.Sender.Left Dim t As Integer = e.Sender.Top e.Sender.Width = e.Sender.Width * 1.1 e.Sender.Height = e.Sender.Height * 1.1 'e.Sender.Width = e.Sender.Width * 0.9 'e.Sender.Height = e.Sender.Height * 0.9 e.Sender.Left = l + (w - e.Sender.Width) / 2 e.Sender.Top = t + (h - e.Sender.Height) / 2
加好友 
发短信
Post By：2014/1/23 10:45:00 [显示全部帖子]
