crash outside control (Normal User)
Expert
Messaggi: 217
Iscritto: 12/02/2008
|
Si, allora...
Con questo programma vorrei creare una specie di password... Se puoi spiegarmi come fare te ne sarei molto grato, se non puoi o non vuoi, grazie lo stesso per l' interessamento...
|
|
gantonio (Normal User)
Guru^2
Messaggi: 1532
Iscritto: 09/09/2007
|
Postato originariamente da crash outside control:
Si, allora...
Con questo programma vorrei creare una specie di password... Se puoi spiegarmi come fare te ne sarei molto grato, se non puoi o non vuoi, grazie lo stesso per l' interessamento... |
Non e' che non posso o non voglio ... se mi dici come si dovrebbe riuscire ad inserire i codice ASCII di n caratteri in un intero ... essendo una cosa impossibile, o chiarisci come vuoi operare oppure non c'e' risposta ... |
|
crash outside control (Normal User)
Expert
Messaggi: 217
Iscritto: 12/02/2008
|
Quindi quello che vorrei fare non è possibile ?
Ok... lacierò perdere...
Grazie lo stasso a tutti.
|
|
gantonio (Normal User)
Guru^2
Messaggi: 1532
Iscritto: 09/09/2007
|
Se vuoi inserire i codici ASCII di n caratteri in un int32, ovviamente non e' possibile, ovvero, in un int32 ci stanno 4 byte e quindi il codice ASCII di 4 caratteri soltanto.
Se vuoi fare altro, allora spiegati perche', anche adesso, non ho capito cosa vuoi fare ...
|
|
crash outside control (Normal User)
Expert
Messaggi: 217
Iscritto: 12/02/2008
|
Io vorrei, trasformare una stringa in un numero, cioè tutti i caratteri trasformarli in numeri...
ad es.
ciao = 1234
però al posto di c = 1, i = 2, a = 3, o = 4 mettere il loro valore effettivo... cioè quando io voglio inserire un carattere ascii devo digitare alt + tastierinonumerico, io vorrei eliminare alt e mettere solo il numero...
E' possibile ? Grazie ancora
|
|
Il Totem (Admin)
Guru^2
Messaggi: 3635
Iscritto: 24/01/2006
|
Codice sorgente - presumibilmente VB.NET |
Dim Vals(TextBox1.Text.Length - 1) As Int32 For I As Int16 = 0 To TextBox1.Text.Length - 1 Vals(I) = Asc(TextBox1.Text(I)) Next
|
Vals contiene i codici ASCII corrispondenti ad ogni carattere nella textbox1.
|
|
crash outside control (Normal User)
Expert
Messaggi: 217
Iscritto: 12/02/2008
|
Postato originariamente da Il Totem:
Codice sorgente - presumibilmente VB.NET |
Dim Vals(TextBox1.Text.Length - 1) As Int32 For I As Int16 = 0 To TextBox1.Text.Length - 1 Vals(I) = Asc(TextBox1.Text(I)) Next
|
Vals contiene i codici ASCII corrispondenti ad ogni carattere nella textbox1. |
Grazie della risposta, però mi scrive solo :
System.Int32[]
il codice è il seguente :
Codice sorgente - presumibilmente VB.NET |
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Vals(TextBox1.Text.Length - 1) As Int32 For I As Int16 = 0 To TextBox1.Text.Length - 1 Vals(I) = Asc(TextBox1.Text(I)) Next Dim a As New IO.StreamWriter("c:\ciao.txt") a.Write(Vals) a.Close() End Sub End Class
|
Dove erro ? |
|
Il Totem (Admin)
Guru^2
Messaggi: 3635
Iscritto: 24/01/2006
|
Postato originariamente da crash outside control:
Postato originariamente da Il Totem:
Codice sorgente - presumibilmente VB.NET |
Dim Vals(TextBox1.Text.Length - 1) As Int32 For I As Int16 = 0 To TextBox1.Text.Length - 1 Vals(I) = Asc(TextBox1.Text(I)) Next
|
Vals contiene i codici ASCII corrispondenti ad ogni carattere nella textbox1. |
Grazie della risposta, però mi scrive solo :
System.Int32[]
il codice è il seguente :
Codice sorgente - presumibilmente VB.NET |
Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Vals(TextBox1.Text.Length - 1) As Int32 For I As Int16 = 0 To TextBox1.Text.Length - 1 Vals(I) = Asc(TextBox1.Text(I)) Next Dim a As New IO.StreamWriter("c:\ciao.txt") a.Write(Vals) a.Close() End Sub End Class
|
Dove erro ? |
Forse non l'avrai notato, ma Vals è un'array non un solo valore. Devi usare un For per scriverli tutti perchè WriteLine non se lo sogna mica. |
|