用VB写了个程序,生成ExE后却无法运行,谁能帮我查找一下原因?

谢谢前面两位,启动窗体应该是没有问题的,因为以前生成exe是可以运行的,后来我在其它窗体上又做一些改动,生成exe就无法运行了.但是因为改动很多,查得脑袋发麻,找不出原因.很崩溃,这是我写二十多天的东西啊
下面是启动窗体的load代码Private Sub Form_Load()
    On Error Resume Next

' Load GuaKuChild3_FenXi
  Mpath = App.Path  '获取当前路径
  If Not (Right(Mpath, 1) = "/" Or Right(Mpath, 1) = "\") Then Mpath = Mpath + "/"
  Mpath = Mpath + "guaku.mdb"
  Data1.DatabaseName = Mpath '+ "guaku.mdb"                  '连接数据库
  Data1.RecordSource = "select * from lottergua "              '构成记录集对象

If Gtxt = False Then Gtxt = True '当Gtxt为true时,下一句执行时不调用GuatoTXT

  Data1.Refresh
If Gtxt = True Then Gtxt = False '在新增时往往要重复一次对GuatoTxT的调用,这样
                                        '只调用一次If Data1.Recordset.EOF <> True And Data1.Recordset.RecordCount <> 0 Then Data1.Recordset.MoveLast



  Data2.DatabaseName = Mpath '+ "guaku.mdb"                  '连接数据库
       Data2.RecordSource = "lotterjhao"              '构成记录集对象
         Data2.Refresh
        ' Data2.Recordset.MoveLast
If Data2.Recordset.EOF <> True And Data2.Recordset.RecordCount <> 0 Then Data2.Recordset.MoveLast  cmbJL.AddItem "3D"
  cmbJL.AddItem "P5"
  cmbJL.AddItem "七星彩"
  cmbJL.AddItem "双色球"
  cmbJL.AddItem "排列3"

  cmbITEM.AddItem "3D"
  cmbITEM.AddItem "P5"
  cmbITEM.AddItem "七星彩"
  cmbITEM.AddItem "双色球"
' cmbITEM.AddItem "排列3"
  cmbITEM.ListIndex = 0

  cmbSsx.AddItem "请选择"
  cmbSsx.AddItem "3D"
  cmbSsx.AddItem "P5"
  cmbSsx.AddItem "七星彩"
  cmbSsx.AddItem "双色球"
  cmbSsx.ListIndex = 0

  cmbSid.AddItem "请选择"
  cmbSid.AddItem "等于"
  cmbSid.AddItem "大于"
  cmbSid.AddItem "小于"
  cmbSid.ListIndex = 0

  cmbSrq.AddItem "请选择"
  cmbSrq.AddItem "等于"
  cmbSrq.AddItem "大于"
  cmbSrq.AddItem "小于"
  cmbSrq.ListIndex = 0

        Combo1.AddItem "向前" '表示记录前后移动方向,在frame3中
        Combo1.AddItem "向后"
        Combo1.ListIndex = 0

        Label12.Caption = "五行生旺:" & vbCrLf & "  长生\旺\墓\绝" & vbCrLf & "金:巳\酉\丑\寅" & vbCrLf & "木:亥\卯\未\申" & vbCrLf & _
                            "火:寅\午\戌\亥" & vbCrLf & "水:申\子\辰\巳" & vbCrLf & "土:申\子\辰\巳"


' Text5 = "backinfo说明:" & vbCrLf & "1表示准确." & vbCrLf & "2表示特别准确." & vbCrLf & "0表示不准确." & _
          vbCrLf & "-1表示不准确." & vbCrLf & "-2表示很不准确."
Label7.Caption = "backinfo说明:" & vbCrLf & "1表示准确." & vbCrLf & "2表示特别准确." & vbCrLf & "0表示不准确." & _
          vbCrLf & "-1表示未判断." & vbCrLf & "-2表不准且难解."
Frame1.Left = 0
Frame1.Top = 0
DTPicker1.Value = Date        '增加FrmGuaKu窗体的磁性,使其能够吸著其它窗体:GuaKuChild1_JianHao,GuaKUChild2_ZuHao,GuaKuChild3_FenXi
     Call oMagneticWnd.AddWindow(Me.hWnd)
     LoadEndB = True
     Me.Left = 5000
     Me.Top = 1500
End Sub

把On Error Resume Next注释掉，然后在开发环境下启动看看哪有问题

楼主又被 On Error Resume Next害了一把

去掉On Error Resume Next,看问题在哪儿??

If Not (Right(Mpath, 1) = "/" Or Right(Mpath, 1) = "\") Then Mpath = Mpath + "/"
这句我表示看不明白。连接的数据库包括远程？为什么IF中两种情况都是加"/"的？

上课去，我给你改一下这个代码，我没用过数据库控件，不知道地址要什么格式，你就参考吧。If(Right(Mpath, 1) <> "\" then Mpath = Mpath & "\"
Mpath = Mpath + "guaku.mdb"

1.去掉On Error Resume Next,
2.屏蔽一半代码，运行，可以
再屏蔽另一半，继续上面操作，一会就找到问题了，

这句没有问题,
有的路径后面用"\"分隔,有的路径中用"/",比如:"F:\guaku\"或者"F:\guaku/",如果它只是:"F:\guaku",那么后面给它加上"/",就是:"F:\guaku\"

以前就注释掉所有的On Error Resume Next试过,在开发环境中没问题,生成exe后就无法运行了.

唉,刚才有点急事,没把话说完.现在注释掉所有的On Error Resume Next,还是原来的样子:在开发环境中正常,生成exe后运行没有一点反应.

我在Private Sub Form_Load()下面加了一句监测的语句,用debugView监测,但是一点反应都没有,是不是这个过程根本就没运行?语句如下:private Declare Sub OutputDebugString Lib "kernel32" Alias "OutputDebugStringA" (ByVal lpOutputString As String)
Private Sub Form_Load()

Call OutputDebugString(ByVal "Frmguaku Private Sub Form_Load  第1处")
  On Error Resume Next

程序的错误要这样处理：on error goto ErrMsgErrMsg:
msgbox Err.number & err.description这样程序在其它环境运行如果是程序内部错误，就会提示你有什么错了，你如果用On error resume next就什么都看不到了

你这种情况很像是某个控件或代码中使用了多线程或子类化这些代码造成的崩溃,并且这种崩溃是在VB6的虚拟机中的崩溃,因此连报出错误的机会都没有.尝试一下在工程属性中把编译类型设置为P代码再编译一下看看.如果P代码OK,那么就从这个方向去解决问题吧.如果P代码不OK,那么就只能采用上面朋友所说的注释掉一半代码的方式进行折半定位了.

启动代码全部屏蔽掉编译运行看看会不会是data1控件出问题你还可以用VB自带的打包程序打包然后装一遍试试

我记起了前几天把这个程序生成EXE后运行所产生的一个报告,不知有用没用,把它粘贴在下面:<?xml version="1.0" encoding="UTF-16"?>
<DATABASE>
<EXE NAME="YaoYaoGuaKu15.exe" FILTER="GRABMI_FILTER_PRIVACY">
    <MATCHING_FILE NAME="GuaKu1.exe" SIZE="655402" CHECKSUM="0x18E5E6EF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="GuaKu1.exe" INTERNAL_NAME="GuaKu1" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xABBE0" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/11/2011 01:19:58" UPTO_LINK_DATE="04/11/2011 01:19:58" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="GuaKu2.exe" SIZE="626730" CHECKSUM="0x19EA7EEF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="GuaKu2.exe" INTERNAL_NAME="GuaKu2" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xA2089" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/11/2011 01:32:01" UPTO_LINK_DATE="04/11/2011 01:32:01" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="GuaKu3.exe" SIZE="655402" CHECKSUM="0x18E5E6EF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="GuaKu3.exe" INTERNAL_NAME="GuaKu3" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xA7046" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/11/2011 05:06:38" UPTO_LINK_DATE="04/11/2011 05:06:38" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="GuaKu4.exe" SIZE="593956" CHECKSUM="0x2A6FA313" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="GuaKu2.exe" INTERNAL_NAME="GuaKu2" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x92775" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="01/07/2011 12:10:13" UPTO_LINK_DATE="01/07/2011 12:10:13" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="GuaKu5.exe" SIZE="593956" CHECKSUM="0x2A6FA313" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="GuaKu2.exe" INTERNAL_NAME="GuaKu2" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x9BE99" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="01/11/2011 04:55:11" UPTO_LINK_DATE="01/11/2011 04:55:11" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="LotterDabs.exe" SIZE="462848" CHECKSUM="0x8658E8BF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="LotterDabs" FILE_VERSION="1.00" ORIGINAL_FILENAME="LotterDabs.exe" INTERNAL_NAME="LotterDabs" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x73112" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="11/30/2010 06:13:52" UPTO_LINK_DATE="11/30/2010 06:13:52" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu.exe" SIZE="667696" CHECKSUM="0x18F014CF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu3.exe" INTERNAL_NAME="YaoYaoGuaKu3" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xA9B04" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/13/2011 09:44:39" UPTO_LINK_DATE="04/13/2011 09:44:39" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu2.exe" SIZE="663599" CHECKSUM="0x19FB0B2F" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu.exe" INTERNAL_NAME="YaoYaoGuaKu" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xA62CC" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/12/2011 03:17:33" UPTO_LINK_DATE="04/12/2011 03:17:33" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu1.exe" SIZE="655408" CHECKSUM="0x18E594CF" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu1.exe" INTERNAL_NAME="YaoYaoGuaKu1" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xAE21E" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/11/2011 07:17:19" UPTO_LINK_DATE="04/11/2011 07:17:19" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu10.exe" SIZE="1032241" CHECKSUM="0xD0147F49" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu10.exe" INTERNAL_NAME="YaoYaoGuaKu10" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x10922A" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/18/2011 04:26:17" UPTO_LINK_DATE="04/18/2011 04:26:17" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu11.exe" SIZE="1032241" CHECKSUM="0xD0147F49" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu11.exe" INTERNAL_NAME="YaoYaoGuaKu11" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x100EAF" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/18/2011 04:29:04" UPTO_LINK_DATE="04/18/2011 04:29:04" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu14.exe" SIZE="692273" CHECKSUM="0xD83FF49" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu14.exe" INTERNAL_NAME="YaoYaoGuaKu14" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xB6035" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/18/2011 07:06:55" UPTO_LINK_DATE="04/18/2011 07:06:55" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="YaoYaoGuaKu15.exe" SIZE="692273" CHECKSUM="0xD83FF49" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="GuaKu1" FILE_VERSION="1.00" ORIGINAL_FILENAME="YaoYaoGuaKu15.exe" INTERNAL_NAME="YaoYaoGuaKu15" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0xAA550" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/18/2011 09:59:40" UPTO_LINK_DATE="04/18/2011 09:59:40" VER_LANGUAGE="中文(中国) [0x804]" />

  <MATCHING_FILE NAME="Lottery4\Lottery4.exe" SIZE="434176" CHECKSUM="0x94B10237" BIN_FILE_VERSION="2.2.0.28" BIN_PRODUCT_VERSION="2.2.0.28" PRODUCT_VERSION="2.02.0028" COMPANY_NAME="YAOYAO" PRODUCT_NAME="YaoYaoBaGua" FILE_VERSION="2.02.0028" ORIGINAL_FILENAME="Lottery4.exe" INTERNAL_NAME="Lottery4" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x7358B" LINKER_VERSION="0x20002" UPTO_BIN_FILE_VERSION="2.2.0.28" UPTO_BIN_PRODUCT_VERSION="2.2.0.28" LINK_DATE="04/12/2011 03:21:07" UPTO_LINK_DATE="04/12/2011 03:21:07" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="Lottery4\Lottery6.exe" SIZE="430080" CHECKSUM="0x1F332ED6" BIN_FILE_VERSION="2.2.0.22" BIN_PRODUCT_VERSION="2.2.0.22" PRODUCT_VERSION="2.02.0022" COMPANY_NAME="YAOYAO" PRODUCT_NAME="YaoYaoBaGua" FILE_VERSION="2.02.0022" ORIGINAL_FILENAME="Lottery6.exe" INTERNAL_NAME="Lottery6" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x7478A" LINKER_VERSION="0x20002" UPTO_BIN_FILE_VERSION="2.2.0.22" UPTO_BIN_PRODUCT_VERSION="2.2.0.22" LINK_DATE="01/28/2011 04:08:15" UPTO_LINK_DATE="01/28/2011 04:08:15" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="Lottery4\Lottery5.exe" SIZE="430080" CHECKSUM="0x1F332ED6" BIN_FILE_VERSION="2.2.0.20" BIN_PRODUCT_VERSION="2.2.0.20" PRODUCT_VERSION="2.02.0020" COMPANY_NAME="YAOYAO" PRODUCT_NAME="YaoYaoBaGua" FILE_VERSION="2.02.0020" ORIGINAL_FILENAME="Lottery4.exe" INTERNAL_NAME="Lottery4" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x76C53" LINKER_VERSION="0x20002" UPTO_BIN_FILE_VERSION="2.2.0.20" UPTO_BIN_PRODUCT_VERSION="2.2.0.20" LINK_DATE="01/11/2011 08:27:26" UPTO_LINK_DATE="01/11/2011 08:27:26" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="Lottery4\Lottery3.exe" SIZE="430080" CHECKSUM="0x6AE86A0B" BIN_FILE_VERSION="2.2.0.22" BIN_PRODUCT_VERSION="2.2.0.22" PRODUCT_VERSION="2.02.0022" COMPANY_NAME="YAOYAO" PRODUCT_NAME="YaoYaoBaGua" FILE_VERSION="2.02.0022" ORIGINAL_FILENAME="Lottery4.exe" INTERNAL_NAME="Lottery4" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x6A1C2" LINKER_VERSION="0x20002" UPTO_BIN_FILE_VERSION="2.2.0.22" UPTO_BIN_PRODUCT_VERSION="2.2.0.22" LINK_DATE="04/03/2011 03:18:36" UPTO_LINK_DATE="04/03/2011 03:18:36" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="Lottery4\Lottery2.exe" SIZE="430080" CHECKSUM="0x94986633" BIN_FILE_VERSION="2.2.0.23" BIN_PRODUCT_VERSION="2.2.0.23" PRODUCT_VERSION="2.02.0023" COMPANY_NAME="YAOYAO" PRODUCT_NAME="YaoYaoBaGua" FILE_VERSION="2.02.0023" ORIGINAL_FILENAME="Lottery7.exe" INTERNAL_NAME="Lottery7" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x7381C" LINKER_VERSION="0x20002" UPTO_BIN_FILE_VERSION="2.2.0.23" UPTO_BIN_PRODUCT_VERSION="2.2.0.23" LINK_DATE="04/05/2011 03:30:03" UPTO_LINK_DATE="04/05/2011 03:30:03" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="LUHAO\ShouLuHao2.exe" SIZE="57344" CHECKSUM="0xE38981F8" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="ShouLuHao" FILE_VERSION="1.00" ORIGINAL_FILENAME="ShouLuHao2.exe" INTERNAL_NAME="ShouLuHao2" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x11FEE" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/11/2011 15:28:28" UPTO_LINK_DATE="04/11/2011 15:28:28" VER_LANGUAGE="中文(中国) [0x804]" />
    <MATCHING_FILE NAME="LUHAO\ShouLuHao.exe" SIZE="32768" CHECKSUM="0xFECAAFF2" BIN_FILE_VERSION="1.0.0.0" BIN_PRODUCT_VERSION="1.0.0.0" PRODUCT_VERSION="1.00" COMPANY_NAME="YAOYAO" PRODUCT_NAME="ShouLuHao" FILE_VERSION="1.00" ORIGINAL_FILENAME="ShouLuHao.exe" INTERNAL_NAME="ShouLuHao" VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x4" VERFILETYPE="0x1" MODULE_TYPE="WIN32" PE_CHECKSUM="0x1373F" LINKER_VERSION="0x10000" UPTO_BIN_FILE_VERSION="1.0.0.0" UPTO_BIN_PRODUCT_VERSION="1.0.0.0" LINK_DATE="04/12/2011 04:44:26" UPTO_LINK_DATE="04/12/2011 04:44:26" VER_LANGUAGE="中文(中国) [0x804]" />
</EXE>
<EXE NAME="kernel32.dll" FILTER="GRABMI_FILTER_THISFILEONLY">
    <MATCHING_FILE NAME="kernel32.dll" SIZE="1150464" CHECKSUM="0x84C53E42" BIN_FILE_VERSION="5.1.2600.5512" BIN_PRODUCT_VERSION="5.1.2600.5512" PRODUCT_VERSION="5.1.2600.5512" FILE_DESCRIPTION="Windows NT BASE API Client DLL" COMPANY_NAME="Microsoft Corporation" PRODUCT_NAME="Microsoft(R) Windows(R) Operating System" FILE_VERSION="5.1.2600.5512 (xpsp.080413-2111)" ORIGINAL_FILENAME="kernel32" INTERNAL_NAME="kernel32" LEGAL_COPYRIGHT="(C) Microsoft Corporation. All rights reserved." VERFILEDATEHI="0x0" VERFILEDATELO="0x0" VERFILEOS="0x40004" VERFILETYPE="0x2" MODULE_TYPE="WIN32" PE_CHECKSUM="0x122A2B" LINKER_VERSION="0x50001" UPTO_BIN_FILE_VERSION="5.1.2600.5512" UPTO_BIN_PRODUCT_VERSION="5.1.2600.5512" LINK_DATE="04/14/2008 02:13:26" UPTO_LINK_DATE="04/14/2008 02:13:26" VER_LANGUAGE="中文(中国) [0x804]" />
</EXE>
</DATABASE>

问题终于消失了!莫名其妙的消失了.
我重新复制了一份文件,然后又写了个程序,在原来程序中加上了2千多句监测语句,用DebugView来跟踪,没有跟踪出什么结果,但是,生成exe后却可以运行了.然后,删除监测语句,生成exe也可以运行,好了,莫名其妙地好了.但是问题依然潜伏着.现在我有两份文件,几应该说是相同的文件,我再把它们反复试试,看能不能找出原因?
或者朋友们能不能给出个揪出潜伏着的问题的思路········

  Mpath = App.Path '获取当前路径
  If Not (Right(Mpath, 1) = "/" Or Right(Mpath, 1) = "\") Then Mpath = Mpath + "/"
''If 语句多余的。Mpath 尾部永远不会有"\",或"/"
''VB对于路径总是使用如下格式：
  根:\路径1\...\路径n
如果想将"\",替换成"/",使用
Mpath = Replace(Mpath,"\","/")   '替换程序中可能出现的情况使用 If .. 测试处理为佳，尽量少用 On Error 捕捉。尽管后者使用简单，但内耗较大。
出现错误，或者结果不是期望，屏蔽 On Error 语句后在VB下调试，总可以查到。

你使用VB将 DLL 写成可输出函数的Dll，形式同 API 格式函数。再试试。

奇怪,昨天生成EXE后还可以运行,今天又试了试,生成EXE后,却无法运行了.
难道是与电脑运行的状态有关?

解决问题的方法找到了!
我为了方便,把文件放在U盘中,打开VB程序后,是从U盘中来打开文件的,就会导致生成EXE无法运行(为什么?);但把文件复制到C盘(安装VB程序的盘)后再打开生成EXE,就可以运行了.所以我想是应把文件放到VB程序目录中去吧,至少放在VB程序所在的盘内(后来出现了几次同样的问题,我都是这样解决了的).

调试易

用VB写了个程序,生成ExE后却无法运行,谁能帮我查找一下原因?

解决方案 »