Mi programita no funciona bien!!! :-(

[belzebux]

Holas aun sigo con el problema y para no abrir un foro nuevo agradeceria cualquier ayuda. localice mi problema cuando se ejecuta el sgte boton :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
If txtFvenci.Text <> "//" And txtasunto.Text <> "" Then
Dim hora As String = ""
hora = Date.Now.ToString.Remove(19)
If txtcodVarios.Text = 0 Then
guardar(hora, txtFvenci.Text & " " & txtHvenci.Text, txtasunto.Text, 0)
Else
modificar(hora, txtFvenci.Text & " " & txtHvenci.Text, txtasunto.Text, txtcodVarios.Text)
End If
Else
MsgBox("Debe llenar la fecha de vencimiento y el asunto", MsgBoxStyle.Information, "")
End If
dgdVarios.Rows.Clear()
llenar_dgdvarios()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub

el codigo esta tal cual, el error de excepcion q sale es :

>>startIndex no puede ser menor que la longitud de la cadena
>>nombre de parametro : startIndex

repito que en desarrollo todo corre muy bien, el problema se da cuando instalo el programita en otras pc's. Este problm ya me tiene medio loco y no le encuentro un motivo. agrageceria cualquier ayuda xfavor, ya googlee y no hay naa q ma haya ayudado. gracias dsd ya