急～～连问题原因都看不出来 希望高手来帮忙

现做了个Excel导入数据库的小东西～～当中遇到了个问题  
  做了个Button叫测试连接～～  
  代码如下：  
  Private   Sub   Button2_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button2.Click  
                  Dim   test1   As   New   DoExcel  
                  Label2.Text   =   "正在连接数据库..."  
                  MsgBox(test1.TestConn)  
                  Label2.Text   =   "点击按钮后选择EXCEL文件"  
          End   Sub  
  其中test1.TestConn就是测试连接的方法。  
  现在的问题是Label2.Text显示问题，比如说连接成功，连接成功的对话提示跳出来的时候才看到label显示“正在连接数据库..."  
  如果连接失败，软件就象长时间的死机一样，要等要连接失败的提示跳出来，label才显示“正在连接数据库..."  
  现在的目标是希望一点测试连接就能在软件上显示出”正在连接数据库..“而不是连接成功（失败）提示框出来的时候。  
  我现在都不知道是什么问题搞成现在这样的   。是线程的关系吗？怎么解决？ 问题点数：20、回复次数：3Top

1 楼sanjie88（菜鸟依旧,谁动了我的毛片）回复于 2006-06-02 10:48:51 得分 15

Private   Sub   Button2_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button2.Click  
                Dim   s   As   Threading.Thread   =   New   Threading.Thread(AddressOf   test)  
                s.start()  
          End   Sub  
  private   sub   Test()  
          Dim   test1   As   New   DoExcel  
                  Label2.Text   =   "正在连接数据库..."  
                  MsgBox(test1.TestConn)  
                  Label2.Text   =   "点击按钮后选择EXCEL文件"  
  End   subTop

2 楼xiaoxuanZhu（我为人人，人人为我）回复于 2006-06-02 10:49:08 得分 5

应该放到线成里做  
  Top

3 楼zerohay（千里梦惊雪）回复于 2006-06-02 11:12:11 得分 0

感谢楼上的2位前辈～～能给我讲解下为什么吗？我线程一直学的不怎么样。Top

相关问题

• 帖主：zerohay
• sanjie88
• xiaoxuanZhu

• CSDN .NET频道
• .NET类图书
• C#类图书
• .NET类源码下载