vbscript - 如何在vbs中获取当前代码行号？

Question

例如，我有一个下一个代码：

1. Dim a
2. Dim b
3. Dim c
4. Dim currentRow
5. a = 5
6. b = 9
7. c = a + b      
8. currentRow = ???   'There i need to get code row
9. MsgBox currentRow

所以我需要得到 8

Answer 1

该语言不提供这种内省/反思。所以你的选择是：

1. 使用不同类型的唯一位置标识符（关键字、描述、全局计数器）
2. 预处理您的 .VBS 文件以在需要的地方插入/替换当前行号
3. 在 Microsoft ScriptControl 中执行您的代码并使用 Error 对象的 .Line 属性