Hola estoy aprendiedo y haciendo un programa en VB. Como se puede solucionar este error?
La linea del erro esta en negrita.
Gracias.

Adjunto codigo:

Private Sub cambiar_Click()
Dim nueva, ide As String
Dim er As Long
nueva = nuevo.Text
nuevo.Text = "              "
er = DLLmodificar_id(nueva_id)
If er = 0 Then
pintar_matriz
End If

End Sub


Modulo:

Public Declare Function DLLmodificar_id _
Lib "tren.dll" _
(ByVal nueva_id As String, ByVal id As String) _
As Long