Pero ese código fuente ya te lo reestructuré de forma completa, y este código fuente que ahora muestras no tiene nada que ver con el otro o al menos no lo parece, no tiene los mismos "errores" con Point y Size.

Aquí tienes, de mil nosecuantos errores de compilación te lo he dejado en unos 200, algo es algo:
http://www.mediafire.com/file/refb7gf660aqzsc/SISTEMA+SUPUESTO+CODIGO.zip

...el resto de referencias que quedan no se resolverlas, las que empiezan por "Me000.x" y tienen una cantidad variable de ceros ( en el código "reestructurado" les cambié el nombre por "Me._x" sin los ceros ), para eso habría que saber como trabaja el ofuscador con el que protejieron el code, o tomarse mucho tiempo en horas para ir revisando variable uno por uno de los casi 200... y eso ya no estoy dispuesto a hacerlo por tiempo, todo esto que ves "reestructurado" lo hice en 10 minutos.

En realidad la reestructuración del 90% del código es muy sencilla, son obviedades ("DateAndtime._get_Today()", "DateAndtime._get_TimeString()", etc, o métodos y variables cuyo nombre empiezan con un número, le añades un caracter válido al principio del nombre y lo arreglas), basta con hacerse una idea de como debería ser la sintaxis correcta y hacer unos cuantos reemplazamientos de string globales desde el propio Visual Studio, no hace falta nada más, pero esas referencias que empiezan por "Me0000000" no lo consigo descifrar.

Saludos.

Si arreglaste todo eso supongo que te lo puedo mirar en un rato... ¿es este enlace?: https://www.mediafire.com/file/4krh72s22i7ebt4/SISTEMA%20NO%20OBFUSCADO.zip

si ese supuesto codigo fuente lo conseguiste desensamblando un exe con alguna herramienta tipo dnspy,reflector, etc pone el exe y lo veo para sacar el ofuscador antes de ver el código fuente, sino es así, perdón por meterme.

Bueno, ya he analizado el "SISTEMA NO OFUSCADO". Si sigues al pie de la letra las siguientes indicaciones, arreglarás todos los errores de compilación y del diseñador de Forms.

---

Para arreglar los errores de compilación, estos son los reemplazamientos globales de texto en la clase Form1.vb que se debe hacer:

(primero el string original, abajo el reemplazamiento)


Y en la clase Cliente.vb

---

Para arreglar el error del diseñador de forms: "Duplicate declaration of member 'size'"

Dentro del método 'Initialize' de la clase 'Form1.vb', eliminas esta linea:

Y esto lo dejas así:

Y luego nos quedarán 555 errores de compilación en lineas como esta:

Basicamente tienes que ponerle el valor de la variable "size" correspondiente a cada linea:

Se puede automatizar la tarea de reemplazamiento con el siguiente código de una aplicación de consola:

Public Module Module1
 
    Public Sub Main()
 
        Dim filepath As String = "...\SISTEMA NO OBFUSCADO\LOTERIA\Form1.vb"
        Dim sb As New StringBuilder()
        Dim size As String = String.Empty
        Dim control As String = String.Empty
        Dim lines As IEnumerable(Of String) = File.ReadLines(filepath, Encoding.Default)
 
        For Each line As String In lines
            If line.TrimStart().ToLower().StartsWith("size = new size") Then
                size = line.Substring(line.IndexOf("=") + 1).TrimStart() ' "New Size(width, height)"
                Continue For
            End If
 
            If line.TrimStart().ToLower().Contains(".size =") Then
                If Not String.IsNullOrEmpty(size) Then
                    control = line.Substring(0, line.LastIndexOf("=") + 1).TrimStart() ' "Me.ControlName.Size ="
                    Debug.WriteLine(control & size)
                    sb.AppendLine(control & size) ' "Me.ControlName.Size = New Size(width, height)"
                    size = String.Empty
                    control = String.Empty
                    Continue For
                End If
            End If
 
            sb.AppendLine(line)
        Next line
 
        File.WriteAllText(".\Form1_SizeFixed.vb", sb.ToString())
 
    End Sub
 
End Module

---

Para arreglar el error del diseñador de forms: "Duplicate declaration of member 'point'", el procedimiento es el mismo que con 'size'.

Dentro del método 'Initialize' de la clase 'Form1.vb', eliminas esta linea:

Y esto lo dejas así:

Y luego nos quedarán 555 errores de compilación en lineas como esta:

Basicamente tienes que ponerle el valor de la variable "point" correspondiente a cada linea:

Se puede automatizar la tarea de reemplazamiento con el siguiente código de una aplicación de consola:

Public Module Module1
 
    Public Sub Main()
 
        Dim filepath As String = "..\SISTEMA NO OBFUSCADO\LOTERIA\Form1.vb"
        Dim sb As New StringBuilder()
        Dim point As String = String.Empty
        Dim control As String = String.Empty
        Dim lines As IEnumerable(Of String) = File.ReadLines(filepath, Encoding.Default)
 
        For Each line As String In lines
            If line.TrimStart().ToLower().StartsWith("point = new point") Then
                point = line.Substring(line.IndexOf("=") + 1).TrimStart() ' "New Point(x, y)"
                Continue For
            End If
 
            If line.TrimStart().ToLower().Contains(".location =") Then
                If Not String.IsNullOrEmpty(point) Then
                    control = line.Substring(0, line.LastIndexOf("=") + 1).TrimStart() ' "Me.ControlName.Location ="
                    Debug.WriteLine(control & point)
                    sb.AppendLine(control & point) ' "Me.ControlName.Location = New Point(x, y)"
                    point = String.Empty
                    control = String.Empty
                    Continue For
                End If
            End If
 
            sb.AppendLine(line)
        Next line
 
        File.WriteAllText(".\Form1_PointFixed.vb", sb.ToString())
 
    End Sub
 
End Module

---

Para arreglar los errores del diseñador de forms: "The type 'System.Windows.Forms.Form' has no property named 'xxxxx'"

Tienes que hacer estos reemplazamientos de string SOLAMENTE en el bloque del método 'Initialize' de la clase 'Form1.vb':

Me.Button         -> Me._Button
Me.CheckBox       -> Me._CheckBox
Me.CheckedListBox -> Me._CheckedListBox
Me.ComboBox       -> Me._ComboBox
Me.DateTimePicker -> Me._DateTimePicker
Me.GroupBox       -> Me._GroupBox
Me.Label          -> Me._Label
Me.ListBox        -> Me._ListBox
Me.PrintDocument  -> Me._PrintDocument
Me.TextBox        -> Me._TextBox
Me.Timer          -> Me._Timer

...o dicho de otro modo: tienes que añadirle un guión bajo al principio del nombre de cada control.

---

Para arreglar el último error del diseñador de forms: "The variable 'manager' has no property is either undeclared or was never existed"

Simplemente elimina estas lineas dentro del método 'Initialize':


...Por que el icono de la aplicación supongo que te dará completamente igual arreglarlo o no...

Saludos.

Te lo dije aquí:

...ese "4" lo tienes que eliminar. El valor 4 = DateInterval.Day.

saludos