我越看越晕，实在不知道怎么填了。求高手解答，谢谢！
Public Class Form1
Public Class Circl
Dim_radius As Single '#1
Public Function Area() As Single
Return ______ '#2
End Function
____ Radius() '#3
Get
______ '#4
End Get
Set(ByVal value)
If value >= 0 Then
______ '#5
Else
_radius = 0
______ '#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 '#7
c.Radius = Convert.ToSingle(______) '#8
txbArea.Text = ______ '#9
Catch ex As Exception
MsgBox(______) '#10
End Try
End Sub
End Class

已解决。