Frage : vb.net-Zählimpuls-IP-Strecke

hallo dort, möchte
I die Strecken IP zum Beispiel des

127.0.0.1 zählen - 127.0.0.20

to geben mich total. wie kann ich den tun?

Antwort : vb.net-Zählimpuls-IP-Strecke

Ist hier, wie ich tue es…   Conver I die „Viererkabelpunkt“ Darstellung in eine 64-bit lange ganze Zahl.   Nach dem ist es recht einfach, die zwei Zahlen gerade zu subtrahieren, um zu sehen, wieviele Adressen dort zwischen dem Anfang und der Ende IP addressstrecke sind:

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
6:
37:
38:

    'VB.Net stützt nicht eine Anschlussart, aber es erlaubt Sie zu 
    'eine Struktur „verzieren“, um die gleiche Sache zu vollenden
     _
    Private Struktur IP_Parts
         Adresse als Int64 verdunkeln
         Als Byte nach rechts verdunkeln
         middleRight als Byte verdunkeln
         middleLeft als Byte verdunkeln
         Als Byte nach links verdunkeln
    Struktur beenden

    Private geteilte Funktion IPStrToLong (ByVal IPstr als Schnur) als lang
        Schwaches IP als IP address
        Schwache Teile als IP_Parts
        Schwaches buf () als Schnur

        IP = [IP address]. Kein
        Wenn nicht [IP address] .TryParse (IPstr, IP) dann
            Rückkehr 0
        Beenden wenn

        'Das IPAddress.Address Eigentum „herabgesetzt worden“, aber wir noch noch
        'eine Weise benötigen, ein IPv4 „Viererkabelpunkt“ nach und von einem langen so gerade umzuwandeln,
        'den Kompilator glücklich halten, wir verwenden dieses Programm

        buf = ip.ToString.Split („. „c)
        Wenn buf. Länge <> 4 dann
            'Traurig, stützen wir Darstellung nicht IPv6
            Rückkehr 0
        Beenden wenn

        Teile. Recht = CByte (buf (3))
        parts.middleRight = CByte (buf (2))
        parts.middleLeft = CByte (buf (1))
        Teile. Links = CByte (buf (0))

        Rückholparts.address
    Enden-Funktion
Weitere Lösungen  
 
programming4us programming4us