string array to variant array

Question

2.50/5 (2 votes)

See more:

VB

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim a() As VariantType
            Dim di As New DirectoryInfo(TextBox1.Text)
            Dim diar1 As FileInfo() = di.GetFiles()
            Dim dra As FileInfo
            Dim i As Integer
            i = 0
            For Each dra In diar1
                a(i) = dra.FullName.ToString
                i = i + 1
            Next
     End Sub

Convert strings to variant array.in above code i have declare "a" as VariantType.
How to store array of string in variant array?

Posted 29-Apr-13 0:34am

Nikhil Dayalpawar

Updated 29-Apr-13 2:52am

Kenneth Haugland

v5

Add a Solution

Comments

Sergey Alexandrovich Kryukov 29-Apr-13 8:43am

Why? why?!
—SA

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Kenneth Haugland · Answer 1 · 2013-04-29T01:31:00

Solution 1

I dont understand why you want to do this, however this is how:

VB

Module Module1
    Sub Main()
    ' Integer.
    Dim value As Integer = 5

    ' Get VarType.
    Dim type As VariantType = VarType(value)

    ' Write string representation.
    Console.WriteLine(type.ToString())

    ' Show GetType method.
    Console.WriteLine(value.GetType().ToString())

    ' You can check the VariantType against constants.
    If type = VariantType.Integer Then
        Console.WriteLine("It's an integer!")
    End If
    End Sub
End Module

http://www.dotnetperls.com/vartype[^]

Posted 29-Apr-13 1:31am

Kenneth Haugland

Updated 29-Apr-13 2:54am

v3

Comments

[no name] 29-Apr-13 7:55am

i have to convert
string array to variant array in VB.Nt

[no name] 29-Apr-13 8:03am

Why? What possible reason would you have to convert a string to a variant at all, assuming that VB.NET supported the variant data type at all? http://en.wikipedia.org/wiki/Variant_type

Sergey Alexandrovich Kryukov 29-Apr-13 8:45am

Agree. And I think variant types was one of those big stupidities with haunted the whole industry. Variants are evil, it's the best to avoid them, even with COM.
—SA

Sergey Alexandrovich Kryukov 29-Apr-13 8:43am

My 5.
—SA

Kenneth Haugland 29-Apr-13 8:53am

Thanks, althouygh I dont see it ;-)

Sergey Alexandrovich Kryukov 29-Apr-13 9:29am

I forgot it, voted now; sorry for the inconvenience. Thank you for the note; please don't hesitate to remind, as such things happen.
—SA

Maciej Los 29-Apr-13 9:18am

+5

Maciej Los · Answer 2 · 2013-04-29T03:25:00

Solution 2

Rather than string array use List(of T)[^] generic class, which represents a strongly typed list of objects that can be accessed by index; provides methods to search, sort, and manipulate lists.

VB

Dim files As New List(Of String)

'inside loop
files.Add(dra.FullName)

Posted 29-Apr-13 3:25am

Maciej Los

Comments

Kenneth Haugland 29-Apr-13 9:54am

Jupp, %'ed. That would be my take as well.

Maciej Los 29-Apr-13 10:47am

Thank you ;)