Comunque per mia "cultura" mi sono fatto un esperimento:
il risultato è che:
- Il limite dei caratteri per una stringa scritta su riga unica è di 1014
- il limite dei caratteri per una stringa scritta su righe multiple è di oltre 91000
NB: Access2013
codice:Private Sub cmd0_Click() ' cmd0 è un pulsante di comando su una maschera Dim SrGi As String SrGi = "" SrGi = SrGi & "12345678901234567890123456789012345678901234567890" SrGi = SrGi & "12345678901234567890123456789012345678901234567890" ' eccetera fino a 91000 caratteri è andata bene Dim SrSb As String SrSb = "2222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111" ' questi sono 1014 caratteri di piu non ne posso scrivere su riga unica Me.TeGi.Value = SrGi Me.TeSb.Value = SrSb ' Visualizzo le 2 stringhe su semplici caselle di testo Me.LeGi = Len(SrGi) Me.LeSb = Len(SrSb) ' Visualizzo la lunghezza delle 2 stringhe su caselle di testo Me.Testo6.SetFocus ' sposto il focus End Sub

Rispondi quotando