VB.Net by API/System/Short

Short.MaxValue

  

public class Test
   public Shared Sub Main
               Dim sNum As Short
               Console.WriteLine("Short: " & sNum.MinValue & " to " & sNum.MaxValue)
   End Sub
End class

Short.MinValue

  

public class Test
   public Shared Sub Main
               Dim sNum As Short
               Console.WriteLine("Short: " & sNum.MinValue & " to " & sNum.MaxValue)
   End Sub
End class