十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
在VB环境中执行源代码,本身就是调试模式
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:主机域名、雅安服务器托管、营销软件、网站建设、娄底网站维护、网站推广。
按F8即可逐语句运行
点击语句左端空白处,将其背景色变为深红,就是添加断点,运行到该语句会停下来
可以在变量、对象等语句上点击右键,选择“添加监视”即可
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
这是正确代码 我已经调试过了。尽请放心
看看声明时有没有声明实例(Dim xx As New xx()而不是Dim xx As xx),你可以按F11进入单步调试看看哪里出了问题。在调试时,你可以随时把鼠标放在对象名称上看看是不是Nothing
例如你用msgbox,你在输入这个函数的参数的时候会有个提示框弹出来,里面有每个参数的类型已经这个函数的返回值类型,
你可以记下来返回值的类型msgbox的是Microsoft.VisualBasic.MsgBoxResult
然后你按下F2
输入MsgBoxResult去搜索(不知道为什么搜索Microsoft.VisualBasic.MsgBoxResult没有结果)
可以看到MsgBoxResult的方法,函数和枚举项,枚举项就是你要的东西.自己看
其实你还可以直接就F2然后搜索MSGBOX,会得到这个函数的详细讯息,返回值有哪些结果也会得到.
多看看MSDN如果没装
按F2多看看对象浏览器
你可以得到很多答案