Gobillot
Messages postés3140Date d'inscriptionvendredi 14 mai 2004StatutMembreDernière intervention11 mars 201934 24 sept. 2004 à 02:55
sauf que dans text1.text il y aura seulement que ligne 6
Private Sub Form_Load()
Dim i As Integer
Rem Text1.MultiLine = True
Text1 = vbNullString
For i = 1 To 6
Text1 = Text1 & "ligne " & i & vbCrLf
Next
End Sub