Que código utilizo para ruc y que los dos primeros dígitos me reconozca siendo 10 persona natural y 20 persona jurídica
Quiero que me reconozca los dos primeros dígitos que son 10 y 20
1 Respuesta
Respuesta de Julián González Cabarcos
1
No dices si el RUC ya está escrito o es cuando lo vayas a escribir
Por si te puede dar una idea
Escribiendo. Si empiezo poniendo un 1
En el momento que escribo un 0
Por el contrario, si hubiera escrito un 20
En este caso, le digo
Private Sub Texto7_Change() Dim a a = Texto7.Text If a = 10 Then Texto9 = "Persona Física" ElseIf a = 20 Then Texto9 = "Persona Jurídica" End If End Sub
Por el contrario, si el RUC ya estuviera escrito tendrías que usar
If left([ruc],2)=10 then
