通过 VB decompiler 反编译 exe  code下如何转换，变量、loc_ 完全看不懂，求解
  Dim var_254 As Global
  Dim var_25C As App
  loc_0061AD53: Dim var_88(3) As String
  loc_0061AD67: Dim var_A8(3) As String
  loc_0061AD76: On Error Resume Next
  loc_0061AD8D: ecx = vbNullString
  loc_0061ADED: var_C8 = Global.App
  loc_0061ADF2: var_258 = var_C8
  loc_0061AE50: var_B4 = Global.Path
  loc_0061AE55: var_260 = var_B4
  loc_0061AEA3: var_D0 = var_B4 & "\xl.dat"

https://bbs.bccn.net/thread-455498-1-1.html

完全没兴趣去看。因为 反编译 出来的东西不完全，需要结合 反汇编去看。
汇编，又不太懂。

  Dim var_254 As Global
  Dim var_25C As App
  loc_0061AD53: Dim var_88(3) As String
  loc_0061AD67: Dim var_A8(3) As String
  loc_0061AD76: On Error Resume Next
  loc_0061AD8D: ecx = vbNullString                 空串
  loc_0061ADED: var_C8 = Global.App                猜不出
  loc_0061ADF2: var_258 = var_C8
  loc_0061AE50: var_B4 = Global.Path              猜，取路径
  loc_0061AE55: var_260 = var_B4
  loc_0061AEA3: var_D0 = var_B4 & "\xl.dat"       组成文件名

反编译出来的东西太看着太费劲了，调用东西都看不出来。

没搞过，这个太复杂。如果程序原理清晰的话，我建议还是自己重新编写

主要想拿到数据库入口。

数据库入口？啥数据库？
sql，直接登陆进去做用户
Access，下个密码查看软件看下密码就是了

你要啥入口？