分配给On Error Resume Next的变量的值是多少？

Posted 2021-04-06

我已经开始逆向工程并使用visual basic decompiler，我得到了这个，虽然它是基本的，但我唯一不理解的东西（就是这段代码）：

  loc_00405255: On Error Resume Next
  loc_00405262: -1 = Time$
  loc_0040526D: var_30 = On Error Resume Next
  loc_00405273: edi = Date$
  loc_0040527E: var_34 = var_30

是什么var_30包含？

EDIT 2 :

因为我从文件here，我没有看到On Error Resume Next不返回任何东西。

以下是整段代码的一部分：

Dim var_140 As Variant
  loc_00405255: On Error Resume Next
  loc_00405262: -1 = Time$
  loc_0040526D: var_30 = On Error Resume Next
  loc_00405273: edi = Date$
  loc_0040527E: var_34 = var_30
  loc_004052B7: var_24 = Text2.Text
  loc_004052BF: var_144 = var_24
  loc_00405301: var_168 = var_24
  loc_00405314: var_C4 = var_168
  loc_00405357: var_28 = Text1.Text
  loc_0040535F: var_14C = var_28
  loc_004053A8: Asc(var_28) = Asc(var_28) + 0001h
  loc_004053C3: var_16C = var_30
  loc_004053D6: var_54 = var_16C
  loc_0040540B: var_2C = var_34
  loc_00405418: var_84 = Right$(var_2C, 2)
  loc_00405428: var_E4 = "Grand-Theft-Auto-Vice-City"
  loc_0040543C: var_F4 = "bbidhan-ThE-Great"
  loc_004054AF: var_150 = (var_168 = Chr(Asc(var_28)) & Right(var_16C, 2) & Right$(var_2C, 2) & "Grand-Theft-Auto-Vice-City" & "bbidhan-ThE-Great")
  loc_0040552B: If var_150 = 0 Then GoTo loc_004057C2
  loc_00405588: var_38 = Global.App
  loc_0040558D: var_144 = var_38
  loc_004055E5: var_24 = Global.Path
  loc_004055EA: var_14C = var_24

EDIT 1 :

Q2。 Right(var_16C, 2) & Right$(var_2C, 2)

以上两者之间的区别，带有$符号？

答案

On Error是a statement，而不是表达。说some_variable = On Error是语法错误。

看起来您的反编译器正在尝试使用该语法来传达某些东西，但无论它试图通信什么都不是VB6中可以表达的东西，当然也不是我直观地理解的东西。它可能试图告诉您一些用于跟踪错误信息的内部簿记，或者它可能只是您正在使用的反编译器中的错误。这不是一个有意义的表达。