在VB環(huán)境中執(zhí)行源代碼,本身就是調(diào)試模式
讓客戶滿意是我們工作的目標(biāo),不斷超越客戶的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶,將通過(guò)不懈努力成為客戶在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴,公司提供的服務(wù)項(xiàng)目有:主機(jī)域名、雅安服務(wù)器托管、營(yíng)銷軟件、網(wǎng)站建設(shè)、婁底網(wǎng)站維護(hù)、網(wǎng)站推廣。
按F8即可逐語(yǔ)句運(yùn)行
點(diǎn)擊語(yǔ)句左端空白處,將其背景色變?yōu)樯罴t,就是添加斷點(diǎn),運(yùn)行到該語(yǔ)句會(huì)停下來(lái)
可以在變量、對(duì)象等語(yǔ)句上點(diǎn)擊右鍵,選擇“添加監(jiān)視”即可
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
這是正確代碼 我已經(jīng)調(diào)試過(guò)了。盡請(qǐng)放心
看看聲明時(shí)有沒(méi)有聲明實(shí)例(Dim xx As New xx()而不是Dim xx As xx),你可以按F11進(jìn)入單步調(diào)試看看哪里出了問(wèn)題。在調(diào)試時(shí),你可以隨時(shí)把鼠標(biāo)放在對(duì)象名稱上看看是不是Nothing
例如你用msgbox,你在輸入這個(gè)函數(shù)的參數(shù)的時(shí)候會(huì)有個(gè)提示框彈出來(lái),里面有每個(gè)參數(shù)的類型已經(jīng)這個(gè)函數(shù)的返回值類型,
你可以記下來(lái)返回值的類型msgbox的是Microsoft.VisualBasic.MsgBoxResult
然后你按下F2
輸入MsgBoxResult去搜索(不知道為什么搜索Microsoft.VisualBasic.MsgBoxResult沒(méi)有結(jié)果)
可以看到MsgBoxResult的方法,函數(shù)和枚舉項(xiàng),枚舉項(xiàng)就是你要的東西.自己看
其實(shí)你還可以直接就F2然后搜索MSGBOX,會(huì)得到這個(gè)函數(shù)的詳細(xì)訊息,返回值有哪些結(jié)果也會(huì)得到.
多看看MSDN如果沒(méi)裝
按F2多看看對(duì)象瀏覽器
你可以得到很多答案
新聞名稱:vb點(diǎn)虐
本地調(diào)試的簡(jiǎn)單介紹
文章網(wǎng)址:http://chinadenli.net/article18/ddeojdp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App開發(fā)、微信小程序、外貿(mào)建站、品牌網(wǎng)站制作、移動(dòng)網(wǎng)站建設(shè)、ChatGPT
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)