是我程序有问题还是我不会调试？

Question

vb里搞了个a模块，再加了个debug模块用来调试a，在debug里面sub main()写了几句，怎么调试看问题呢，我用菜单里的“调试”或“运行”试下来都没什么反应，就看到点击后就停在那了，程序也不会自己结束，只能等一会还没反应我自己动手去结束它，是我程序有问题还是我不会调试？

Answer 1

全部贴出来怕大家没时间看，先贴个sub main()吧
sfilename = FormatDateTime(Now, 1)
sfilename = App.Path("csv") & "\" & CStr(sfilename) & ".xls"
Set Myobj = server.CreateObject("projectexcel.classexcel")
Myobj.stroutpath = sfilename
Myobj.aspexcel ("select I_OBJECT from T_STOCK_TRACE_TR where I_GAME_CD='" & Trim(request.querystring("id")) & "' order by I_UPDATE_DATE desc")
     Set mo = Nothing
     End Sub

Answer 2

sub main执行完以后的后续事件是什么？

Answer 3

都已经Set Myobj = Nothing，后面还要什么东西啊，我想好象不要了吧，我概念不清，请帮我再解释下吧，谢谢！

Answer 4

程序没有一个窗体，你的程序只是构成了一个Active根本不能交互。
去掉你的sub main用加入标准程序窗口调试，用Form

Answer 5

不用form就不能运行或调式了吗，好象你说得不对

Answer 6

程序调试， 请按F8, 然后一步一步看看(F8或者shift+F8)
看到底停在哪了

Answer 7

Sub Main已经执行完毕，当然会停下来等待。

Answer 8

T2(無藥可救) ( ) 信誉：100    Blog  2007-02-13 09:24:35  得分: 0  
 
 
   Sub Main已经执行完毕，当然会停下来等待。
  
 
------------------------------------------------------------------------错了， Sub Main 就好比是个函数
执行完了，就退出了， 不会有在等待一说。
你可以写个简单的sub main
运行一看的话， vb界面就像是流星一闪，又回到原来编码状态了

Answer 9

TO:beal_p() 
错了， Sub Main 就好比是个函数
执行完了，就退出了， 不会有在等待一说。
你可以写个简单的sub main
运行一看的话， vb界面就像是流星一闪，又回到原来编码状态了
-----------------------
确实，对不起各位，犯了个低级错误

Answer 10

T2(無藥可救) ( ) 信誉：100    Blog  2007-2-13 9:36:39  得分: 3  
 
 
   
TO:beal_p() 
错了， Sub Main 就好比是个函数
执行完了，就退出了， 不会有在等待一说。
你可以写个简单的sub main
运行一看的话， vb界面就像是流星一闪，又回到原来编码状态了
-----------------------
确实，对不起各位，犯了个低级错误  
 
得到3分好多阿，是我的3倍