Test Foro de elhacker.net SMF 2.1

Hola a todos

ANdo en un projecto EN Lo Cual Solo quiero que Entre una cierta cantidad de letras

Ejemplo:

que en el texbox   Solo entren 100 letras


Pero Tambien QUisiera que  En el Textbox  Se PUeda Escribir Normal Hasta llegar

a 100 letras , Pero seguir escribiendo , Mientras que sigas escribiendo mas letras,

en el comienzo Se Van DIsminuyendo... ,  Pero En Si El TextBos Solo Puede

Cotener 100 letras o caracteres


Espero Aver  Explixado Bien =)

Gracias De Antemano

BUeno Encontre Este Codigo

text1.MaxLength=100

que limita una cierta cantidad de caracteres

pero COmo aria para hacer lo que Explique

Lo que Indica la IMG

no te entiendo te podrias explicar mejor  :rolleyes:
respecto al comando k encontraste llevas razon; por ejemplo:

Private Sub form_load()
Text1.Text = ""
Text1.MaxLength = 100
End Sub

pero nose a k te refieres kn lo de+
EDITO: creo k se lo k kieres conseguir, te aconsejo k pongs un ScrollBars vertical
salu2

Se refiere a que tu tienes un textbox asi:

Hay 100 caracteres:

111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111xxxxxxxxxx

El se refiere que cuando pulsas otros caracteres, por ejemplo: 4e7jfg


4e7jfg111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111xxxx

Se borren los del final que no caben y se metan esos en el principio.

No se si he hecho bien los esquemas pero espero que capteis la idea.

sigo sin entendelo lo k kereis conseguir  :huh:

Cita de: Dudasamonton en 11 Julio 2009, 01:36 AM
Se refiere a que tu tienes un textbox asi:

Hay 100 caracteres:

111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111xxxxxxxxxx

El se refiere que cuando pulsas otros caracteres, por ejemplo: 4e7jfg


4e7jfg111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111xxxx

Se borren los del final que no caben y se metan esos en el principio.

No se si he hecho bien los esquemas pero espero que capteis la idea.

Exacto a eso ME Refiero

Podrias Decirme Como Hacerlo

o alguna guia ? =)

Cita de: NsTeam en 11 Julio 2009, 01:14 AM
BUeno Encontre Este Codigo

text1.MaxLength=100

que limita una cierta cantidad de caracteres

pero COmo aria para hacer lo que Explique

Lo que Indica la IMG

Hola, claro que se puede, mira este ejemplo

Private Sub Form_Load()
   Text1.MaxLength = 10
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
   If Len(Text1.Text) = Text1.MaxLength Then
       Text1.Text = Mid$(Text1.Text, 2)
       Text1.SelStart = Len(Text1.Text)
   End If
End Sub

El límite de la programación siempre viene dado por la imaginación que tengas..

saludos!!

mod: lo entendi al reves jajaja para eso solo invierte la extracción, chao ..

Cita de: cΔssiΔnі en 11 Julio 2009, 01:44 AM

Cita de: NsTeam en 11 Julio 2009, 01:14 AM
BUeno Encontre Este Codigo

text1.MaxLength=100

que limita una cierta cantidad de caracteres

pero COmo aria para hacer lo que Explique

Lo que Indica la IMG

Hola, claro que se puede, mira este ejemplo

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
   Text1.MaxLength = 10
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
   If Len(Text1.Text) = Text1.MaxLength Then
       Text1.Text = Mid$(Text1.Text, 2)
       Text1.SelStart = Len(Text1.Text)
   End If
End Sub

El límite de la programación siempre viene dado por la imaginación que tengas..

saludos!!

mod: lo entendi al reves jajaja para eso solo invierte la extracción, chao ..

Sip =)

Gracias por EL Code y por la AYuda

salu2   ;)