PRINT "Xa =" Dim Xa As Integer = CInt(textbox1.Text) PRINT "Xb =" Dim Xb As Integer = CInt(textbox2.Text) PRINT "Ya =" Dim Ya As Integer = CInt(textbox3.Text) PRINT "Yb =" Dim Yb As Integer = CInt(textbox4.Text) Dim distance distance=sqrt(pow((xb-xa),2)+ pow((yb-ya),2)) print "distance=" MsgBox(distance)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionLabel1.Caption = "totototo"
Label1.Caption =Format(Now,"dd/MM/yyyy")