try
創(chuàng)新互聯(lián)建站專業(yè)為企業(yè)提供靖州網(wǎng)站建設(shè)、靖州做網(wǎng)站、靖州網(wǎng)站設(shè)計、靖州網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計與制作、靖州企業(yè)網(wǎng)站模板建站服務(wù),10年靖州做網(wǎng)站經(jīng)驗,不只是建網(wǎng)站,更提供有價值的思路和整體網(wǎng)絡(luò)服務(wù)。
‘可能出錯的代碼
catch ex……
出錯后運行這里的代碼,可以通過ex返回錯誤信息。
end try
try是捕獲異常的關(guān)鍵字
try
{
正常執(zhí)行代碼段;
}
catch(Exception err)
{
錯誤代碼段;
//例如
MessageBox.Show(err.Message);
//可以顯示你出的是什么錯誤
}
Public Class Form1
Public Class Circl
Dim _radius As Single '#1
Public Function Area() As Single
Return _radius ^ 2 * 3.14 '#2
End Function
Public Property Radius() '#3
Get
Return Area() '#4
End Get
Set(ByVal value)
If value = 0 Then
_radius = value '#5
Else
_radius = 0
MsgBox("半徑不能為負數(shù)") '#6
End If
End Set
End Property
End Class
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim c As New Circl '#7
c.Radius = Convert.ToSingle(txbradius.Text) '#8
txbarea.Text = c.Area '#9
Catch ex As Exception
MsgBox(ex.Message) '#10
End Try
End Sub
本文名稱:vb.net的try VB net
本文來源:http://m.newbst.com/article14/hpdode.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供定制開發(fā)、網(wǎng)站維護、搜索引擎優(yōu)化、網(wǎng)站內(nèi)鏈、關(guān)鍵詞優(yōu)化、品牌網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)