Concatenar colunas e apresentar na combobox

Public Sub PreencheComboBoxCidade(ByRef cboCombo As ComboBox)
Try
Dim dt As New DataTable
dt = dao.ConsultaCidades().Tables(0)
With cboCombo
.DisplayMember = "nome_Cidade"
.ValueMember = "cod_Cidade"
.DataSource = dt.DefaultView
.SelectedIndex = 0
End With
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub

Estou usando o código acima para preencher uma combobox.

Dentro da tabela cidades, possuo os campos Codigo, Nome e UF.

Como faço para concatenar na combobox o valor Nome e UF?

Minha idéia é apresentar ao usuário dentro da combobox o seguinte valor:

SÃO PAULO-SPGOIÂNIA-GO

ou seja:

nome_Cidade - UF_Cidade