這個(gè)不是完整的代碼,里面有好幾個(gè)函數(shù)都沒(méi)有定義,貌似一個(gè)通信程序,有沒(méi)有完整的……看看就可以知道了Dim Hig As LongDim con As IntegerDim userIP() As StringDim user() As String'在線(xiàn)名單Dim userState() As Integer '-1 請(qǐng)求退出0 離線(xiàn)1 正常在線(xiàn)2 只能看不能發(fā)言 3 正在被踢 4 客戶(hù)端非正常終止Dim zxrs As Integer '在線(xiàn)人數(shù)Private Sub Command1_Click()Dim index As IntegerDim S As StringDim recUser As StringS = Trim(Text2.Text)Text2.Text = ""recUser = Combo1.TextIf recUser = "所有人" ThenIf S = "SystemOrder:boot" ThenFor i = 0 To MaxChan - 1userState(i) = 3NextEnd IfCall SendToAll(S)'這里調(diào)用函數(shù)發(fā)送給所有用戶(hù)Elseindex = FindSckIndex(recUser)If S = "SystemOrder:boot" Then userState(index) = 3'踢掉用戶(hù)Call SendToOne(S, index)End IfS = "對(duì)" & recUser & "說(shuō)：" & SCall AddToText1(S)'私聊End Sub你還有哪里不清楚S = "SystemOrder:boot" 是判斷什么呢？userState(i) = 3’為什么等于三呢？ FindSckIndex（）這個(gè)函數(shù)是做什么的？ 嘿嘿 雖然很多 但是誠(chéng)心想知道 謝謝呀~其實(shí)你第二次發(fā)的代碼加上去也不全，S= "SystemOrder:boot"判斷系統(tǒng)命令的狀態(tài)，這個(gè)是作者自己定義的，Dim userState() As Integer '-1 請(qǐng)求退出0 離線(xiàn)1 正常在線(xiàn)2 只能看不能發(fā)言 3 正在被踢 4 客戶(hù)端非正常終止……我們就知道userState(i) 可以等于-1，0,1，2，,3,，4而且意義是對(duì)應(yīng)的 FindSckIndex（）這個(gè)是判斷用戶(hù)的希望能幫到你