Интерполяция двух переменных(VisualBasic)

[Пьяный мастер]

Всем привет! Нужна помощь в написании программы. Для начала нужно создать массив. Этот массив должен заполняться числами по этой функции:z(x,y)=x^2*y+y^2*x, где x=от 1 до 10 с шагом 1, y=от 0 до 9 с шагом 1. Желательно вывести этот массив на форму. Далее нужно произвести интерполирование. Написал часть самой интерполяции, но не думаю, что корректно. Не пользовался VB со школьной скамьи, не представляю как это все реализовать.

Public Class Form1
    Dim aX() As Single, aY() As Single, N As Integer, M As Integer, A As Double, B As Double, ZA As Double, z(,) As Double

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim XA As Double, YA As Double, z1 As Double, z2 As Double, ZA As Double
        Dim i As Integer
        Dim j As Integer
        N = (TextBox3.Text)
        M = (TextBox12.Text)
        For i = 1 To N
            
            aX(i) = Val(TextBox4.Text)
            
      Next i
        For j = 1 To M
            aY(j) = (TextBox6.Text)
        Next j
        For i = 1 To N : For j = 1 To M
                z(i, j) = (TextBox8.Text)
            Next j
        Next i
        XA = (TextBox13.Text)
        YA = (TextBox14.Text)
        If XA < aX(1) Or XA > aX(N) Then GoTo 6
        If YA < aY(1) Or YA < aY(M) Then GoTo 6
        i = 2
2:      If XA <= aX(i) Then GoTo 3
        i = i + 1 : GoTo 2
3:      j = 2
4:      If YA <= aY(j) Then GoTo 5
        j = j + 1 : GoTo 4
5:      z1 = z(i - 1, j - 1) + (z(i, j - 1) - z(i - 1, j - 1)) * (XA - aX(i - 1)) / (aX(i) - aX(i - 1))
        z2 = z(i - 1, j) + (z(i, j) - z(i - 1, j)) * (XA - aX(i - 1)) / (aX(i) - aX(i - 1))
        ZA = z1 + (z2 - z1) * (YA - aY(j - 1)) / (aY(j) - aY(j - 1))
6:      TextBox2.Text = "Аргумент вне интервала интерполяции"
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        TextBox1.Text = ZA

    End Sub

End Class