try
创新互联建站专业为企业提供靖州网站建设、靖州做网站、靖州网站设计、靖州网站制作等企业网站建设、网页设计与制作、靖州企业网站模板建站服务,10年靖州做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
‘可能出错的代码
catch ex……
出错后运行这里的代码,可以通过ex返回错误信息。
end try
try是捕获异常的关键字
try
{
正常执行代码段;
}
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("半径不能为负数") '#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
本文来源:https://www.cdcxhl.com/article14/hpdode.html
成都网站建设公司_创新互联,为您提供定制开发、网站维护、搜索引擎优化、网站内链、关键词优化、品牌网站建设
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联