VB.Net用Public Enum声明变量的实例
乐博网lob.cn提示:调试环境为 vs2005 + windows2003 / windows2008 / xp / vista
Public Class YAreaForm Public Enum math1 p = 3.14 r = 30 End Enum Private Sub YAreaForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim a = New class1 a.method() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MessageBox.Show("圆面积为" & math1.p * CInt(TextBox1.Text) ^ 2) End Sub End Class '更多.net源码和实例,来自乐博网 www.lob.cn Class class1 Sub method() MessageBox.Show("30半径圆面积为" & YAreaForm.math1.p * YAreaForm.math1.r ^ 2) End Sub End Class
|