pausezero
Messages postés15Date d'inscriptionsamedi 21 juin 2003StatutMembreDernière intervention19 avril 2006
-
1 août 2005 à 12:57
pausezero
Messages postés15Date d'inscriptionsamedi 21 juin 2003StatutMembreDernière intervention19 avril 2006
-
1 août 2005 à 23:55
VB6 > Salut. Soit un FileListBox et un RichTextBox. Dans mon FileListBox, quand je sélectionne un fichier (fichier texte) qui contient plus de 10 lignes, je voudrais que seules les 10 premieres lignes (pas caracteres) soit affichées dans le RichTextbox (les lignes suivantes étant supprimées mais pas cachées). Merci de m'aider. (suis novice, un bout de code m'arrangerais)
cs_hassen
Messages postés338Date d'inscriptionmardi 28 janvier 2003StatutMembreDernière intervention 4 novembre 2008 1 août 2005 à 17:43
Const NombreLigne = 3
Private Sub RichTextBox1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
NombreEntrer = Len(RichTextBox1.Text) - Len(Replace(RichTextBox1.Text, vbCr, ""))
If NombreEntrer >= NombreLigne Then
KeyAscii = 0
End If
End If
End Sub
mais ca ne resoud pas le probleme du copier coller
cad que si tu copie du text et puis tu le colle dans ton RichTextBox il n'y aucun controle
pausezero
Messages postés15Date d'inscriptionsamedi 21 juin 2003StatutMembreDernière intervention19 avril 2006 1 août 2005 à 23:55
Ta solution limite l'écriture au nombre de lignes préfini mais ne bloque l'ouverture de fichiers au nombre de lignes préfini. Merci qd meme Hassen. Autre solution ?