用vb.net實現網絡通信

用 vb.net socket通信

為漠河等地區用戶提供了全套網頁設計制作服務，及漠河網站建設行業解決方案。主營業務為成都網站設計、成都網站建設、漠河網站設計，以傳統方式定制建設網站，并提供域名空間備案等一條龍服務，秉承以專業、用心的態度為用戶提供真誠的服務。我們深信只要達到每一位用戶的要求，就會得到認可，從而選擇與我們長期合作。這樣，我們也可以走得更遠！

Dim th As Threading.Thread

2 Dim tcpl As System.Net.Sockets.TcpListener

3

4 Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

5 th = New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf MyListen))

6 th.Start()

7 End Sub

8

9 Public Sub SendMessage()Sub SendMessage(ByVal IP As String, ByVal SendMsg As String)

10 Try

11 If IP "" Then

12 Dim tcpc As New System.Net.Sockets.TcpClient(IP, 5656)

13 Dim tcpStream As Net.Sockets.NetworkStream = tcpc.GetStream

14 Dim reqStream As New IO.StreamWriter(tcpStream)

15 reqStream.Write(SendMsg)

16 reqStream.Flush()

17 tcpStream.Close()

18 tcpc.Close()

19 End If

20 Catch ex As Exception

21 MsgBox(ex.Message.ToString)

22 End Try

23 End Sub

24 Private Sub MyListen()Sub MyListen()

25 Try

26 Dim ipAddress As System.Net.IPAddress = System.Net.Dns.Resolve(System.Net.Dns.GetHostName).AddressList(0)

27 tcpl = New System.Net.Sockets.TcpListener(ipAddress, 5656)

28 tcpl.Start()

29 While True

30 Dim s As System.Net.Sockets.Socket = tcpl.AcceptSocket()

31 Dim MyBuffer(1024) As Byte

32 Dim i As Integer

33 i = s.Receive(MyBuffer)

34 If i 0 Then

35 Dim lstrRec As String

36 Dim j As Integer

37 For j = 0 To i - 1

38 TextBox1.Text += Chr(MyBuffer(j)) ","

39 Next

40 End If

41 End While

42 Catch ex As Exception

43 MsgBox(ex.Message.ToString)

44 End Try

45 End Sub

46

47 Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

48 SendMessage("192.168.0.61", TextBox2.Text)

49 End Sub

vb和vb.net的區別和特點

1、vb.net ?完全符合面向對象的編程語言抽象、封裝、繼承的四大特性，而vb不支持繼承。

2、錯誤處理不同。

vb中只是On Error.....goto和On Errer Resume Next ，這些錯誤稱為非結構化異常處理。而在vb.net中采用的結構化異常處理機制，try...catch....finally控制。

3、兩者產生的窗體不同。

vb.net 允許創建不同類型的應用程序，例如，創建ASP.NET和ASP.NET Web 服務應用程序，還允許創建控制臺應用程序和作為桌面服務運行的應用程序。但是vb 只能創建Windows窗體。

4、數據庫訪問的差別。

vb6.0是通過ADO（Active X Data Objext）來實現對數據庫訪問。而vb.net 是通過ADO.NET來訪問數據庫。

擴展資料

Visual Basic（簡稱VB）是Microsoft公司開發的一種通用的基于對象的程序設計語言，為結構化的、模塊化的、面向對象的、包含協助開發環境的事件驅動為機制的可視化程序設計語言。是一種可用于微軟自家產品開發的語言。

“Visual” 指的是開發圖形用戶界面 (GUI) 的方法——不需編寫大量代碼去描述界面元素的外觀和位置，而只要把預先建立的對象add到屏幕上的一點即可。

“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 語言，是一種在計算技術發展歷史上應用得最為廣泛的語言。

Visual Basic源自于BASIC編程語言。VB擁有圖形用戶界面（GUI）和快速應用程序開發（RAD）系統，可以輕易的使用DAO、RDO、ADO連接數據庫，或者輕松的創建Active?X控件，用于高效生成類型安全和面向對象的應用程序 。

參考資料：百度百科-Visual Basic

VB.NET 如何實現局域網內即時會話

樓主你好,你所指的那個指令就是"winchat",Windows自帶的局域網聊天工具.使用方法:開始--運行--輸入winchat,就可以打開Winchat了.只能實現很簡單的功能,并且是中文,沒什么好介紹的,相信你一看就懂,希望可以幫到你!

ps:你所說的電影是杜拉拉升職記吧?貌似那是用的郵件發的,不小心點成群發了~嘿嘿..

網站題目：vb.net即時通訊軟件的簡單介紹
網址分享：http://m.2m8n56k.cn/article2/hojdic.html

成都網站建設公司_創新互聯，為您提供網站導航、云服務器、微信公眾號、面包屑導航、定制網站、靜態網站

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：[email protected]。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯