SoloCodigo

Dim num(4) As Decimal


        num(0) = Val(TextBox1.Text)
        num(1) = Val(TextBox2.Text)
        num(2) = Val(TextBox3.Text)
        num(3) = Val(TextBox4.Text)

        if num (0)= "" then
textbox1.text=1 algoasi pero nose como
        '  If num(2) > num(1) Then
        TextBox5.Text = num(0) * num(3) * (num(2) / num(1))

quiero escribirle condicion de cuando es vacio algun dato y q se transforme en 1 y solo me anda de 1 manera q sea cruzado de otra manera no me anda porq no tiene control preciso ayuda en eso , por ej si num 0 es menor a num 1 lo divide y yoquiero q divida el mayor por el menor nose si me explico