<script runat="server">

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

Dim x1, x2, x3, x4 As Integer

x1 = Int(Rnd() * 100)

x2 = Int(Rnd() * 100)

x3 = Int(Rnd() * 100)

x4 = Int(Rnd() * 100)

While x2 = x1

x2 = Int(Rnd() * 100)

End While

While x3 = x2 Or x3 = x1

x3 = Int(Rnd() * 100)

End While

While x4 = x3 Or x4 = x2 Or x4 = x1

x4 = Int(Rnd() * 100)

End While

LinkButton1.Text = x1

LinkButton2.Text = x2

LinkButton3.Text = x3

LinkButton4.Text = x4

End Sub

Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs)

If x1 > x2 Or x1 > x3 Or x1 > x4 Then

Label1.Text = "true"

Else

Label1.Text = "false"

End If

End Sub

</script>

سلام