Esercizi VISUAL BASIC

[matpez]

molto palesemente: Date()

Per formattarla basta che fai Format$(Date(), "dd/mm/aa")

[leadergl]

cioè nn ho capito, allora io ho una textbox dove scrivere la data nel format GG/MM/AA

mettiamo che io ci scriva dentro 19/12/75

per richiamarmi uno di questi 3 elementi che devo fare?
data(gg) e lui mi restituisce il giorno??

[matpez]

Originariamente inviato da leadergl
cioè nn ho capito, allora io ho una textbox dove scrivere la data nel format GG/MM/AA

mettiamo che io ci scriva dentro 19/12/75

per richiamarmi uno di questi 3 elementi che devo fare?
data(gg) e lui mi restituisce il giorno??

Ops, forse ho capito male


No per fare una cosa del genere basta che usi le funzioni:

Day("13/09/82")=13
Month("13/09/82")=9
Year("13/09/82")=1982

[leadergl]

...ma la tabella dei comuni è su un file....ed inoltre non ci sono tutti!!!!

come faccio a procedere??

1 - non sai dove reperire una tabella COMPLETA con i codici di tutti i comuni??

2 - ...come la implemeto ?!?!

....mi sa che mo viene il difficile....

[matpez]

Ora mi sa che devi usare le query per il linguaggio SQL

http://www.ublteam.com/Slayer/Comuni.rar

Qui trovi il database completo!

Ora...sai qlc sui database?

[leadergl]

ah si certo so TUTTO...........no mio dio.......cmq sono pronto ad imparare tutto ciò che serve!!!!

dimmi

[leadergl]

con quale comando si trova il resto di una divisione??

[matpez]

Originariamente inviato da leadergl
con quale comando si trova il resto di una divisione??

MOD

[matpez]

Originariamente inviato da leadergl
ah si certo so TUTTO...........no mio dio.......cmq sono pronto ad imparare tutto ciò che serve!!!!

dimmi

Secondo me è prematuro arriva già ai database, sarebbe come correre a 1 mese di vita!!

Per adesso fissa il codice della tua città poi più avanti si vedrà!!

[leadergl]

se inserisco il comando MOD mi da errore, mi dice expected expression!!!

[matpez]

Originariamente inviato da leadergl
se inserisco il comando MOD mi da errore, mi dice expected expression!!!

Per forza, MOD è l'operatore ma devi metterlo come un qlc operatore matematico, 6 mod 2 .... risultato = 0

[leadergl]

per ora ti posto l'eseguibile, dimmi se ti piace.....

il codice completo te lo mando quando sarà tutto terminato.....perchè come comune per il momento ho messo solo il mio...

dammi un parere

[matpez]

Mancano tutti i controlli...

C'è un errore sull'algoritmo del nome

C'è un errore se il nome o il cognome è minore di 3 caratteri... il sito che ti ho passato (che sinceramente nn ho letto) contempla questo problema???

Scanso di equivoci ti passo la mia relazione, li hai tutto ben scritto!

A presto.

PS: La relazione è fatta su questo mio sito, usalo pure per verificare la correttezza del tuo programma!! http://www.ublteam.com/cf/daticf.asp

[leadergl]

si per i controlli lo so ancora li devo implementare.....

per quel che riguarda gli altri errori.....nn è dipeso da me, quel sito era un po contorto nel far capire certe cose, ma col file di testo che m'hai mandato è tutta un'altra storia!!!

Correggo, aggiungo controllo errori e poi te lo riposto!

Senti ma per il fatto dei comuni, non si può implementare in un file di testo?? oppure se è più semplice da gestire dell'access magari in excel....che ne dici???

[matpez]

No la migliore delle cose è i database, perchè possono essere interrogati e ricevere i dati in velocità pazzesche rispetto un qlc file!

[leadergl]

....beh allora per andare avanti mi serve una mano sui database......help....dai mi spieghi solo quello che basta per fare il programma!!

Magari mi fai un bel file col word, me lo posti, io leggo tutto, capisco ed imparo e poi completo il programma del codice fiscale........dai non puoi lasciarmi così ad un passo dalla fine!!!

[matpez]

Allora ti posti quest'esempio, tu provalo e dimmi se nn ti è chiaro qlc, per farlo funzionare devi avare installato almeno l'MDAC 2.7

Qeusto programma utilizza un database, ti dico solo cenni basi di linguaggio SQL, a te cmq per il tuo programma interessa solo la lettura, per l'inserimento e l'aggionramento dei dati nn te ne frega nulla!

Allora:

SELECT <campo1, campo2>: serve per selezionare i campi (le colonne di una tabella)
FROM <tabella>: meti il nome della tabella che ti interessa
WHERE <condizione>: è la condizione di ricerca, per esempio una query per te sarebbe una come questa:

SELECT CodicePaese
FROM TabComuni
WHERE Comune='BIELLA' AND Provincia='BI'

Il risultato sarà magicamente: A859

[leadergl]

sto provando un'altra strada.....credo di esserci vicino, ma mi manca qualcosa....ti posto l'immagine di un esempio fatto da me......poi dimmi tutto, cosa dovrei aggiungere o modificare


Private Sub btnCerca_Click()
Dim ripeti, trovato As Boolean
Dim dacercare As String
dacercare = cerca.Text
dbArchivio.Recordset.MoveFirst

Do
trovato = True
ripeti = Not (dbArchivio.EOFAction Or trovato)
If ripeti Then
dbArchivio.Recordset.MoveNext
End If
Loop While ripeti

If Not trovato Then
MsgBox "Stringa non trovata"
Else
'dovrei associare ad una variabile il contenuto del record
'dove ho appena trovato corrispondenza
End If
End Sub


nel form ci sta una textbox=cerca.text
ed il pulsante cerca

[matpez]

Tu sei pazzo....

Ti ho mandato l'esempio per imparare qlc di nuovo , non per utilizzare una tabella come se fosse un vettore, ma sai quando tempo ci vuole per sflogliare 6000 comuni

Dai cerca di fare come ti ho detto io utilizzando le query

[matpez]

Ma dove sei finito?