Click here to Skip to main content
       

Visual Basic

 
Questionpng lossless resize PinmemberJellyCoe4-Feb-13 5:39 
AnswerRe: png lossless resize PinmemberRene Pilon4-Feb-13 6:54 
QuestionCustom Tab Control that I found on here PinmemberNSoft Studios3-Feb-13 13:10 
AnswerRe: Custom Tab Control that I found on here PinmvpDave Kreskowiak3-Feb-13 13:19 
GeneralRe: Custom Tab Control that I found on here PinmemberNSoft Studios3-Feb-13 13:44 
GeneralRe: Custom Tab Control that I found on here PinmvpRichard MacCutchan3-Feb-13 22:40 
QuestionRetrieving Custom Attributes PinmemberDisIsHoody1-Feb-13 21:34 
AnswerRe: Retrieving Custom Attributes PinmvpEddy Vluggen2-Feb-13 2:11 
You'd need to fill a FieldInfo from the field whose attributes you'd wish to query. I've included a sample to reference;
Module Module1
 
    <AttributeUsage(AttributeTargets.Field, AllowMultiple:=True, Inherited:=False)>
    Public Class OutputDescriptionAttribute
        Inherits Attribute
 
        Private _oldDescription As String
        Private _newDescription As String
 
        Public Sub New(ByVal oldDescription As String, ByVal newDescription As String)
            Me._oldDescription = oldDescription
            Me._newDescription = newDescription
        End Sub
 
        Public ReadOnly Property CurrentDescription As String
            Get
                Return _newDescription
            End Get
        End Property
 
    End Class
 
    Public Enum ReadingModeType
        <OutputDescription("TC", "TimeCorrected")> TimeCorrected
        <OutputDescription("QM", "QuickMode")> QuickMode
    End Enum
 
    Sub Main()
        Dim TCFieldInfo As Reflection.FieldInfo = GetType(ReadingModeType).GetField("TimeCorrected")
        Dim customAttributes As Object() = TCFieldInfo.GetCustomAttributes(inherit:=True)
        For Each Attrib As Attribute In customAttributes
            If Attrib.GetType() Is GetType(OutputDescriptionAttribute) Then
                Dim outputDescriptionAttrib As OutputDescriptionAttribute =
                    CType(Attrib, OutputDescriptionAttribute)
                Console.WriteLine(outputDescriptionAttrib.CurrentDescription)
            End If
        Next
        Console.ReadLine()
    End Sub
 
End Module
Bastard Programmer from Hell Suspicious | :suss:
If you can't read my code, try converting it here[^]
They hate us for our freedom![^]

QuestionSearch criteria - classic asp not working Pinmembermiss78631-Jan-13 4:01 
AnswerRe: Search criteria - classic asp not working PinmvpEddy Vluggen31-Jan-13 10:18 
GeneralRe: Search criteria - classic asp not working Pinmembermiss7866-Feb-13 1:03 
GeneralRe: Search criteria - classic asp not working PinmvpEddy Vluggen6-Feb-13 7:11 
GeneralRe: Search criteria - classic asp not working Pinmembermiss7866-Feb-13 23:26 
GeneralRe: Search criteria - classic asp not working PinmvpEddy Vluggen7-Feb-13 8:13 
AnswerRe: Search criteria - classic asp not working PinmvpEddy Vluggen8-Feb-13 11:04 
QuestionWebBrowser Dock covers up statusstrip PinmemberNSoft Studios30-Jan-13 15:46 
AnswerRe: WebBrowser Dock covers up statusstrip PinmvpRichard MacCutchan30-Jan-13 22:13 
AnswerRe: WebBrowser Dock covers up statusstrip PinmvpEddy Vluggen30-Jan-13 22:36 
GeneralRe: WebBrowser Dock covers up statusstrip PinmvpDave Kreskowiak31-Jan-13 3:35 
SuggestionRe: WebBrowser Dock covers up statusstrip PinmvpEddy Vluggen31-Jan-13 3:38 
GeneralRe: WebBrowser Dock covers up statusstrip PinmvpDave Kreskowiak31-Jan-13 6:52 
GeneralRe: WebBrowser Dock covers up statusstrip PinmvpEddy Vluggen31-Jan-13 10:12 
GeneralRe: WebBrowser Dock covers up statusstrip PinmemberNSoft Studios3-Feb-13 12:58 
AnswerRe: WebBrowser Dock covers up statusstrip Pinmemberrohitvermasrt31-Jan-13 18:28 
QuestionQuery dataTable with .Compute Pinmembermebjen30-Jan-13 9:05 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy | Mobile
Web02 | 2.8.140827.1 | Last Updated 1 Sep 2014
Copyright © CodeProject, 1999-2014
All Rights Reserved. Terms of Service
Layout: fixed | fluid