关于VB中的多线程！！！！！我的vb程序中需要调用一个oracle的存储过程，执行大概1分钟左右..........
我的vb程序中需要调用一个oracle的存储过程，存储过程的执行大概1分钟左右，我想在存贮过程执行的过程中，在界面上显示一个信息框（textbox或label），内容就是“数据正在准备中......”之类的文字，怎样实现这个功能，使用多线程可不可以？最好给一个例子。
谢谢！
问题点数：0、回复次数：10Top
1 楼gxsun（小毛猪）回复于 2004-09-02 14:41:41 得分 0
你可以修改存储过程让它有返回值，得到值前显示信息框，得到后隐藏就行了Top
2 楼birdwithoutfly（无翼鸟）回复于 2004-09-02 15:16:28 得分 0
ado的connection对象可以支持异步执行
adoconn.Execute strsql,,adasyncexecuteTop
3 楼birdwithoutfly（无翼鸟）回复于 2004-09-02 15:25:25 得分 0
再声明adoconn对象的时候,
dim withevents adoconn as adodb.connection
adoconn有两个事件willexecute和executecomplete
你可以在willexecute事件中判断source参数是不是你执行的存储过程.设置一个标志变量
在executecomplete事件中根据标志变量来决定你要执行的操作
Top
4 楼bladeinside（云淡风清）回复于 2004-09-02 15:42:08 得分 0
学习Top
5 楼liuxn_cn（liuxn）回复于 2004-09-02 18:40:56 得分 0
我想让提示框闪烁，怎么办？Top
6 楼rzty（阿中先生）回复于 2004-09-02 19:18:50 得分 0
用doevents不就搞定了？Top
7 楼birdwithoutfly（无翼鸟）回复于 2004-09-03 09:18:10 得分 0
闪烁,可以搞个timer,在willexecute时间中,启动timer事件,在timer事件中修改文本框的前景色和背景色,就可以了.最后在executecomplete中停止timerTop
8 楼birdwithoutfly（无翼鸟）回复于 2004-09-03 09:19:57 得分 0
to rzty(阿中先生)
//用doevents不就搞定了？
用ado调用执行一个存储过程,就只有一条语句,怎么用doevents?Top
9 楼cobrastudio（老汉我）回复于 2004-09-03 09:30:58 得分 0
偶是小菜：请问一下，在VB中怎么调用ORACLE的存储过程？
偶像调用SQLSERVER的存储过程一样调用，怎么出错呢？Top
10 楼liuxn_cn（liuxn）回复于 2004-09-03 10:08:32 得分 0
Set comProc = New ADODB.Command
With comProc
.CommandText = "prc_salerpt001"
.CommandType = adCmdStoredProc
.ActiveConnection = gobjConnOra
.Parameters.Append .CreateParameter(, adNumeric, adParamInput)
.Parameters.Append .CreateParameter(, adVarChar, adParamInput, 16)
.Parameters.Append .CreateParameter(, adNumeric, adParamOutput)
End With
Top
