Insert multiple combobox value into one sql column - sql

Question

I need to insert in sql the value of two combobox but I cant seem to make it right.
Data = "INSERT INTO [Mc_Koy].[dbo].[Transaction] ([ID],[Desciption],[Amount]) VALUES ('" & txtbox_id.Text & "','" & cmbo_frm.SelectedValue & &cmbo_to.SelectedValue &"','" & txt_fare.Text & "')"

Answer 1

What you should do is have separate columns in the database for the "From" and "To" values. Also, the Amount column should be a numeric type, preferably a Decimal. You didn't say which database you are using, so I can't give an exact answer, but your SQL and associated VB code should be something like
Dim connStr = "Your SQL connection string here"
Using sqlConn As New SqlConnection(connStr)
Dim sql As String = "INSERT INTO [Mc_Koy].[dbo].[Transaction] ([ID],[FromLocation],[ToLocation],[Amount]) VALUES (#Id, #From, #To, #Fare)"
Dim sqlCmd As New SqlCommand(sql, sqlConn)
'TODO: Set the .Size parameters to match those in the database. '
sqlCmd.Parameters.Add(New SqlParameter With {.ParameterName = "#Id", .SqlDbType = SqlDbType.VarChar, .Size = 30, .Value = txtbox_id.Text})
sqlCmd.Parameters.Add(New SqlParameter With {.ParameterName = "#From", .SqlDbType = SqlDbType.VarChar, .Size = 30, .Value = cmbo_frm.SelectedValue})
sqlCmd.Parameters.Add(New SqlParameter With {.ParameterName = "#To", .SqlDbType = SqlDbType.VarChar, .Size = 30, .Value = cmbo_to.SelectedValue})
sqlCmd.Parameters.Add(New SqlParameter With {.ParameterName = "#Fare", .SqlDbType = SqlDbType.Decimal, .Value = CDec(txt_fare.Text)})
Try
sqlCmd.ExecuteNonQuery()
Catch ex As Exception
MsgBox("I could not do that because " & ex.Message)
End Try
End Using
Then when you want to display the From and To with the text "To" inbetween, you just retrieve the [From] and [To] values from the database and concatenate them in a string with " To " inbetween, e.g.
Dim journey As String = String.Format("{0} To {1}", fromLocation, toLocation)