Newsgroup: it.comp.appl.access
Titolo: Maiuscole minuscole e viceversa

E' possibile invertire le maiuscole con le minuscole o viceversa nei record
di una tabella?
E' inoltre possibile poter convertire una scritta tutto in maiuscolo con la
sola iniziale maiuscola?
Saluti Simone

 ha scritto nel messaggio
news:c36qau$fm9$1...@fata.cs.interbusiness.it...

- query di aggiornamento
- vedi funzioni Ucase o Lcase ... se si tratta solo di visualizzare i dati
in maiusc o minusc non aggiornare la tabella originaria

 ha scritto nel messaggio
news:c36qau$fm9$1...@fata.cs.interbusiness.it...

controlla nell'help la funzione StrConv per l'iniale o tutto maiuscole, nno ricordo se c'è
l'inversione..
ciao

 ha scritto nel messaggio
news:c36qau$fm9$1...@fata.cs.interbusiness.it...

1)Devi crearti una Funzione che cicla tutta la stringa e ne INVERTA l'ASCII
non è complessa tieni conto che tra i 2 set di caratteri c'è solo da
effettuare
una Somma per portare il carattere MAIUSCOLO e una Sottrazione per portare
Minuscolo.
Il valore da sommare è COSTANTE e non è altro che la distanza in ASCII
dalla a(minuscola) alla A(Maiuscola)
Se devo essere sincero questo non capisco a cosa ti serva...........!!!
2)StrConv(tuaStringa,vbProperCase)
Ciao.
@Alex.

 ha scritto nel messaggio
news:c37jes$mai$1...@lacerta.tiscalinet.it...

Ciao Alex,
questa funzione sarebbe utile anche a me, ma non riesco a farla funzionare.
ho letto la guida ma non ho capito molto. come si usa?


Quale la 1° o la 2°....?
@Alex.

 2)StrConv(tuaStringa,vbProperCase)
grazie.

"knives" <x@x.x> ha scritto nel messaggio news:JDY5c.72075$O31.3...@news4.tin.it...

semplicemente devi susarla cosě:
Var1 as string
VarConv as string
VarConv  = "come mi chiamo"
Var1 = StrConv(VarConv, vbProperCase) ' la mia Var1 diventa Come Mi Chiamo
Var1 = StrConv(VarConv, vbUpperCase) ' la mia Var1 diventa COME MI CHIAMO
Var1 = StrConv(VarConv, vbLowerCase) ' la mia Var1 diventa come mi chiamo
in poche parole converte la stringa che metti come primo parametro invertendo le maiuscole con
minuscole e viceversa a seconda del secondo parametro.
spero di aver chiarito un po' le idee


Cakkio, questa č dura da capire!
allora...
in una sub scrivo il tuo codice tipo:
private sub pippo() 'giusto?
Var1 as string
VarConv as string
VarConv  = "come mi chiamo" 'posso usare qui il nome del mio campo vero?
Var1 = StrConv(VarConv, vbProperCase) ' la mia Var1 diventa Come Mi Chiamo
Var1 = StrConv(VarConv, vbUpperCase) ' la mia Var1 diventa COME MI CHIAMO
Var1 = StrConv(VarConv, vbLowerCase) ' la mia Var1 diventa come mi chiamo
end sub
cmq eseguo il codice e mi dice funzione o sub non definita. che significa?
lo so... ora penserete "ma questo ha capito su che NG si trova???"
effettivamente qualche volta ho dei dubbi... tempo fa avevo visto un NG di
ricette.... :)

[CUT]
la sub scrivila cosě:
public sub pippo()
dim  Var1 as string
dim VarConv as string
 VarConv  = "come mi chiamo" 'se usi il nome del tuo campo diventa VarConv = Forms!nomeCampo o
rst!nomecampo se usi un recordset
 Var1 = StrConv(VarConv, vbProperCase) ' la mia Var1 diventa Come Mi Chiamo
scegline solo una quella che ti serve, altrimenti valo l'ultima
' Var1 = StrConv(VarConv, vbUpperCase) ' la mia Var1 diventa COME MI CHIAMO
' Var1 = StrConv(VarConv, vbLowerCase) ' la mia Var1 diventa come mi chiamo
'poi avrai un'istruzione che modifica il campo
Forms!nomecampo = var1
end sub
prova cosě :-)
se ti da a ancora errore inserisci i punti di interruzione del codice e dicci in che riga si blocca
il codice e che errore da che vediamo il perchč

Ciao,
Ho riprovato e adesso funziona, grazie.
l'ho provata su una private sub nel modulo del campo che volevo convertire,
ma ho notato che se la eseguo converte il record corrente, e lo fa in modo
definitivo ma gli altri record restano invariati.
Ma se voglio cambiare tutti record?
E se voglio invece che la modifica sia solo in visualizzazione senza
convertire le stringhe?
C'è molta differenza rispetto al metodo che ho usato?
Ciao

"knives" <x@x.x> ha scritto nel messaggio news:ITn6c.80726$O31.3...@news4.tin.it...

se vuoi solo in visualizzazione basta che nella maschera aggiungi un campo non associato che per
esempio chiami Pippo e nell'evento "su corrente" lanci la sub di prima solo che l'ultima istruzione
diventa:
forms!miamaschera!pippo = Var1
oppure trasformi la sub in una function (molto più utile):
public function trasforma(testo as string, tipotrasf as integer) as string
dim  Var1 as string
dim VarConv as string
 VarConv  = testo
select case tipotrasf
case 1
     Var1 = StrConv(VarConv, vbProperCase) ' la mia Var1 diventa Come Mi Chiamo
case 2
     Var1 = StrConv(VarConv, vbUpperCase) ' la mia Var1 diventa COME MI CHIAMO
case else
 Var1 = StrConv(VarConv, vbLowerCase) ' la mia Var1 diventa come mi chiamo
end select
trasforma = var1
end function
poi la function la usi così:
me.pippo = trasforma (me.campodatrasformare, 1)
spero di essere stato chiaro nel proporti quest'ultima funzione più utile e flessibile
ciao