Newsgroup: it.comp.lang.visual-basic
Titolo: File di registro.

Ciao a tutti.
Ragazzi vorrei ke il mio programma fosse eseguito automaticamente all'avvio
di windows
Kom'è la procedura da inserire nel programma per la registrazione nel file
di registro??

 wrote in message news:L7c39.35148

--
Try this:
Private Function CItalian(ByVal Msg As String) As String
    ' Aim:    let the message can be read from italian people
    ' Usage:  strItMessage = CItalian(KEncodedMessage)
    ' Author: Zanna, 04/07/2002 (dd/mm/yyyy)
    Msg = Replace(Msg, "kke", "cche")
    Msg = Replace(Msg, "kki", "cchi")
    Msg = Replace(Msg, "kko", "cco")
    Msg = Replace(Msg, "kka", "cca")
    Msg = Replace(Msg, "kku", "ccu")
    Msg = Replace(Msg, "ke", "che")
    Msg = Replace(Msg, "ki", "chi")
    Msg = Replace(Msg, "ko", "co")
    Msg = Replace(Msg, "ka", "ca")
    Msg = Replace(Msg, "ku", "qu")
    Msg = Replace(Msg, " nn", " non")
    Msg = Replace(Msg, " squola", " scuola")
    Msg = Replace(Msg, " quoco", " cuoco")
    Msg = Replace(Msg, " soccuadro", " soqquadro")
    Msg = Replace(Msg, "accua", "acqua")
    CItalian = Msg & vbCrLf & vbCrLf & _
               "[ Eventuali errori grammaticali (come 'il file di QUI
parlo')" & _
               " o calligrafici (come 'accuitrino') sono da imputare
all'autore ]" & _
               vbCrLf & vbCrLf & _
               "-- Aiuta l'autore a migliorare questa funzione! --"
End Function

 ha scritto
Per una più completa "prevenzione", aggiungerei:
Msg = Replace(Msg, "kè", "chè")
Msg = Replace(Msg, " ai ", " hai ")        'Di difficoltosa applicabilità
Msg = Replace(Msg, " ò ", " ho ")
Msg = Replace(Msg, " stà ", " sta ")
Msg = Replace(Msg, " sta' ", " 'sta ")    'queSTA alla "romana"
Msg = Replace(Msg, " sto' ", " 'sto ")    'queSTO alla "romana"
Msg = Replace(Msg, " và ", " va ")
Msg = Replace(Msg, " aqua", " acqua")
Msg = Replace(Msg, "qual'è", "qual è")
PS: Qual è il significato di <g>?

 PS: Qual è il significato di <g>?
grin, sogghigno.

 anke virgole e spazii.
L'intento è (come dice il commento) convertire da KEncoded a "uman
readable".
Non è nello scopo della funzione gestire lingue locali e/o grammatica :)
Ciao

 es.: "ma va' a ffa'..."
Già!

 loop
Tnx, ma none, la Replace pare funzioni da sinistra a destra (o, se gli pare,
da destra a sinistra), ma esegue una sola passata: Quanto già tradotto non è
più oggetto di sostituzione (fortunatamente).

 risparmiando tempo e spazio ....
Per q(k)uesto sc(k)opo era preferibile ch(k)e :
Faresti buona cosa se quando rispondi a un messaggio
rispondessi "SOTTO" al messaggio originale eliminando dal
originale tutto quello che ti sembra superfluo per una minima
comprensione dello stesso.
Se vuoi approfondire l'argomento :
http://groups.yahoo.com/group/x-men-italy/files/LO/quoting.txt
http://digilander.iol.it/ifst/html/Quoting.html
http://www.freewebz.com/iosononiubbo/
http://www.inferentia.it/netiquette
Ti spiego la faccenda ....
Molti ancora usano una connessione analogica e pagano
la bolletta alla Telecom....
Ogni kb in piu' che devono scaricare costa loro qualcosa
in tempo e danaro...
I tuoi (e di altri) reply contengono 1/2 kb di roba inutile che sarebbe
facilmente eliminabile alla sorgente ( quando rispondi).
Sperando che tu riesca a comprendere il  ragionamento e adeguarti
per il bene di "tutti ".
--
Fosco

 voleva essere solo un modo di scrivere in maniera veloce risparmiando
tempo
Quindi spostiamo il "problema" tempo su chi legge: "io faccio prima, chi
legge (che mi deve aiutare) che si arrangi e perda pure 2 minuti per capire
ogni frase"...
Neanche questo mi sembra un buon approccio al NG.
Ciao