Ciao ragazzi stò facendo un programmino che mi calcola l'interesse composto...Mi spiego meglio: dato un capitale iniziale, un interesse annuo fisso e un tempo (t) in cui esso matura restituisce il valore del capitale finale aumentato di ogni anno dell'interesse di quell'anno..
Tramite la formula:
Capitale iniziale * (1+ tasso interesse)^t
Ad esempio metto 100 euro in banca con un tasso del 6% annuo dopo sei anni avrò 179,08euro...
Nel form ho 5 text box (la uno indica il capitale iniziale, la due l'interesse, la tre gli anni, la quattro visualizza il risultato e la cinque converte automaticamente l'interesse in percentuale > quindi se metto nella due il numero 6 in automatico nella 5 viene fuori 0.06)
Due command button (reset e calcola)
Il codice integrale è questo
Tuttavia la text4 come risultato mi da il valore della 1...se provo a togliere la storia della text5 che si converte dalla due funziona...codice:Private Sub Text2_Change() Text5.Text = Val(Text2.Text) / 100 End Sub Private Sub Command1_Click() Text4.Text = Val(Text1.Text) * (1 + Val(Text5.Text)) ^ Val(Text3.Text) End Sub Private Sub Command2_Click() Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Text5.Text = "" End Sub
Cioè se metto
Come mai non recepisce il valore della text5???codice:Text4.Text = Val(Text1.Text) * (1 + Val(Text2.Text)) ^ Val(Text3.Text)
Help..
P.S: poi ho una combolist con due opzioni...come faccio a fare apparire due form diversi solo schiacciando su una delle 2 opzioni?? In alternativa con un bottone da cliccare dopo la scelta..?
Grrrrazie

 
			
			 
					
					
					
						 Rispondi quotando
  Rispondi quotando