Para la base de datos uso MySQL, pero el caso es que el juego me produce un error que no deja depurar, simplemente aparece el cartel que dice "No Enviar" y algunas veces me lanza un error en uno de los modulos referente a que las variables static no pueden ser mayores de 64k, me imagine que alguna de las variables del juego lanza ese error. El UDT tiene 18 variables string y declaro ese udt como dinamico y cuando se carga el juego llega al tamaño de UDT(1 to 4249). Supuse que para que mostrara el error de no enviar tenia que ser algo que no se descargaba bien o alguna saturacion en la memoria, sin embargo aun no doy con el problema :S

Bueno solo tengo esa duda, saber si los UDTs tienen un tamaño limite cuando son parte de un array.

ejemplo:

Type tOnlineUserList
 
    uNickName           As String
    uLevel              As String
 
End Type
 
Dim UserList(30000) as tOnlineUserList ' Tienen limite?
 

Dudo que un AV detecte la funcion Split con virus..., mas bien creo que lo qe detecta como virus es cuando abres el exe y lo guardas en la variable...

Interesante tema, no sabia eso O_O

Combo1_KeyPress () ?

Segui el consejo de BlackZeroX y creo que di con el problema, busque donde se descargaba el skin que usa el control pero en ningun lado se libera el DC "hDCSkin" asi que inclui esto en el usercontrol y ahora si deja cargar todos los controles que se quiera sin saturar la memoria:

Private Sub UserControl_Terminate()
 
    Call DeleteDC(hDCSkin)
 
End Sub

Algo asi me imagine, por eso aun no doy con el problema o.o

Buenas, necesito un poco de ayuda. He detectado que este control tiene un error grave:

http://www.recursosvisualbasic.com.ar/htm/ocx-componentes-activex-dll/214-boton-checkbox-optionbutton-con-skin.htm

Lo que sucede es que cuando el control es cargado y descargado de la memoria muchas veces, visual basic manda un error de Memoria Insuficiente, he probado varios usercontrols de botones pero ninguno manda el error como lo hace este. Lo primero que imagine fue que el control creba un DC que luego no liberaba pero creo que ese no es el problema.

Bueno a ver si pueden ayudarme a encontrar el error.

Adjunto un archivo con la prueba que hize: http://nova-digital.net/prueba.rar

Public Function StrBetween(Cadena As String, SubCadena1 As String, Subcadena2 As String) As String
 
    Dim Pos1 As Integer, Pos2 As Integer
 
    Pos1 = InStr(UCase(Cadena), UCase(SubCadena1)) + 1
    Pos2 = InStr(UCase(Cadena), UCase(Subcadena2))
 
    If Pos1 <> 0 And Pos2 <> 0 Then
 
        StrBetween = Mid$(Cadena, Pos1, Pos2 - Pos1)
 
    End If
 
End Function
 
Private Sub Form_Load()
 
    Dim ASd  As String
    Dim Asd2 As String
 
    ASd = "aitheoiethi[BLABLABLAkjhuihui]taihoithaoihtoea"
    Asd2 = StrBetween(ASd, "[", "]")
 
    MsgBox Asd2
 
End Sub

Por hay tambien hay una funcion que hizo Psyke1, espero que te sirva...

No, en vb6 no hay forma o yo no la encontre por lo menos

Y si se puede en .net como seria, con simples bucles o con Threads?