vb.net插拔网线 vbnet lambda

visual studio 2008 盗版软件在局域网中启动或调试时很慢，当拿掉网线时很快，这是怎么回事，求高手帮忙

我是教VB.net的，一直使用VS2008，如果你的电脑不好的话，尽量不要用了，每次我调试的时候，电脑都要死一下！只好等待了！后来上了i5就好多了！

创新互联主打移动网站、成都做网站、成都网站制作、成都外贸网站建设、网站改版、网络推广、网站维护、域名注册、等互联网信息服务，为各行业提供服务。在技术实力的保障下，我们为客户承诺稳定，放心的服务，根据网站的内容与功能再决定采用什么样的设计。最后，要实现符合网站需求的内容、功能与设计，我们还会规划稳定安全的技术方案做保障。

个人感觉跟网线没有多大关系：我看了你的问题，自己试了下，好像没有影响！

这样吧，你看看你电脑有没有安装什么P2P软件（BT，迅雷，影音……），这些软件在你联网的时候会自动上传文件，并且占用很大的系统资源！如果有这些软件你关闭它们试试看！

你可以用360网速防火墙测试一下！顺便说下，普通电脑上传文件很占资源的！

还一点建议：我最近发现的，如果你用VS2008编制多窗体程序，最好不要给窗体重命名！我试过很多电脑了，重命名窗体之后调试就会死掉！

呵呵，如果你正在学习VB.net，可以探讨探讨！

求大神指点vb.net代码添加数组图片框的时候写 图片框鼠标事件的时候提示错误Handles pic.MouseDown

错误代码,是指人们在使用软、硬件、路由器的时候，这些软硬件不能正常操作的一种现象~~

如果是某几个网页打不开，而出现错误代码，那么这是属于服务器的事，我们是无法左右它的！

比较常见的一些代码如下：

错误678/651/815，碰到这样的代码，你先偿试重起电脑或路由器，以排除它们的偶然故障引起。

查看modem的亮灯情况：

第一步：查看power灯是否正常，稳定亮转至第二步，不亮则可能是忘记打开MODEM电源开关，插电源线或电源稳压器松动所致；

第二步：查看DSL灯是否正常亮。如稳定亮则转至第三步，如果DSL灯一直闪烁不停，表明ADSL线路正在连接或一直连接不上，此为线路问题，最常见的一种情况是分离器进线与接电话的端口接错了，这时调换接线端口，再检查室内的电话线接头是否接触不良，或者取消分离器，直接把入户线接入modem，再重启MODEM，如果仍不能解决问题出单检查外线。；

第三步：查看LAN亮灯情况，如不亮则转至第四步，如是稳定亮，有可能是电脑的拨号软件出现问题，建议重装拨号软件；

第四步：如LAN灯不亮，则是modem与电脑的连线问题，请从新拔插由modem到电脑之间的网线。

错误691/619/629一般多为账号密码不一致，欠费，账号挂死或者端口出错引起。

错误769/797一般是网卡禁用或者驱动程序出问题。

如果在你使用中，又出现了别的代码，那么你可以参考百科资料：

用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串口及以太网通迅

关于串口通讯的问题：

很明显，你还不知道（不会、不习惯）使用事件驱动的方式接收数据。

建议你仔细看看串口组件（无论VB6还是VB.net）的OnComm事件，你的问题很容易解决。

关于以太网通讯：

在TCP通讯中端口确实可以重用，你百度一下“TCP端口重用”能查到很多示例。

但绝大多数情况下不推荐端口重用，而应该采取服务器端建立连接池的方法。

或者，干脆不用TCP，用UDP解决也可以。