RE:Validar datos numericos y string
Primero colocas en el form el objeto Error Provider
despues colocas este codigo dependiendo del nombre del text
Private Sub txtnombremat_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtnombremat.Validating
If txtnombremat.Text <> Nothing Then
Me.ErrorProvider1.SetError(Me.txtnombremat, Nothing)
'verifico el valor del text para la validacion -hay que poner un objeto validation en el userform
If Len(txtnombremat.Text) > 30 Then
'si es diferente a nada y el dato no es numerico que advierta
Me.ErrorProvider1.SetError(Me.txtnombremat, "El nombre del material no puede tener mas de 30 Caracteres")
MsgBox("El nombre del material no puede tener mas de 30 Caracteres", MsgBoxStyle.Critical, "BODEGA BLINDECA")
Me.txtnombremat.Focus()
Else
Me.ErrorProvider1.SetError(Me.txtnombremat, Nothing)
End If
End If
End Sub