?? incomming_data.bas
字號:
Attribute VB_Name = "incomming_data"
Option Compare Text 'lose cap sensitivity for this module
Sub decode_data(data As String, socket As Integer)
'a socket has sent some data to the server, write your code
'to translate the data here..
'first update the idle information
client(get_clientid(socket)).idle_since = f_time
'now decode the data
'if mid(data,1,3) = "SAY" then... etc etc
End Sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -