Public Shared Sub HideShowComboBox(cbName As ComboBox, visible As Boolean) If Not visible Then cbName.Visible = False Else cbName.Visible = True End If End Sub Public Shared Sub DisableEnableComboBox(cbName As ComboBox, enabled As Boolean) If Not enabled Then cbName.Enabled = False Else cbName.Enabled = True End If End Sub Public Shared Sub HideShowTextBox(tbName As TextBox, visible As Boolean) If Not visible Then tbName.Visible = False Else tbName.Visible = True End If End Sub Public Shared Sub DisableEnableTextBox(tbName As TextBox, enabled As Boolean) If Not enabled Then tbName.Enabled = False Else tbName.Enabled = True End If End Sub