簡単なものですが、
DropDownList1には、データベースバインドで、地域名が28個表示されます。

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Page.IsPostBack = False Then
            DropDownList1.Items.Add("選択してください")
         End If
    End Sub

    Protected Sub DropDownList1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DropDownList1.SelectedIndexChanged
        ListBox1.Items.Add(DropDownList1.Text)
    End Sub
で
１．DropDownList1の先頭に、"選択してください"がついかされない
２．DropDownList1を、選択しても、ListBox1へ追加されない。