// ใส่ไว้ใน formload
Me.ComboBox1.Items.Add("ห้องพัดลม")
Me.ComboBox1.Items.Add("ห้องแอร์")
Me.ComboBox2.Items.Add("2300")
Me.ComboBox2.Items.Add("3000")
// ประเภทห้องเช่า
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Me.ComboBox2.SelectedIndex = Me.ComboBox1.SelectedIndex
End Sub