bonjour
un exemple en javascript utilisant un regex et un objet json pour les mots réservé
<!doctype html>
<html lang="fr">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<head>
<style type="text/css">
body{
font-family:Verdana, Geneva, sans-serif;
background-color:#b2bdc6;
}
.coode{
color:blue;
}
pre{
background-color:gray;
}
</style>
<script>
var un_objet={
"Private" : "<span class='coode'>Private</span>",
"Sub" : "<span class='coode'>Sub</span>",
"If" :"<span class='coode'>If</span>",
"Exit" :"<span class='coode'>Exit</span>",
"End" : "<span class='coode'>End</span>",
"Error" : "<span class='coode'>Error</span>",
"GoTo" : "<span class='coode'>Goto</span>",
"True" : "<span class='coode'>True</span>",
"False" : "<span class='coode'>False</span>",
"Then" : "<span class='coode'>Then</span>",
"On" : "<span class='coode'>On</span>",
};
function obj_key(){
var txt=document.getElementById("tar").value
for (var x in un_objet){
var regex = new RegExp(x,'g');
txt=txt.replace(regex,un_objet[x])
}
document.getElementById("rendu").innerHTML=txt
}
</script>
</head>
<body>
<br>
<button onclick="obj_key()">coloration</button>
<textarea id="tar" style="height:350px;width:450px">Private Sub AskPin_Click()
On Error GoTo AskPin_Click_Error
If Len(Userid) < 6 Then
MsgBox ("Le nom d'utilisateur doit comporter au moins 6 caractères"), vbExclamation
Exit Sub
End If
Instr1.Visible = True
Instr3.Visible = False
End If
On Error GoTo 0
Exit Sub
AskPin_Click_Error:
ErrHdl ("AskPin_Click dans Connexion")
End Sub</textarea>
<br>
<span id="demo"></span>
<pre id="rendu"></pre>
</body>
</html>
le tout étant court et simple je te laisse comprendre par toi même.
29 janv. 2020 à 17:07
je voudrait bien voir aussi la réponse svp
merci cordialement