Devo fare un programma che mi permetta di risolvere equazioni di primo grado con il Do, quindi alla fine dare la possibilità di termianre o risolvere una nuova equazione....potete dirmi se cosi è giusto?.....
codice:Public Class Form1 Dim a, b, x, I As Integer Dim Scelta As String Private Sub BtnCarica_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCarica.Click I = 0 Do a = InputBox("inserisci coefficinete") b = InputBox("insierisci coefficente b") x = a / b Scelta = InputBox("Continuare? (Si/No)") Loop Until Scelta = "No" MsgBox(x) End Sub End Class

Rispondi quotando