Public Class Form1 #Region "変数" Dim s As String #End Region #Region "イベント" Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub #End Region End Class