Mathクラスにはユークリッド距離/直角三角形の斜辺の長さを求めるhypot関数のようなメソッドは用意されていないため、Powメソッド・Sqrtメソッドを組み合わせて計算する必要があります。

Math.Powメソッド・Math.Sqrtメソッドを組み合わせてユークリッド距離(hypot)を求める
Imports System

Class Sample
  Shared Sub Main()
    Dim a As Double = 3
    Dim b As double = 4

    Console.WriteLine("hypot({0}, {1}) = {2}", a, b, Math.Sqrt(Math.Pow(a, 2.0) + Math.Pow(b, 2.0)))
  End Sub
End Class
実行結果
hypot(3, 4) = 5