в 16:40, 26 мая 2010

2010-05-26T16:40:30Z

Admin: 1 версия

2010-05-26T12:54:09Z

1 версия

Новая страница

==Use Reflection to get all member names==

<source lang="vbnet">Module Module1
Class Book
Public Title As String
Public Author As String
Public Price As Double
Public Sub New(ByVal Title As String, ByVal Author As String, ByVal Price As Double)
Me.Title = Title
Me.Author = Author
Me.Price = Price
End Sub
Public Sub ShowTitle()
Console.WriteLine("Title: " & Title)
End Sub
Public Sub ShowBook()
Console.WriteLine("Title: " & Title)
Console.WriteLine("Author: " & Author)
Console.WriteLine("Price: " & Price)
End Sub
End Class
Sub Main()
Dim NetBook As New Book("AAA","BBB", 49.99)
Console.WriteLine("Member Names")
Dim Member As Reflection.MemberInfo
For Each Member In NetBook.GetType.GetMembers()
Console.WriteLine(Member.Name)
Next
End Sub
End Module</source>
<pre class=codeResult>Member Names
ShowTitle
ShowBook
GetType
ToString
Equals
GetHashCode
.ctor
Title
Author
Price</pre>

==Use Reflection to get all method names==

<source lang="vbnet">Module Module1
Class Book
Public Title As String
Public Author As String
Public Price As Double
Public Sub New(ByVal Title As String, ByVal Author As String, ByVal Price As Double)
Me.Title = Title
Me.Author = Author
Me.Price = Price
End Sub
Public Sub ShowTitle()
Console.WriteLine("Title: " & Title)
End Sub
Public Sub ShowBook()
Console.WriteLine("Title: " & Title)
Console.WriteLine("Author: " & Author)
Console.WriteLine("Price: " & Price)
End Sub
End Class
Sub Main()
Dim NetBook As New Book("AAA","BBB", 49.99)
Console.WriteLine("Method Names")
Dim Info As Reflection.MethodInfo
For Each Info In NetBook.GetType.GetMethods()
Console.WriteLine(Info.Name)
Next
End Sub
End Module</source>
<pre class=codeResult>Method Names
ShowTitle
ShowBook
GetType
ToString
Equals
GetHashCode</pre>

← Предыдущая	Версия 16:40, 26 мая 2010
(нет различий)

VB.Net Tutorial/Reflection/MethodInfo - История изменений

в 16:40, 26 мая 2010

Admin: 1 версия