how to put one string value into array using vb.net

Public Shared Function ToStrArray(ByVal value As String) As String()
    Dim result As String() = New String(value.Length - 1) {}
    For i As Integer = 0 To value.Length - 1
        result(i) = New String(value(i), 1)
    Next
    Return result
End Function

Example:

Dim strArray() as string = ToStrArray("sample")

<pre lang="vb">

here is another solution
string txt = null;
string[] strArray = new string [6];
txt = "sample";

for (int i = 0; i <txt.length;> {
strArray[i] = txt.ToString().Substring(i,1);
}
//after storing you will get result as it is
//like
for (int i = 0; i < strArray.Length; i++)
{
Console.WriteLine(strArray[i].ToString());
}