[RESOLVED] String Array

[Gunner54]

Dim Out() As String
Out() = Split(File, "\/\/")

Out(1) now contains the data i want, I want to put Out(1) into an Array()

Dim Out() As String
Dim EFile() As String
Out() = Split(File, "\/\/")
EFile() = Out(1) '<- I need to know how to do this (o.o)

[MartinLiss]

Dim Out() As String
Dim EFile(6) As String ' or any other number
Out() = Split(File, "\/\/")
EFile(0) = Out(1) '<- I need to know how to do this (o.o)

[LaVolpe]

When Out() returned from Split() is became a populated array in itself. Are you saying that Out(1) has delimited data that you want to put in yet another array? If so... EFile() = Split(Out(1), [delimiter]). Supply the delimiter

[RhinoBull]

Each element in array of strings is simply a String unless instructed otherwise.
In your case it is a string so EFile should not be defined as array:

Private Sub Command1_Click()
Dim Out() As String
Dim EFile As String

    Out() = Split("abc\/\/123", "\/\/")
    EFile = Out(1)
    
    Debug.Print EFile 'it should contain "123"

End Sub

[Gunner54]

ehmm... is their a StringToByteArray function?

[MartinLiss]

What exactly are you trying to do?

[LaVolpe]

Try: EFile() = StrConv(Out(1), vbFromUnicode)

Edited: Definitely answer MartinLiss' question, so we can stop guessing.

[Gunner54]

Im writing an encryptor. It its using strings etc... i want to make the encryption now using Xor but things arn't going to plan as i doubt you can Xor a string and turn it into a Byte Array?

Is their a way to convert a string into a byte then back from byte to string?

Maby just Xor the string and then convert to byte?

[DigiRev]

Look at Lavolpe's post, use the StrConv() function.