大橙子网站建设,新征程启航

为企业提供网站建设、域名注册、服务器等服务

包含vb点虐 中catch的词条

VB点虐 中的 异常处理 不是说try__Catch语句可以避免异常吗??

Dim i As Integer

专业成都网站建设公司,做排名好的好网站,排在同行前面,为您带来客户和效益!成都创新互联公司为您提供成都网站建设,五站合一网站设计制作,服务好的网站设计公司,做网站、网站建设负责任的成都网站制作公司!

Try

i = CInt(TextBox1.Text)//这个里显然输入文字的话是不对的

If i = 6 Then

MessageBox.Show("666!")

End If

Catch ex As Exception

MessageBox.Show(ex.Message)

End Try

试试。。。

i = CInt(TextBox1.Text) 这句已经出现错误,所以无法进入try语句

在vb点虐 中,try,catch,endtry是什么意思

try

'尝试执行某些操作,有可能在执行过程中产生异常

...

...

catch

'执行上面的语句竟然真的发生错误,产生异常了,就在这里处理把

...

...

endtry

用软件改变世界,用代码书写人生,用思想创造未来! GOOD LUCK

VB.NET的Try Catch和Property类问题综合题(告急!)

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点虐 中catch的词条
标题路径:http://dzwzjz.com/article/ddihheg.html
在线咨询
服务热线
服务热线:028-86922220
TOP