Feedback

VB - MAC und HEX generieren

Veröffentlicht von am 16.11.2007
(4 Bewertungen)
Generiert eine zufällige MAC-Adresse oder HEX Wert.
HEX mit gewünschtem Seperator und in beliebiger länge.

19.11.2007:
Weis zwar nicht, womit ich die 1,8 verdient hab, aber mit Stringbuilder siehts sauberer aus ;)
GFU-Schulungen  [Anzeige]

XML und .NET Überblick

Um auf dem neuesten Wissensstand zu sein, sollten Sie unser aktuelles ASP .NET Komplett Seminar belegen.
Nach dem Seminar kennen Sie die wichtigsten Strömungen in der Software-Technologie

VB.NET Aufbau

Sie verfügen nach der Schulung über fundierte Kenntnisse in der Arbeit mit objektorientierten Modellen in VB.NET und können wiederverwendbare Komponenten eigenständig erzeugen.

    Public Function GenerateMAC() As String
        Dim table As String = "0123456789ABCDEF"
        Dim RanMac As New System.Text.StringBuilder
        Dim rnd As New System.Random

        For i As Integer = 0 To 11
            RanMac.Append(table.Substring(rnd.Next(0, table.Length), 1))
        Next

        Return RanMac.ToString
    End Function

    Public Function GenerateHEX(ByVal Count As Integer, Optional ByVal Seperator As String = "") As String
        If Count < 1 Then Return ""

        Dim table As String = "0123456789ABCDEF"
        Dim RanHEX As New System.Text.StringBuilder
        Dim rnd As New System.Random

        For i As Integer = 1 To Count
            RanHEX.Append(table.Substring(rnd.Next(0, table.Length), 1))
            RanHEX.Append(table.Substring(rnd.Next(0, table.Length), 1))
            If i <> Count Then
                RanHEX.Append(Seperator)
            End If
        Next

        Return RanHEX.ToString
    End Function

Abgelegt unter HEX, MAC, MAC Adresse, MAC-Adresse, Zufall, random.

2 Kommentare zum Snippet

Alois T. schrieb am 19.11.2007:
Why is it votoed so bad? With a little Modification it´s working really great
Firendeath schrieb am 04.08.2010:
Das .ToString bei den beiden Returns brauchst du nicht ;)
Geht auch einfach so:

...
Return RenHEX
...
 

Logge dich ein, um hier zu kommentieren!