[RISOLTO] DataBox con valori stringa

[Aldo]

Ciao a tutti, sono nuovo del forum e la prima cosa che desidero fare è salutarvi e ringraziarvi in anticipo  

Vorrei proporvi un problemino:
usando una DataBox (o altro) è possibile mantenere il pulsante per la scelta della data presente nella DataBox e far scrivere il valore del giorno scelto in un altro formato (tipo: 21 novembre 2013)?  

Grazie a tutti.

[kicco]

 
BENVENUTO!

[kicco]

Perdona, ma non ho capito bene.
Tu vuoi, impiegando una DateBox, selezionare tramite il pulsantino della DateBox e il successivo pannello di scelta , una data, oppure la data odierna, ma poi vorresti che il formato visibile sempre nella Date Box fosse nel formato giorno, mese, anno?

Corretto?
 

PS: prova a guardare l'help di "Date"!
      e anche di "Funzioni temporali"

[Aldo]

Perdona, ma non ho capito bene.
Tu vuoi, impiegando una DateBox, selezionare tramite il pulsantino della DateBox e il successivo pannello di scelta , una data, oppure la data odierna, ma poi vorresti che il formato visibile sempre nella Date Box fosse nel formato giorno, mese, anno?

Corretto?
 

Corretto, ora guardo e provo a aggiornare.
Grazie

[Aldo]

BENVENUTO!

Grazie tante kicco

[vuott]

.... nella DataBox e far scrivere il valore del giorno scelto in un altro formato (tipo: 21 novembre 2013)? 

Ho l'impressione che non si possa fare.....

[kicco]

Usando invece DateChooser non è possibile dopo aver selzionato la data, estrarre il mese (month) e riscrivere la stringa con giorno, mese, anno inserendo al posto del numero mese una stringa corrispondente al mese (novembre)?

 

[Top Fuel]

Il mese è ritornato come intero, quindi basterebbe usare il valore per scorrere un array con i nomi dei mesi e metterli in una stringa tra il giorno e l'anno.
Non mi sembra particolarmente difficile usando Mid$.

[vuott]

Nel forum francese ho trovato una soluzione che però faceva uso della funzione Format() e di una TextBox. Ho modificato leggermente quel codice per ottenere l'effetto "nome-mese":

Codice: gambas [Seleziona]

   Dim Mytemp As String

  MyTemp = Format$(DateBox1.Value, "dd mmmm yyyy")
  
  TextBox1.Text = MyTemp

[vuott]

Usando invece DateChooser..... ?

Con DateChooser è analogo:

Codice: gambas [Seleziona]

Public Sub DateChooser1_Change()

  Dim MyTemp As String

   MyTemp = Format$(DateChooser1.Value, "dd mmmm yyyy")

   TextBox1.Text = MyTemp

End

[Aldo]

Grazie a tutti (specialmente vuott e kicco).
Per rendere automatica la soluzione mi è venuta un'idea che proverò a inserire in un componente nuovo di cui poi vi farò sapere.
Intanto segno come risolto il post.

Grazie ancora e a presto.