.NET Fiddle

VbNet · Console

/Program.vb

Imports System
Imports System.Linq
				
Public Module Module1
	Public Sub Main()
		Test("", "asd", "def")
		Test("111", "asd", "def")
	End Sub
	
	Public Sub Test(val1 as string, val2 as string, val3 as string)
		If { val1, val2, val3 }.Any(Function(x) String.IsNullOrEmpty(x)) Then
			Console.WriteLine("Hay un String Vacio")
		Else		
				Console.WriteLine("No Hay Ningun String Vacio")
		End If
	End Sub
End Module