porque no puedo insertar variables sin valor

[luiscl]

Tienes razón, GerunD. Otra opción, ya que por lo visto unas veces vas a tener foto, y otras no, es utilizar 2 insert, en función de si el campo 'c' está vacío o no.

If c <> "" Then

Dim MySQL as string = "Insert into noticias values (@titulo, @fecha, @noticia, @foto)"
Dim myConn As SqlConnection = New SqlConnection("cadinita_de conexion_a_tu_servidor")
Dim Cmd as New SQLCommand(MySQL, MyConn)
cmd.Parameters.Add(New SQLParameter("@titulo", ftitlo.text))
cmd.Parameters.Add(New SQLParameter("@fecha", ffecha.text))
cmd.Parameters.Add(New SQLParameter("@noticia", fnoticia.text))
cmd.Parameters.Add(New SQLParameter("@foto", c))
MyConn.Open()
cmd.ExecuteNonQuery
Else
Dim MySQL as string = "Insert into noticias values (@titulo, @fecha, @noticia)"
Dim myConn As SqlConnection = New SqlConnection("cadinita_de conexion_a_tu_servidor")
Dim Cmd as New SQLCommand(MySQL, MyConn)
cmd.Parameters.Add(New SQLParameter("@titulo", ftitlo.text))
cmd.Parameters.Add(New SQLParameter("@fecha", ffecha.text))
cmd.Parameters.Add(New SQLParameter("@noticia", fnoticia.text))
'aquí nos hemos ventilao el parametro, y tampoco lo utilizamos en el insert
MyConn.Open()
cmd.ExecuteNonQuery
End if

Evidentemente se puede dejar más fino, pero esto te tiene que funcionar. A veces lo más cutre y lo más sencillo es la mejor solución (eso sí: No podré llevar nunca los proyectos a un concurso de programación, jejeje...pero mientras siga cobrando a final de mes...)

Un saludo. Espero que te hayamos servido de ayuda.