Newsgroup: it.comp.appl.access
Titolo: Funzione Mesi

Ciao a tutti,
vorrei creare una funzione che mi trasformi il mese da numero a testo,
esempio se io scrivo in un campo 1 mi deve dare Gennaio, se scrivo 2 mi deve
restituire Febbraio e cosi via.
Ho provato ad immettere nell'evento dopo aggiornamento una serie di if ed
onestamente mi funziona alla perfezione, ma siccome dovrei impostare questa
funzione in diversi campi, anziché ripetere ogni volta la clausola If,
preferirei creare una funzione o una procedura che io possa richiamare in
qualsiasi campo,
ma data la mia completa inesperienza con il codice VB se c'è qualcuno che
possa aiutarmi, lo ringrazio di vero cuore.
Tommy

 restituire Febbraio e cosi via.
Si chiamano controlli non campi nella maschere
format("1-" & tuocontrollo & "-2003","mmmm")
Antonio

 ha scritto nel messaggio
news:0mgjb.40811$e6.14...@twister2.libero.it...

A partire da Access 2000 c'è la funzione Monthname (v.help), già pronta, che fa
proprio quello che ti occorre.
In Access 97 puoi agevolmente scriverla tu:
Function MonthName(MiaData As Date) As String
    If Month(MiaData) = 1 Then MonthName = "Gennaio"
    If Month(MiaData) = 2 Then MonthName = "Febbraio"
    ......
    If Month(DataDaValutare) = 12 Then MonthName = "Dicembre"
End Function
Ciao
Galliano

 End Function
Ovviamente l'ultimo "Datadavalutare" č un errore dovuto al sonno :)
Galliano

 ha scritto nel messaggio
news:0mgjb.40811$e6.14...@twister2.libero.it...

Usa la funzione Choose (vedi help).
Insomma una cosa del genera:
MeseInLettere = Choose(MeseInNumero, "Gennaio", "Febbraio", _
"Marzo", "Aprile", "Maggio", "Giugno", "Luglio", "Agosto", "Settembre", _
"Ottobre", "Novembre", Dicembre")
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 > ma data la mia completa inesperienza con il codice VB se c'č qualcuno


 Format(num_mese,"mmmm")
Ovviamente tu non l'hai provato. Bisogna una data per questo.
Vedi il post del sig. B-ISO. Solo che IMO sia un po' meglio 
usare ISO per non ricevere Gennaio con un "mese" 13-31:
Format("2003-" & tuocontrollo & "-01","mmmm")
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:jYhjb.41199$e6.14...@twister2.libero.it...

Ringrazio  tutti coloro che mi hanno risposto, siete stati gentilissimi,
però  anche se questi esempi mi vanno bene io volevo costruirmi una funzione
e poi richiamarmela nei controlli in cui mi servivano, quindi la funzione
c'è, ora come faccio a richiamarmela nell'evento dopo aggiornamento di un
mio controllo?
Ciao tommy

 Format("2003-" & tuocontrollo & "-01","mmmm")
Non ho capito il tuo esempio Karl, puoi spiegarmi meglio per favore?
Antonio

 Non ho capito il tuo esempio Karl, puoi spiegarmi meglio per favore?
Hai scritto:
format("1-" & tuocontrollo & "-2003","mmmm")
cioè: g-m-aaaa
Se tuocontrollo ha un valore da 1 a 12 viene correttamente
il nome del mese. Ma con un valore sbagliato da 13 a 31
Access/VBA prova a fornire una data ragionevole e cambia
da se stesso g e m. --> 13-1-2003 a 31-1-2003 --> Gennaio
Col formato ISO (aaaa-mm-gg) invece di B-ISO questo non
succede. Non ho installato una versione italiana di Access
ma penso che avete lo stesso comportamento come in
tedescho e inglese.
--
cu


 ha scritto nel messaggio
news:bmmudu$nfthg$1...@ID-46617.news.uni-berlin.de...

Sì, hai ragione, fa come dici tu.
Ma io supponevo comunque, come dovrebbe essere, che lui faccia dei controlli
di validità del dato inserito prima di applicare qualunque formula
specifica!!!
Antonio

 Vedi il post del sig. B-ISO.
Chi è costui?
MAssimiliano

 Access-FAQ (tedesco): 
http://www.donkarl.com
Pure un formato data gli hanno dedicato!
Comincia a preoccuparmi, questo signor A. B-ISO.
Ma se usiamo quel formato gli dobbiamo pagare le royality?
Namor
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


In che formato?
Euro? PetroJolly?  :-)
Daniele

 ha scritto nel messaggio
news:hnMjb.9697$uv4....@news.edisontel.com...

BIMENOISO?  Mai sentito
Daniele


Credo che Karl con ironia facesse riferimento ad un certo Biso.
Solo non ho capito chi sia...
MAssimiliano

 ha scritto nel messaggio
news:CsNjb.5411$e5.1...@news1.tin.it...

Cazzarola....  c'ho pensato con un attimo di ritardo, sorry, potrebbe essere
quello che possiede FANTASTILIARDI di PETROJOLLY . amico di Emyr .....:-)
Daniele

 Ciao
[CUT]
Forse non hai ben compreso il quesito posto da Tom.
Perchè quello che hai scritto abbia senso occorre che num_mese sia un campo
di tipo Data/ora e contenga quindi una data; ma se, come ha detto Tom, è un
campo di tipo numerico e contiene un valore compreso da 1 a 12, la tua
soluzione non funziona.
