me señala la parte del insertDebe ser porque te falta un espacio, debe ser asi.
sql_Treserva = "INSERT INTO Treserva" _
& "(codreserva, nompreside, cantiasisten, ASUNTO, Requerimiento, codsalacon, fecha, codusuario, " _
& " hora1, hora2, hora3, hora4, hora5, hora6, hora7, hora8, hora9, hora10, fechahistorico) " _
& " values ('" & codigo_reserva & "' ," _
& " '" & Me.TXTPRESIDE.Text.Trim.ToUpper & "', " _
& "" & Me.TXTASISTENTES.Text.Trim.ToUpper & ", " _
& " '" & Me.Textbox21.Text.Trim.ToUpper & "', " _
& " '" & requerimientos & "' ," _
& " '" & sala & "' ," _
& " '" & fecha & "' ," _
& " '" & codigo_usuario & "', " _
& " '" & Me.T1.Trim.ToUpper & "', " _
& " '" & Me.T2.Trim.ToUpper & "', " _
& " '" & Me.T3.Trim.ToUpper & "', " _
& " '" & Me.T4.Trim.ToUpper & "', " _
& " '" & Me.T5.Trim.ToUpper & "', " _
& " '" & Me.T6.Trim.ToUpper & "', " _
& " '" & Me.T7.Trim.ToUpper & "', " _
& " '" & Me.T8.Trim.ToUpper & "', " _
& " '" & Me.T9.Trim.ToUpper & "', " _
& " '" & Me.T10.Trim.ToUpper & "', " _
& " '" & FECHAHISTORICO + CONCATENAR & "')"
si alguien sabe como puedo sulucionarlo, le agradeceria me ayudara, gracias :hola: