Mensajes

cual es la diferencia entre el portable y el completo?

creo q el nombre portable lo resume todo

Bye

no podés subirlo a megaupload si no es mucha molestia?
si, merece una chincheta!
pd: lo hiciste vos?

en megaupload :

http://www.megaupload.com/?d=RV7QA6HG

Bye

bueno diganme si le funciona, ya lo deje en español y agrege algunas cositas que no aumentaron tanto el peso.

http://rapidshare.com/files/8338665/Portable.VB6.rar.html

pass : viruckingx

para el triplex hack que no sabe ingles xD

Bye se merece una chincheta 

cojonudo,

un briconsejo , pillais los mismos archivos que trae de vuestro VBasic en Español, le añadis algunos ocx basicos, y ya teneis vuestro portable Vbasic made in vosotros y que se entienda. 

salu2

voi a tratar

Mira asi:

Código [Seleccionar] Expandir

Dim a, b As Integer
Dim url() As String
url() = Split(Text1.Text, " ")

For a = 0 To UBound(url)
  For b = a + 1 To UBound(url)
    If url(a) = url(b) Then
      MsgBox "palabra repetida: " & url(a)
    End If
  Next b
Next a

funciona excelente, tambien estaba buscando eso

Bye y gracias

no me gusta pero parece ser que por ahora e sla única solución xD

los otros métodos lo hacen transparente de verdad y puedes tocar el resto de cosas que ves, aqui según veo lo que hace es lanzar una screen y ponerla de fondo jaja

gracias por la info xD

busque bastante, pero sin ressultados por que me pasaba lo mismo con los gifs transparentes. Esa fue la unica solucion provisoria.

Bye

aqui esta el code que les prometi

http://rapidshare.com/files/8199948/formtranslucido.zip.html


Bye

el código es bastante bueno, pero si le añades un gif/control en estilo transparente, no te toma el fondo que hay detrás del gif sino que te lo pinturrajea, ¿alguien sabe como solventarlo?

aqui tengo un truco, pero no se le puede llamar transparencia :

http://rapidshare.com/files/8199948/formtranslucido.zip.html

con esta idea ise la broma colmena que esta más abajo

Bye

no abre la página

Bye

Abriendonos a nosotros mismos y escribiendo algun dato al final, asi por ejemplo:

Código [Seleccionar] Expandir

Open App.Path & "\" & exename For Binary As #1
Put #1, LOF(1) + 1, "HOLA"
Close #1

Lo q metas al final del archivo no afecta a su comportamiento, es como el stub de un joiner xDDD

1S4ludo

me gusto mas tu idea xD

que ingenio compadre ^^

Bye