I want to update my statement to read 2 values from what is available -

1) user_full_name (concatenation of firstname and lastname) eg., firstname = John lastname= Smith user_full_name = John Smith
2) Initails (First letter of the firstname and first letter of the lastname) e.g., firstname = John lastname= Smith Initials = JS

Please help me;

' Insert a new record into UserProfiles
        Dim connectionString As String = ConfigurationManager.ConnectionStrings("CCMSConnectionString").ConnectionString

        Dim updateSql As String = "UPDATE dbo.TblUser SET first_name=@FirstName, surname=@LastName, user_full_name=@user_full_name, Initials=@Initials WHERE UserId = @UserId"

        Dim fname, lname As String
        'Convert new entries to Title Case for consistancy
        fname = StrConv(FirstName.Text, vbProperCase)
        lname = StrConv(LastName.Text, vbProperCase)

        Using myConnection As New SqlConnection(connectionString)
            Dim myCommand As New SqlCommand(updateSql, myConnection)
            myCommand.Parameters.AddWithValue("@FirstName", fname.Trim())
            myCommand.Parameters.AddWithValue("@LastName", lname.Trim())
myCommand.Parameters.AddWithValue("@user_full_name", XXXXXXXX)
myCommand.Parameters.AddWithValue("@Initials", XXXXXXXX)
            myCommand.Parameters.AddWithValue("@UserId", newUserId)

        End Using