VB2008フォーム:位置とサイズを変更する(Location、Size)

フォームの位置とサイズを変更する実行例サンプルです

フォーム関連へ



■横長にしたフォーム
横長ボタンをクリックした結果

■縦長にしたフォーム
縦長ボタンをクリックした結果

Public Class Form1
'横長
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'位置の変更
Me.Location = New Point(10, 10)
'サイズの変更
Me.Size = New Size(700, 200)
End Sub

'縦長
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'位置の変更
Me.Location = New Point(100, 100)
'サイズの変更
Me.Size = New Size(300, 700)
End Sub
End Class


Visual Basic 2008 Express Edition実践入門