Autor
|
Tema: Digan si saben que lenguaje es este , no es ni c ni c++ (Leído 2,850 veces)
|
r7pyrred
Desconectado
Mensajes: 52
|
Aquí va , el parámetro es 7 pero donde se usa¿? Decrypter.Text = ""
For i = 1 To Len(Text2) s = Mid(Text2, i, 1) Decrypter = Decrypter + Chr(Asc(s) Xor 88) Es para desenriptar un string digan porfa si saben
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Por lo que veo es una porción de una función en VB6, aunque funcionaría también en VB.NET
Saludos
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD "Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein
|
|
|
r7pyrred
Desconectado
Mensajes: 52
|
pero a ver como se codea , un form con dos textbox, y decrypter qu es , en fin alguien da un code porfa
|
|
|
En línea
|
|
|
|
$Edu$
Desconectado
Mensajes: 1.842
|
pero a ver como se codea , un form con dos textbox, y decrypter qu es , en fin alguien da un code porfa
Jajajajaja xD
|
|
|
En línea
|
|
|
|
alister
Desconectado
Mensajes: 513
|
pero a ver como se codea , un form con dos textbox, y decrypter qu es , en fin alguien da un code porfa
estamos locos o que? </trolling xD>
|
|
|
En línea
|
Back 2 business!
|
|
|
Eleкtro
Ex-Staff
Desconectado
Mensajes: 9.817
|
Estás demasiado verde... "Decrypter" es una variable que se llama así. pero a ver como se codea , un form con dos textbox, La coma en medio me confunde, ¿Eso es una pregunta? xD Así se hace en VB.NET, no sé si en VB6 funcionará: Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim TB1 As New TextBox, TB2 As New TextBox TB1.Text = "TextBox1" : TB2.Text = "TextBox2" TB1.Location = New Point(10, 25) : TB2.Location = New Point(10, 50) Me.Controls.Add(TB1) Me.Controls.Add(TB2) End Sub End Class
Saludos...
|
|
« Última modificación: 21 Enero 2013, 05:57 am por EleKtro H@cker »
|
En línea
|
|
|
|
alister
Desconectado
Mensajes: 513
|
Estás demasiado verde... "Decrypter" es una variable que se llama así. La coma en medio me confunde, ¿Eso es una pregunta? xD Así se hace en VB.NET, no sé si en VB6 funcionará: Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim TB1 As New TextBox, TB2 As New TextBox TB1.Text = "TextBox1" : TB2.Text = "TextBox2" TB1.Location = New Point(10, 25) : TB2.Location = New Point(10, 50) Me.Controls.Add(TB1) Me.Controls.Add(TB2) End Sub End Class
Saludos... tengo que admitir que tu esfuerzo es admirable. pero ten cuidado porque a veces puedes acabar tratando de buscar la logica a algo que nunca la tuvo, y picando pedazos de código que el demandante apenas comprendo y mucho menos va a utilizar xD
|
|
|
En línea
|
Back 2 business!
|
|
|
|
|
|