Visual Basic.NET - ERROR cmd.executenonquery()

Me sale un error que dice " error de sintaxis cerca del TextBox3" al darle guardar a un nuevo registro
estoy trabajando con una base de datos sql y lenguaje vb.
espero puedan ayudarme

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'hacemos consultar INSERT para agregar un registro a la BD
Dim cnx As New SqlConnection("Data Source=MARILYN;Initial Catalog=Kiosko;Integrated Security=True")
Dim cmd As New SqlCommand("INSERT INTO MAQUINA (NUMEROM,NOMBREM,AREAM) VALUES (TextBox5,TextBox4,TextBox3", cnx)
' para agregar los valores de los parametros de la consulta
cmd.Parameters.AddWithValue("@NUMEROM", TextBox5.Text)
cmd.Parameters.AddWithValue("@NOMBREM", TextBox4.Text)
cmd.Parameters.AddWithValue("@AREAM", TextBox3.Text)

'abrir conexion
cnx.Open()
'para que se ejecute la consulta
cmd.ExecuteNonQuery()
MsgBox("Guardado Correctamente", vbInformation, "Correcto")


Try
Catch ex As Exception 'en caso que se produzca una excepcion
MsgBox("Error al guardar", vbExclamation, "Error")
End Try
End Sub

Fíjate en los VALUES de tu insert, lo que le estás enviando son lo controles textbox y no el valor que está en la propiedad .Text, ese es tu problema.

Es VB6.0? o .NET?, porque no veo la diferencia, bueno salvo el try catch

Gracias! :D es VB 6.0