在VB中，可以使用Math.Max函数来判断随机数的最大值。以下是一个示例代码：
Dim rand As New Random()
Dim num1 As Integer = rand.Next(1, 100)
Dim num2 As Integer = rand.Next(1, 100)
Dim maxNum As Integer = Math.Max(num1, num2)
Console.WriteLine("随机数1: " & num1)
Console.WriteLine("随机数2: " & num2)
Console.WriteLine("最大值: " & maxNum)
在上述示例中，rand.Next(1, 100)会生成一个1到100之间的随机数。然后，使用Math.Max函数比较两个随机数，将较大的值赋给maxNum变量。最后，使用Console.WriteLine函数输出最大值。
请注意，示例中的随机数范围是1到100，你可以根据需要修改范围。