如果在运行线程后采用循环查询的方法显然影响了交互性，事件是从线程方法返回数据的好方法。只要在线程方法所在的类中定义一个事件，在线程方法中发出事件，而在窗体类中生成代理。线程是操作系统分配处理器时间的基本单元,线程可以在单个执行线程执行的同时运行多个活动,支持抢先多任务处理的操作系统可以创建多个线程并通过时间片轮转的方式使它们同时运行。在需要良好用户交互的应用以及与网络和数据库进行通讯的应用中,使用多线程能提供良好的交互体验,能对用户的要求做出快速的反应。

首先在dealDataBase类声明后加进VB.NET事件：

   
   

    
    
PublicClassdealDataBase 
    
    
PublicEventGetDataComplete(ByValeAsDtatTable) 
    
    
… 
    
    
EndClass
   
   

在类dealDataBase的GetDataFromDataBase()方法中加入发出事件的代码，放在m_sqlDataAdapter.Fill(m_table)后：

   
   

    
    
PublicsubGetDataFromDataBase() 
    
    
… 
    
    
m_sqlDataAdapter.Fill(m_table) 
    
    
RasiseEventGetDataComplete(m_table) 
    
    
… 
    
    
EndSub
   
   

下面在窗体类中生成代理

   
   

    
    
PrivateSubdealData(ByValeAsDataTable) 
    
    
'处理数据表 
    
    
EndSub
   
   

在创建线程并运行线程的代码中进行事件连接,事件连接代码放在运行线程前,dealDataBase类实例化后：

   
   

    
    
AddHandlermyDB.GetDataComplete,AddressOfdealData
   
   

这样，当线程方法执行完毕就会发出事件，而dealData方法会响应VB.NET事件并做出处理。