https://bugs.winehq.org/show_bug.cgi?id=38505
--- Comment #1 from joluinfante joluinfante@gmail.com --- I can’t to modify the vb code (it is a tax program from argentina) The code running (decompiled with vbdecompiler) is:
Private Sub MnuArchivo_Salir_Click() '4F2994 'Data Table: 42B278 Dim var_88 As Long loc_4F293C: If (Me.global.Forms.Count > 3) Then loc_4F2960: MsgBox("Aún existen formularios activos. Para poder cerrar la aplicación debe cerrar los formularios abiertos.", &H40, "Salida del Sisitema", var_EC, var_10C) loc_4F2975: var_88 = 1 loc_4F297B: Else loc_4F2988: Me.global.Unload Me loc_4F2990: End loc_4F2992: End If loc_4F2992: Exit Sub End Sub