[100分全部送]说话算话真君子

还是先看代码：  
  代码一：  
  Do   While   Inet1.StillExecuting  
            Select   Case   State  
                Case   3  
                        xxx  
                case   x  
                        xxx  
            End   Select          
    DoEvents  
  Loop  
   
  代码二：  
  Do   While   Inet1.StillExecuting  
    DoEvents  
  Loop  
  ----------------------------------------------  
  Private   Sub   Inet1_StateChanged(ByVal   State   As   Integer)  
        Select   Case   State  
              Case   2  
                    xxx  
              Case   x  
                    xxx  
        End   Select  
  End   Sub  
  判断Inet1的状态，能否用上面2段代码来实现？运行程序，系统就像没有看见Case语句一样，请问到底错在那里？ 问题点数：100、回复次数：7Top

1 楼peilianhai（网侠（）回复于 2005-01-06 10:54:32 得分 25

代码二：  
  Do   While   Inet1.StillExecuting  
  Inet1_StateChanged(inet1.state)  
  '好像没调用case语句  
    DoEvents  
  Loop  
  ----------------------------------------------  
  Private   Sub   Inet1_StateChanged(ByVal   State   As   Integer)  
        Select   Case   State  
              Case   2  
                    xxx  
              Case   x  
                    xxx  
        End   Select  
  End   Sub  
  Top

2 楼ljhdi（ ）回复于 2005-01-06 10:55:40 得分 5

Inet1倒底是什么东西呀Top

3 楼werwrewrwe（werwrewrwe）回复于 2005-01-06 10:59:12 得分 0

Inet1_StateChanged(inet1.state)   未找到方法或者函数成员Top

4 楼werwrewrwe（werwrewrwe）回复于 2005-01-06 11:00:13 得分 0

Inet1是一个控件的名字：MS   Internet   Transfer   6。0Top

5 楼tztz520（午夜逛街）回复于 2005-01-06 11:07:03 得分 60

StillExecuting是Boolean类型的.  
   
  你看一下State是不是返回了11,就是错误的.  
   
   
  而State的描述如下  
  State   的设置值：  
  常数   值   描述    
  icNone   0   无状态可报告。    
  icHostResolvingHost   1   该控件正在查询所指定的主机的   IP   地址。    
  icHostResolved   2   该控件已成功地找到所指定的主机的   IP   地址。    
  icConnecting   3   该控件正在与主机连接。    
  icConnected   4   该控件已与主机连接成功。    
  icRequesting   5   该控件正在向主机发送请求。    
  icRequestSent   6   该控件发送请求已成功。    
  icReceivingResponse   7   该控件正在接收主机的响应。    
  icResponseReceived   8   该控件已成功地接收到主机的响应。    
  icDisconnecting   9   该控件正在解除与主机的连接。    
  icDisconnected   10   该控件已成功地与主机解除了连接。    
  icError   11   与主机通讯时出现了错误。    
  icResponseCompleted   12   该请求已经完成，并且所有数据均已接收到。    
  Top

6 楼fascvxvcx（fascvxvcx）回复于 2005-01-06 11:12:11 得分 5

问题已经解决，得出结论如下：代码一和代码二均能实现对Inet1状态的检测.  
   
  散分  
           
  Top

7 楼wumylove1234（毁于随）回复于 2005-01-06 11:15:07 得分 5

接分.Top

相关问题

• 控件
• 主机
• 代码
• 连接
• inet1
• doeventsloop
• stillexecuting
• statechanged
• 请求
• xxx

• 帖主：werwrewrwe
• peilianhai
• ljhdi
• tztz520
• fascvxvcx
• wumylove1234

• Visual Basic类图书
• Visual Basic类源码下载