Concatenate 2 Strings

Question

0.00/5 (No votes)

See more:

Could you be so kind and HELP me:

I need to concatenate two strings, columns Nome and Apelido, from the same table, ManutencaoFuncionarios, placing the result in a ComboBox, ComboBoxNomeFuncionario

VB

Imports System.Data
Imports System.Data.SqlClient 
Public Class Teste

    Dim con As SqlConnection
    Dim da As SqlDataAdapter
    Dim connectionString As String = ("Data Source=Server;Initial Catalog=DataBaseName;Persist Security Info=True;User ID=sa;Password=MyPassword")
    Dim DataSetManutencaoFuncionarios As DataSet
    Dim comando As SqlCommand

VB

Sub Colocar_Nomes_Funcionarios()
        con = New SqlConnection(connectionString)
        comando = New SqlCommand
        comando.Connection = con
        comando.CommandType = CommandType.Text
        comando.CommandText = "Select Nome+' ' +Apelido as ComboBoxNomeFuncionario from ManutencaoFuncionarios"
        da = New SqlDataAdapter
        da.SelectCommand = comando
        DataSetManutencaoFuncionarios = New DataSet
        con.Open()
        da.Fill(DataSetManutencaoFuncionarios, "ManutencaoFuncionarios")
        ComboBoxNomeFuncionario.DataSource = DataSetManutencaoFuncionarios.Tables("ManutencaoFuncionarios")
        ComboBoxNomeFuncionario.DisplayMember = ("Nome")
        con.Close()
        ComboBoxNomeFuncionario.SelectedIndex = -1
    End Sub

VB

Private Sub Teste_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              Colocar_Nomes_Funcionarios()
          End Sub
  End Class

Posted 6-May-10 5:44am

arrelialp (Luis Pereira)

Updated 6-May-10 5:52am

v2

Add a Solution

Comments

Sandeep Mewara 6-May-10 12:59pm

Couldn't get what you want here. I can understand that English is not your first language, yet could you please try to clarify which strings of DB you want to concatenate?

2 solutions

Solution 2

Thank you so much. The final code is:

VB

Sub Colocar_Nomes_Funcionarios()
        con = New SqlConnection(connectionString)
        comando = New SqlCommand
        comando.Connection = con
        comando.CommandType = CommandType.Text
        comando.CommandText = "Select Nome + ' ' + Apelido as ComboBoxNomeFuncionario from ManutencaoFuncionarios"
        da = New SqlDataAdapter
        da.SelectCommand = comando
        DataSetManutencaoFuncionarios = New DataSet
        con.Open()
        da.Fill(DataSetManutencaoFuncionarios, "ManutencaoFuncionarios")
        ComboBoxNomeFuncionario.DataSource = DataSetManutencaoFuncionarios.Tables("ManutencaoFuncionarios")
        ComboBoxNomeFuncionario.DisplayMember = ("ComboBoxNomeFuncionario")
        con.Close()
        ComboBoxNomeFuncionario.SelectedIndex = -1
    End Sub

Posted 6-May-10 7:13am

arrelialp (Luis Pereira)

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Gordon Kushner · Accepted Answer · 2010-05-06T06:54:00

Your error is simple. The SQL you wrote gives you only one column: "ComboBoxNomeFuncionario". When you set the DisplayMember, you are refering to a column you don't have: Nome,

SQL

comando.CommandText = "Select Nome+' ' +Apelido as ComboBoxNomeFuncionario from ManutencaoFuncionarios"
da = New SqlDataAdapter        
da.SelectCommand = comando DataSetManutencaoFuncionarios = New DataSet        
con.Open()        
da.Fill(DataSetManutencaoFuncionarios, "ManutencaoFuncionarios")    

ComboBoxNomeFuncionario.DataSource = DataSetManutencaoFuncionarios.Tables("ManutencaoFuncionarios") 

ComboBoxNomeFuncionario.DisplayMember = ("Nome")

Change your SQL to this
Select Nome, Nome + ' ' + Apelido as ComboBoxNomeFuncionario from ManutencaoFuncionarios