Sempre VB6

[antonio89x]

Ho un problema: non so quali sono le istruzioni per far si che un risultato numerico se intero rimanga tale, se è decimale venga trasformato nella frazione corrispondente.

In parole povere non so "fare capire" al computer che quando il numero "è con la virgola" lo deve trasformare in frazione.

Grazie in anticipo.

[stellacometa]

Ragazzi sapete come si fa un diagramma a blocchi che, dopo aver inserito un numero, verifichi se è intero o decimale???

[Vincent2]

Puoi azzardare una cosa del genere utilizzando split

Dim Numero As Variant
Numero = Split("10,5", ",", -1, vbTextCompare)
if UBound(Numero) = 0 then
'Il numero non ha la virgola
else
'Il numero ha la virgola
End If

Volendo puoi perfezionare il codice per fare in modo che anche se ha la virgola, ma ha 00 come decimali, il numero è intero
Ciao!

[stellacometa]

Sapresti come fare il diagramma a blocchi???

[Vincent2]

Devi spiegarti meglio..fammi un esempio

[stellacometa]

In pratica nn riesco a fare l'algoritmo in diagramma a blocchi che riesca ad indicare se un numero inserito da tastiera è intero o decimale...

[Vincent2]

Ah bhe non ti so aiutare, io passo direttamente all'azione

[stellacometa]

Se qualcuno sa la soluzione si faccia vivo!!!

[lorven]

Non potendo disegnare il diagramma a blocchi, uso una pseudocodifica dal significato immediato e facilmente riconducibile ad un diagramma a blocchi.

In pseudocodifica:

LEGGI numero
SE [numero] = numero
ALLORA SCRIVI numero, "è intero"
ALTRIMENTI SCRIVI numero, "non è intero"
FINE SE

le parentesi quadre indicano la parte intera

[stellacometa]

quindi se carico una variabile numerica e la inserisco fra le parentesi indico sempre la parte intera??

[lorven]

Sì: anche in matematica, per indicare la parte intera, si usano le parentesi quadre.

[stellacometa]

Nei vari linguaggi sai se esiste una funzione che inserito un qualsiasi numero ti restituisce la parte intera??

[lorven]

Sì, la funzione "parte intera" esiste in gran parte dei linguaggi di programmazione.

[stellacometa]

Me ne elenchi una che potrei utilizzare in Vb?

[lorven]

In VB si può usare INT o FIX.
Un link, con sintassi ed esempi:
http://msdn.microsoft.com/library/en-us ... fctint.asp

[stellacometa]

Grazie grazie
Forse ho risolto il mio problema
Grazie tantissime. Se viene ve lo dirò!!!:-)

[stellacometa]

In un diagramma a blocchi come si inserisce la funzione fix???

[lorven]

Non è distinguibile in un diagramma a blocchi FIX da INT.
Dopo aver ricavato la parte intera con le parentesi quadre, per simulare la FIX puoi usare un blocco decisionale che verifichi se numero è negativo e, in caso affermativo, sommare 1 al risultato.

[stellacometa]

Ok grazie...
Mi viene perfettamente...Grazie 100000000000000!!!!!
Mi è bastata solo la funzione fix e ho risolto tutto!!!
Grazie

[stellacometa]

Ragazzi avrei una domanda....
Ma in Vb si possono inserire pulsanti con forme diverse dal classico rettangolo???

[TomSawyer1]

Sì, si possono inserire pulsanti di tutti i tipi possibili. Basta crearseli . Se non hai proprio bisogno di CommandButton, puoi crearli con le Shapes o altro. Altrimenti ti tocca scrivere centinaia di righe di codice. Se hai bisogno di questi pulsanti, vai su www.pscode.com/vb e cerca lì. Il miglior sito in assoluto.