Ti parlo da VB6 ma forse andrà bene per VB.net. Il codice è:
codice:Private Sub Command1_Click() Dim Pippo as String Dim Pluto as String If Len(Pippo) < 9 Then Nuovastr = Pippo + Space(9 - Len(Pippo)) + Pluto Text1 = Nuovastr End If End Sub
Ti parlo da VB6 ma forse andrà bene per VB.net. Il codice è:
codice:Private Sub Command1_Click() Dim Pippo as String Dim Pluto as String If Len(Pippo) < 9 Then Nuovastr = Pippo + Space(9 - Len(Pippo)) + Pluto Text1 = Nuovastr End If End Sub
Giorgio
L'esperienza è il tipo di insegnante più difficile. Prima ti fa l'esame, e poi ti spiega la lezione. (Oscar Wilde)