Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - flexgrid e calendario
Forum - Visual Basic 6 - flexgrid e calendario

Avatar
moet (Normal User)
Pro


Messaggi: 185
Iscritto: 13/11/2007

Segnala al moderatore
Postato alle 23:37
Giovedì, 19/06/2008
Ciao a tutti!

Avrei bisogno di inserire nella mia flexgrid, nella colonna di destra per internderci colonna 0 riga 1,2,3,4,... ecc

il calendario di set08, ott08,nov08,dic08,gen09,... , ago09.

Avete qualche idea ?!?!? grazie!!!:D

PM Quote
Avatar
antometal (Member)
Guru


Messaggi: 691
Iscritto: 12/09/2007

Segnala al moderatore
Postato alle 0:05
Venerdì, 20/06/2008
Testo quotato

Postato originariamente da moet:

il calendario di set08, ott08,nov08,dic08,gen09,... , ago09.




ma tutti i giorni dei mesi???

cmq dovresti usare il componente calendar

PM Quote
Avatar
moet (Normal User)
Pro


Messaggi: 185
Iscritto: 13/11/2007

Segnala al moderatore
Postato alle 21:04
Venerdì, 20/06/2008
Si, posso anche stampare tutto il calendario 2009.

Ma come? ho un po lavorato al componente calendar ma non riesco a stampare il calendario completo.

8-|

PM Quote
Avatar
antometal (Member)
Guru


Messaggi: 691
Iscritto: 12/09/2007

Segnala al moderatore
Postato alle 0:11
Sabato, 21/06/2008
ok forse ho capito
ho fatto un esempio con una listbox

Codice sorgente - presumibilmente VB.NET

  1. Private Sub Command1_Click()
  2.     For i = 0 To 30
  3.         List1.AddItem Calendar1.Day & "/" & Calendar1.Month
  4.         Calendar1.NextDay
  5.     Next i
  6. End Sub



fammi sapere

PM Quote
Avatar
moet (Normal User)
Pro


Messaggi: 185
Iscritto: 13/11/2007

Segnala al moderatore
Postato alle 19:46
Mercoledì, 25/06/2008
ho risolto cosi !


Codice sorgente - presumibilmente VB.NET

  1. With MSFlexGrid1
  2.     Dim cel As Integer
  3.     For cel = 1 To 300
  4.  
  5.  
  6.     MSFlexGrid1.col = 0
  7.     MSFlexGrid1.row = cel
  8.  
  9.     MSFlexGrid1.Text = Calendar1.Day & "/" & Calendar1.Month & "/" & Calendar1.Year
  10.     Calendar1.NextDay
  11.     Next cel
  12.  
  13.     End With


PM Quote