Travailler dans une application VB6 classique, des commentaires fous par des milliers.Comment gérer les commentaires ridicules?
Exemple:
If garrFilePaths(i).FilePath = "" Then
'do nothing
Else
MsgBox "File Not Found (" & garrFilePaths(i).FilePath & ")", vbOKOnly, gcstrMessageBoxTitle
End If
If garrFilePaths(i).FilePath = "" Then
'do nothing 'fool
Else
MsgBox "File Not Found (" & garrFilePaths(i).FilePath & ")", vbOKOnly, gcstrMessageBoxTitle
End If
EPIC !!!! juste sur! classique – user52212
Refactor il est donc logique. Pas grand chose à "manipuler", il suffit d'enlever le croupion pour ne pas avoir à y passer des cycles cérébraux. Peut-être parler au développeur qui l'a écrit, et/ou travailler sur les documents d'orientation (normes de codage) pour aider les gens à faire la bonne chose.
Restructurez le code et supprimez-le.
If Not (garrFilePaths(i).FilePath = "") Then
MsgBox "File Not Found (" & garrFilePaths(i).FilePath & ")", vbOKOnly, gcstrMessageBoxTitle
End If
Cela fonctionne souvent des commentaires qui faire du sens aussi.
Il a été un moment depuis que j'ai fait Basic, mais je pense que cela pourrait être garrFilePaths (i) .FilePath <> "". – legoscia
@legoscia: Cela fait longtemps que je ne suis pas là, mais je pense que ce seront des déclarations équivalentes. –
@legoscia: Oui, je viens de confirmer, ce serait une syntaxe équivalente. http://msdn.microsoft.com/en-us/library/2hxce09y.aspx Cela m'a pris énormément de temps pour trouver comment rechercher <>. :) –
Quelle était la question? –
Celui qui a fermé la question probablement jonché cette application avec les commentaires – user52212