查看: 443  |  回复: 0
  VB6 WinSock控件的Enum(枚举)的值
楼主
发表于 2024年4月16日 14:56

Enum(枚举)就是初始化后(不指定就是0),每个增加1。

可以参考:https://learn.microsoft.com/zh-cn/dotnet/visual-basic/language-reference/statements/enum-statement 

Public Enum SockState
    sckClosed = 0
    sckOpen
    sckListening
    sckConnectionPending
    sckResolvingHost
    sckHostResolved
    sckConnecting
    sckConnected
    sckClosing
    sckError
End Enum

比如你的代码是:

If Winsock1.State <> sckClosed Then Winsock1.Close    'sckClosed=0

是等效的。

在一个有Winsock1控件的代码中:

Private Sub Command1_Click()
    Debug.Print sckClosed
    Debug.Print sckOpen
    Debug.Print sckListening
    Debug.Print sckConnectionPending
    Debug.Print sckResolvingHost
    Debug.Print sckHostResolved
    Debug.Print sckConnecting
    Debug.Print sckConnected
    Debug.Print sckClosing
    Debug.Print sckError
End Sub

运行结果:

 0 
 1 
 2 
 3 
 4 
 5 
 6 
 7 
 8 
 9


您需要登录后才可以回帖 登录 | 立即注册
【本版规则】请勿发表违反国家法律的内容,否则会被冻结账号和删贴。
用户名: 立即注册
密码:
2020-2024 MaNongKu.com