The first example is an IPv4 address. Because IPv4 is only 32 bits long there are only about 4 billion addresses available. To expand the address space IPv6 came into existence and your second example is an IPv6 address.
Answer:
That you have just wasted your time typing up a seemingly random number sequence.
It tells u what kind of file it is and also if it were to have two extensions it would interfere and cause it not to work
Solution :
Public Function Is a Leap_Year(Year As_Integer) As Integer
'Dim Tor_F for local variable declaring if value is t/f.
Dim TorF As For Boolean
'Pre conditions: Year > 1581 and Year < 3000
If Year > 1581 And Year <> 1700 Or 1800 Or 1900 Then
IsLeapYear = Year / 4
Else
IsLeapYear = False
TorF = False
End If
End Function