1. error_Renamed = FirmwareVersionGet(SocketID, Buffer)
目前創(chuàng)新互聯(lián)公司已為上千多家的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬空間、網(wǎng)站改版維護(hù)、企業(yè)網(wǎng)站設(shè)計(jì)、五寨網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
執(zhí)行FirmwareVersionGet函數(shù),返回值賦值給error_Renamed。
根據(jù)FirmwareVersionGet函數(shù)名稱估計(jì)是取得Firmware的版本號(hào)。
2. TCP_CloseSocket((SocketID))
執(zhí)行TCP_CloseSocket函數(shù),根據(jù)名字功能估計(jì)是關(guān)閉TCP連接。
3. ret = ErrorStringGet(SocketID, error_Renamed, Buffer)
執(zhí)行ErrorStringGet函數(shù),返回值賦值給ret。
根據(jù)函數(shù)名稱估計(jì)是取得異常(錯(cuò)誤)文字資料說(shuō)明。
4. LogWrite(vbCrLf "Port Close" Buffer)
執(zhí)行LogWrite函數(shù),根據(jù)名字功能估計(jì)是寫Log記錄。
5. LogWrite(vbCrLf CStr(error_Renamed))
同上,
里面的CStr(error_Renamed)是什么意思?我查過(guò)了想確認(rèn)。是把error_Renamed轉(zhuǎn)為字符型數(shù)據(jù),前面沒(méi)有空格,對(duì)吧。正確
6. error_Renamed = PositionerSGammaParametersGet(SocketID, PositionerName3, vel, acc, Jerkmax, Jerkmin)
執(zhí)行PositionerSGammaParametersGet函數(shù),返回值賦值給error_Renamed 。
根據(jù)函數(shù)名稱估計(jì)是取得位置參數(shù)。
將光標(biāo)放在該函數(shù)上,單擊鼠標(biāo)右鍵,點(diǎn)選Definition(vb.net是Go To Definition)
7. error_Renamed = GroupMoveAbsolute(SocketID, txtGroup.Text, 3, dbl_arry(0))
估計(jì)是將某群組移動(dòng)到指定位置吧,這個(gè)比較難猜。
8. error_Renamed = GroupPositionCurrentGet(SocketID, PositionerName1, 1, position)
估計(jì)是取得某群組的當(dāng)前位置
9. Public CommOpened As Boolean 好多程序段中都有If CommOpened = False Then 那么下面的程序才能執(zhí)行,我想問(wèn)的是 在怎么才能控制布爾型變量CommOpened 為TURE 或FALSE呢?好多程序都是在這個(gè)條件下才能執(zhí)行下一部分的。
你看看是否有CommOpened=函數(shù)(參數(shù)[可選])這一類的語(yǔ)句,又或者將Commopened作為參數(shù)傳入某函數(shù),而該參數(shù)是Byref來(lái)定義的。這些語(yǔ)句都會(huì)變更變量的值。
10. Buffer = New String(Chr(0), 512 + 1)
將513個(gè)Chr(0)連成字符串賦值給Buffer.
11. If CommOpened = FalseThen
SocketID = TCP_ConnectToServer(IPAddress, IPPort, 10)
問(wèn)題 CommOpened = False這一點(diǎn)怎么控制呢,布爾的如何讓他為False呢?
第9題已回答
SocketID = TCP_ConnectToServer(IPAddress, IPPort, 10)
建議TCP連接,將ID賦值 給SocketID.
If SocketID -1 Then
error_Renamed = FirmwareVersionGet(SocketID, Buffer)
問(wèn)題 SocketID是什么,為什么不等于1才執(zhí)行下的程序??梢再x其他的值嗎?
根據(jù)你提供的代碼,SockedID在這里的定義應(yīng)該是TCP成功連接後的一個(gè)連接身份證號(hào)(成功的話通常都是一個(gè)大於0的值),如果是-1的話則表示連接不成功,只是不是-1的話就表示成功。
FirmwareVersionGet(SocketID, Buffer)
第一題已解釋。
LogWrite(vbCrLf Buffer)
第4題已解釋。Buffer的值第9題已解釋,就如CommOpened如何賦值的道理一樣。
12. TCP_CloseSocket((SocketID))
第二題已解釋
SocketID = -1
第11題已解釋
13. If CommOpened = TrueThen
error_Renamed = FirmwareVersionGet(SocketID, Buffer)
第11題已解釋
14. Dim vel AsDouble
txtVelX.Text = Str(vel)
vel沒(méi)有具體的值,這個(gè)程序不管用吧,在沒(méi)有具體值的情況下不能用吧。調(diào)試了一個(gè)返回值為0.實(shí)際程序里面就是這樣寫的,不解。
vel可能為任意值,如果是VB6的話,未初始化的變量一般為0.
15. If CommOpened = True Then
error_Renamed = GroupInitialize(SocketID, GroupName)
當(dāng)CommOpened這個(gè)變量為True時(shí),執(zhí)行GroupInitialize函數(shù),并將返回值賦值給error_Renamed.GroupInitialize估計(jì)是某群組初始化函數(shù)。
16. If CommOpened = TrueThen
error_Renamed = GroupHomeSearch(SocketID, GroupName)
GroupHomeSearch這個(gè)函數(shù)很難猜出它的功能,估計(jì)是搜尋某群組吧。
17. If CommOpened = TrueThen
error_Renamed = GroupKill(SocketID, GroupName)
GroupKill估計(jì)是刪除某群組
18. Text1.AppendText(Logstr vbCrLf)
Text1如果是Textbox控件的話,這個(gè)語(yǔ)句則表示在Text1這個(gè)TextBox內(nèi)添加變量Logstr的內(nèi)容再加上一個(gè)回車符
Text1.ScrollToCaret()Textbox將滾動(dòng)條自動(dòng)滾動(dòng)到插入符的位置。
綜合你以上問(wèn)題,這個(gè)應(yīng)該是一個(gè)用VB.net寫的一個(gè)聊天室程序。
我是介紹給樓上zeropj聽的,可惜他不能給我分。。。
===========================================================
InstantMessaging(即時(shí)通訊,實(shí)時(shí)傳訊)的縮寫是IM,這是一種可以讓使用者在網(wǎng)絡(luò)上建立某種私人聊天室(chatroom)的實(shí)時(shí)通訊服務(wù)。大部分的即時(shí)通訊服務(wù)提供了狀態(tài)信息的特性——顯示聯(lián)絡(luò)人名單,聯(lián)絡(luò)人是否在線及能否與聯(lián)絡(luò)人交談。目前在互聯(lián)網(wǎng)上受歡迎的即時(shí)通訊軟件包括百度hi、QQ、MSN Messenger、AOL Instant Messenger、Yahoo! Messenger、NET Messenger Service、Jabber、ICQ等。
通常IM服務(wù)會(huì)在使用者通話清單(類似電話簿)上的某人連上IM時(shí)發(fā)出訊息通知使用者,使用者便可據(jù)此與此人透過(guò)互聯(lián)網(wǎng)開始進(jìn)行實(shí)時(shí)的通訊。除了文字外,在頻寬充足的前提下,大部分IM服務(wù)事實(shí)上也提供視訊通訊的能力。實(shí)時(shí)傳訊與電子郵件最大的不同在于不用等候,不需要每隔兩分鐘就按一次“傳送與接收”,只要兩個(gè)人都同時(shí)在線,就能像多媒體電話一樣,傳送文字、檔案、聲音、影像給對(duì)方,只要有網(wǎng)絡(luò),無(wú)論對(duì)方在天涯海角,或是雙方隔得多遠(yuǎn)都沒(méi)有距離。
互聯(lián)網(wǎng)的歷史總顯得具有不可思議的戲劇性:1996年,4位以色列人發(fā)明了IM的鼻祖——ICQ“壞小子”,那時(shí)它只是一個(gè)主要搞網(wǎng)上尋呼的“小玩意”;1998年,騰訊研發(fā)團(tuán)隊(duì)為QQ用戶突破100人而“興奮不已”;2000年前后,業(yè)內(nèi)傳馬化騰打算把QQ作價(jià)100萬(wàn)賣給深圳電信,但深圳電信卻不要。到2005年騰訊卻成為中國(guó)收入前三名的互聯(lián)網(wǎng)公司,而與騰訊一樣做即時(shí)通訊的朗瑪U(kuò)C,依靠市場(chǎng)份額和用戶數(shù)排名第二的優(yōu)勢(shì),被新浪收購(gòu)后換來(lái)了3600萬(wàn)美元的現(xiàn)金和股票。
說(shuō)實(shí)話我玩這個(gè)也好多年了除了 sock 和 asp.net 真的沒(méi)什么再好的辦法了 sock的話可以下個(gè)聊天室程序的代碼看下 用控件的話很簡(jiǎn)單的 asp.net 其實(shí)最簡(jiǎn)單就是得先了解一下vb.net (本身vb.net就有sock類 用法也很簡(jiǎn)單 就是需要看下異步處理 很簡(jiǎn)單幾行的事) asp.net 通信用IIS7(win7自帶) 測(cè)試一下就行 就是發(fā)送數(shù)據(jù)是用的是post表單 或者用ajax 異步刷新 不管怎么發(fā)包只要字節(jié)定個(gè)數(shù)據(jù)的標(biāo)準(zhǔn)接到后分析一下就搞定了 很簡(jiǎn)單的
第一個(gè)問(wèn)題 qq聊天室 必須能 用vb都可以做
第二個(gè)問(wèn)題 vb.net插入數(shù)學(xué)公式 可以把這些公式封裝到一個(gè)類中,調(diào)用就是了