VB访问远程数据库假死

Question

Set conn = New ADODB.Connection
strcn = "driver=mysql odbc 3.51 driver;" & "server=远程IP;" & "database=test;" & "uid=名字;" & "pwd=密码"
conn.Open strcn就以上的代码,由于网速原因,会造成程序假死.
在连接的时候其他的代码也无法运行
比如 
label1.caption="正在连接"
Set conn = New ADODB.Connection
strcn = "driver=mysql odbc 3.51 driver;" & "server=远程IP;" & "database=test;" & "uid=名字;" & "pwd=密码"
conn.Open strcn
label1.caption="连接成功"
程序执行,假死之后直接显示"连接成功",之前也不显示"正在连接"我的意思是,像photoshop启动时那样,做一个窗体,连接数据库的时候,lable1.caption="正在连接",连接后运行其他的加载代码.  虽然会卡,但至少用户不会觉得单调.
呵呵

Answer 1

label1.caption="正在连接"me.refresh   '加上这句就可以显示"正在连接"了Set conn = New ADODB.Connection
strcn = "driver=mysql odbc 3.51 driver;" & "server=远程IP;" & "database=test;" & "uid=名字;" & "pwd=密码"
conn.Open strcn
label1.caption="连接成功"

Answer 2

yachong  我真的很崇拜你