bonjour a tous.
j'ai une fonction du genre
j'aimerais lire dans 1 fichier texte les arguments ligne par ligne .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Function point_fixe(ByVal x0 As Double, ByVal epsilon As Double, ByVal N As Integer) Dim r As Double Dim compteur As Integer Do r = ((Math.Abs(g(x0) - x0))) / (Math.Abs(g(x0))) x0 = g(x0) compteur = compteur + 1 If compteur > N Then Return Nothing Else Return x0 End If Loop Until r < epsilon End Function
exemple: sur la premiere ligne je lis mon x0
sur la deuxieme ligne je lis mon epsilon
sur la 3eme ligne je lis mon N .
pour écrire ensuite la réponse dans un autre fichier.
comment je peux faire??
Merci pour vos reponses.
Partager