19/05/07 16:54
bruceex_38
Salve sono nuovo del forum e della programmazione in vb quindi chiedo aiuto a voi che sicuramente siete molto piu esperti di me.
Allora ecco il problema:
Devo sviluppare un programmino per un'internet point che mi deve calcolare l'ora e i minuti di connessione e darmi il prezzo che il cliente deve pagare, io ho fatto una prima parte di programma cosi':
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim A As Double = TextBox1.Text
Dim B As Double = TextBox2.Text
TextBox3.Text = (B - A)
End Sub
e devo dire che bene o male sono riuscito ad ottenere cio che volevo praticamente mi calcola l'ora e i minuti della connessione,quello in cui non riesco e invece questo: Una volta ottenuti l'ora e i minuti della connessione devo calcolare il prezzo,ho fatto in questo modo:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim R As Double = TextBox3.Text
TextBox4.Text = (R * 2.0)
End Sub
E piu o meno va bene il problema pero' e che se mi deve calcolare un'ora allora ok ma se devo calcolare anche i minuti qui nasce il problema perchè se per esempio la connessione è stata di un'ora e 15 minuti e il prezzo dell'ora e di 2 € mi spunta come totale € 2,30 mentre deve essere di € 2,50 potete aiutarmi a risolvere il problema?
grazie anticipatamente a chiunque vorrà aiutarmi.
Allora ecco il problema:
Devo sviluppare un programmino per un'internet point che mi deve calcolare l'ora e i minuti di connessione e darmi il prezzo che il cliente deve pagare, io ho fatto una prima parte di programma cosi':
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim A As Double = TextBox1.Text
Dim B As Double = TextBox2.Text
TextBox3.Text = (B - A)
End Sub
e devo dire che bene o male sono riuscito ad ottenere cio che volevo praticamente mi calcola l'ora e i minuti della connessione,quello in cui non riesco e invece questo: Una volta ottenuti l'ora e i minuti della connessione devo calcolare il prezzo,ho fatto in questo modo:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim R As Double = TextBox3.Text
TextBox4.Text = (R * 2.0)
End Sub
E piu o meno va bene il problema pero' e che se mi deve calcolare un'ora allora ok ma se devo calcolare anche i minuti qui nasce il problema perchè se per esempio la connessione è stata di un'ora e 15 minuti e il prezzo dell'ora e di 2 € mi spunta come totale € 2,30 mentre deve essere di € 2,50 potete aiutarmi a risolvere il problema?
grazie anticipatamente a chiunque vorrà aiutarmi.
aaa
