Execution d'une expression dans une chaine

cs_Patrick91 Messages postés 3 Date d'inscription dimanche 12 décembre 2004 Statut Membre Dernière intervention 19 octobre 2005 - 17 oct. 2005 à 21:28
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 19 oct. 2005 à 23:35
Bonjour

Je suis a la recherche d'un fonction qui puisse
executer une expression contenue dans une chaine:
ex. result=exec("V(0)*5.12+V(1)/3")
Je suis en train de l'ecrire mais peut etre que
ca existe deja.
Merci

Patrick Montarou
Toppan Photomask
Email :patrick.montarou@photomask.com
Email :patrick.montarou@wanadoo.fr

4 réponses

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
17 oct. 2005 à 21:46
salut,
+ - * / oui, j'en ai déjà vu plusieurs sur VbF
par contre, avec une variable, et un facteur entre parenthèse, je ne crois pas ;)

PCPT [AFCK]
0
cs_Patrick91 Messages postés 3 Date d'inscription dimanche 12 décembre 2004 Statut Membre Dernière intervention 19 octobre 2005
18 oct. 2005 à 20:10
Bonjour
Merci pour cette reponse rapide
Je recupere des infos dans un fichier template avec un tableau de valeurs et des constantes systemes
le nombres de parametres peut changer et je veux creer
d'autre variables calculees a patir des donnees dans mon fichier sans avoir a recompiler .......tordu mais utile pour moi .
Je posait la question car ces options existe dans matlab et APL
J'ai presque termine la code

Patrick Montarou
Dupont Photomask
Email :patrick.montarou@photomask.com
0
cs_Patrick91 Messages postés 3 Date d'inscription dimanche 12 décembre 2004 Statut Membre Dernière intervention 19 octobre 2005
19 oct. 2005 à 23:26
Bonjour

J'ai fini le code et ca marche ...
Encore une question comment avec la commande VBA.DIR
pourrais je optenir la liste des fichiers tries par ordre de date croissante.

Merci

Patrick Montarou
Dupont Photomask
Email :patrick.montarou@photomask.com
0
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
19 oct. 2005 à 23:35
salut,

en VBA, je sais pas. en VB6, voici comment les lister par ordre alphabétique.


Private Sub Form_Load()
Dim MyFile As String
MyFile = Dir (App.Path & "\*.txt")

If MyFile = "" Then MsgBox "Aucun", 32: Exit Sub

Do While MyFile <> ""
Debug.Print App.Path & "" & MyFile
MyFile = Dir
Loop

MsgBox "Terminé", 32
End Sub


<SMALL> Coloration syntaxique automatique [AFCK]</SMALL>


ensuite, au lieu du Debug.Print, tu les enregistres en tableau, et c'est à toi de les retrier en fonction de leurs propriétés
avec l'API GetFileAttributes


Private
Declare
Function GetFileAttributes
Lib
"kernel32"
Alias
"GetFileAttributesA" (
ByVal lpFileName
As
String)
As
Long

@+
PCPT [AFCK]
0
Rejoignez-nous