Есть ли ограничение на количество переменных в программе

 Dim g, g1, g2 As Integer   'они используются для увеличение размерности массивов в -"RascheteABC"
    Dim ppp As Integer  'переменная в поле количество чтобы автоматически увелич при нажатии кнопки
    Dim a As Integer
    Dim a1(), a2(), a3(), a4(), a5(), a6(), a7(), a8(), a9() As Integer
    Dim v1(), v2(), v3(), v4(), v5(), v6(), v7(), v8(), v9() As Integer
    Dim Ax(,) As Integer
    Dim Bx(), Bx1(), Bx2(), Bx3() As Integer
    Dim B19(), a19, v19 As Integer    'этот массив для кнопки 19 для ввода в массив найденных остатков из таблицы 2-остатки представление
    Dim Achik(), Achik1() As Integer
    Dim aa As Integer
    Dim chik As Integer = 1
    Dim y1, y2, y3, y4, y5, y6 As Integer
    Dim x As Integer
    Dim Xmax, XmaxW As Integer  'Xmax- это длинна массива, XmaxW- это кол-во элементов в массиве
    Dim aaa As Integer = 1
    Dim MX As Integer   '--это переменная для вычисления максимальной длинны массива по "Y" чтобы знать сколько забивать нолей
    Dim xxx As String
    Dim TT() As Integer    'это массив для ввода в него всех остатков из таблицы остатки
    Dim KolichestvoWWW1(), KolichestvoWWW2a(), KolichestvoWWW2x(), KolichestvoWWW3a(), KolichestvoWWW3x(), KolichestvoWWW3c() As Integer
    
    Dim mda As New SqlClient.SqlDataAdapter()
    Dim mds As New DataSet()
    Dim masX() As Integer
    Dim Zagotovka As Integer
 
    Private Property kolvo As String
Module Module1
 
    Public ZagZ1(), ZagZ2(), ZagZ3() As Integer 'это массивы для хранения размера заготовок для которых делается расчет
    Public ZagZ11(), ZagZ22(), ZagZ33() As Integer
    Public ZagZ111(), ZagZ222(), ZagZ333() As Integer 'здесь хранится разность (длинна отхода)
    Public aa11(), aa22(), aa33(), xx22(), xx33(), cc33() As Integer  'это массивы для хранения второй размерности массива (a,b),(x,y),(c,d)
    Public bb1(), bb2(), bb3(), yy2(), yy3(), dd3() As Integer  'это массивы для хранения второй размерности массива (a,b),(x,y),(c,d)
    Public RazmerWWW1(), RazmerWWW2a(), RazmerWWW2x(), RazmerWWW3a(), RazmerWWW3x(), RazmerWWW3c() As Integer
    Public RazWWW1()
    Public chik111, chik222, chik333, chik444, chik555, chik666 As Integer
    Public chikXXX As Integer
    Public nn1 As Integer = 0 'это переменные для чтобы знать какие пары заготовок задействованы в расчетах
    Public nn2 As Integer = 0
    Public nn3 As Integer = 0
    Public ch As Integer    'это для сопоставления самаой редко встречаемой заготовкой и конкриеным размером например "aa1"
    Public ch0, ch1, ch2, ch3, ch4, ch5 As Integer
    Public jj1, jj2, jj3 As Integer  'им присваивается данные из aa1, aa2, aa3, xx1 и т.д
    Public konec_rascheta As Integer 'она показывает если данаая заготовка уже нарезана то выйти из проверки
    Public Chik1, Chik2, Chik3, Chik4, Chik5, Chik6 As Integer   'Это счетчик для выяснения минимального кол-ва вариантов
    Public Razmer() As Integer
    Public TTKolvo() As Integer  'это массив для ввода в него всех "кол-ств" из таблицы остатки
    Public Kolichestvo() As Integer  'это кол-во введенное в - "Tекстбокс-10" нужное кол-во заготовок
    Public kolvo0, kolvo1, kolvo2, kolvo3 As Integer ' kolvo4, kolvo5 --это для манипуляций с подсчетом заготовок
    Public chickk(5) As Integer