189 8069 5689
不可以的，但是出现错误的时候不是已经告诉你在多少行了吗？你把行号显示出来就可以了。
成都创新互联公司是一家集网站建设,徽县企业网站建设,徽县品牌网站建设,网站定制,徽县网站建设报价,网络营销,网络优化,徽县网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
显示行号的方法：工具选项文本编辑器basic编辑器
这项下有个行号，你打钩就好了。
这样一来报错的时候，提示在多少行，你就到多少行去看。如果你没有用try的话，错误在哪里，ide会在错误的位置给你标示出来。
在VB环境中执行源代码，本身就是调试模式
按F8即可逐语句运行
点击语句左端空白处，将其背景色变为深红，就是添加断点，运行到该语句会停下来
可以在变量、对象等语句上点击右键，选择“添加监视”即可
发送接收的过程都放在Try...Catch里面，一旦连接中断，就会出错，此时可以关闭现有连接，重新连服务端
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a() As Integer = {678, 45, 324, 528, 439, 387, 87, 875, 273, 823}
Dim i%, j%, n%, t%, k%
Label1.Text = ""
n = UBound(a)
For i = 0 To n - 1
For j = 0 To n - i - 1
If a(j) a(j + 1) Then
t = a(j)
a(j) = a(j + 1)
a(j + 1) = t
End If
Next j
For k = 0 To n - 1
Label1.Text = a(k) " "
Next
Label1.Text = vbCrLf
Next i
End Sub
这是正确代码 我已经调试过了。尽请放心
在你给textbox设置text值后直接使用sleep()，因为在使用sleep（）的时候，当前的主进程是被挂起了，也就是说设置的text属性后，还来不及在屏幕上显示lbi的内容就执行了sleep，所以在执行sleep()挂起主进程前，你必须让textbox的内容先显示出来再执行sleep，可尝试使用下DoEvents（）将控制权暂时移交一下，让系统有时机来刷新textbox里面的内容，让系统有机会来刷新textbox里面的内容。由于我没有安装visual studio的开发环境，无法调试代码的正确性，但我记得我以前也遇到此类问题，采取的DoEvents()的方式。你可尝试下。
lbl.Visible = True
Sleep(5000)
lbl.Text = "我是中国人"
lbi.Refresh '刷新一下lbi，具体你可以调试下，看需要不需要这条
Application.DoEvents() ‘设置完lbi的text属性，将操作权限释放一下，让系统有机会显示lbi的内容。
Sleep(3000) ’待显示后，再执行挂起
lbl.Text = "我爱自己的祖国"
lbi.Refresh ‘同上
Application.DoEvents() ’同上
DoEvents（）的功能解释是：转让控制权，以便让操作系统处理其它的事件。
如执行一次不行，可尝试重复多执行几次，特别在循环语句中，对于窗口的刷新显示DoEvents特别有用，但是在循环体内使用了DoEvents后，当前进程的执行效率会有大幅降低，因为移交控制权必然损失当前进程的运行效率。
两个解决方法：
一、
1) 打开项目属性，选择调试选项卡，将“启用非托管代码调试”一项钩上。
2) 打开项目属性，选择调试选项卡，将“启用Visual Studio宿主进程“一项钩掉。
二、
Terminal Services服务被禁用，启动服务即可解决问题。