Hola.., en la forma que estas haciendo el insert (sin utilizar un dataset y solo un dataadapter) te faltaría un command..
Te podría quedar así:
Cita: ...
...
Dim sSQL As String
sSQL = "Insert Into RechazoCheque (clCodigo,rtCodigo,rcMonto,rcFecha) values('01','01',50.0,'01/01/2004')"
Dim daRechazo As SqlDataAdapter = New SqlDataAdapter
daRechazo .InsertCommand = New SqlCommand(sSQL, oConn)
daRechazo .InsertCommand.CommandType = CommandType.Text
oConn.Open()
daRechazo .InsertCommand.ExecuteNonQuery()
oConn.Close()
Salu2