Cast Oject to String Array

  • Thread starter Thread starter SAL
  • Start date Start date
S

SAL

Is it possible to Cast an Object to a String Array the way I'm doing it in
the code below? I'm trying to reuse code I have without creating new code if
I can.

Dim asNames() As String
Dim asValues() As String
Dim sKeyPairValues As String = String.Empty

Dim oNames Object
Dim oValues Object

Dim asDelims() As Char = {","}

asNames = oNames.ToString.Split(asDelims)
asValues = oValues.ToString.Split(asDelims)

For i = 0 To asNames.Length - 1
Try
sKeyPairValues += asNames(i).ToUpper & "=" & asValues(i) &
"; "
Catch ex As Exception
TraceUtil.WriteError(ex)
End Try
Next

Thanks
 
SAL said:
Is it possible to Cast an Object to a String Array the way I'm doing it in
the code below? I'm trying to reuse code I have without creating new code
if
I can.

Dim asNames() As String
Dim asValues() As String
Dim sKeyPairValues As String = String.Empty

Dim oNames Object
Dim oValues Object
Click to expand...

Note that you never assign a value to the two variables above.
Dim asDelims() As Char = {","}

asNames = oNames.ToString.Split(asDelims)
asValues = oValues.ToString.Split(asDelims)

For i = 0 To asNames.Length - 1
Try
sKeyPairValues += asNames(i).ToUpper & "=" & asValues(i) &
"; "
Catch ex As Exception
TraceUtil.WriteError(ex)
End Try
Next
Click to expand...

I do not see any casting code.
 
SAL said:
Is it possible to Cast an Object to a String Array the way I'm doing
it in the code below?
Click to expand...

I don't see any cast in your code. Where do you fill oNames and oValues?
I'm trying to reuse code I have without
creating new code if I can.

Dim asNames() As String
Dim asValues() As String
Dim sKeyPairValues As String = String.Empty

Dim oNames Object
Dim oValues Object

Dim asDelims() As Char = {","}

asNames = oNames.ToString.Split(asDelims)
asValues = oValues.ToString.Split(asDelims)

For i = 0 To asNames.Length - 1
Try
sKeyPairValues += asNames(i).ToUpper & "=" &
asValues(i) & "; "
Catch ex As Exception
TraceUtil.WriteError(ex)
End Try
Next
Click to expand...


Armin
 
I was only showing the code as an example. My actual code passes oNames,
oValues into my function instead of of DIM it.
 
SAL said:
I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.
Click to expand...

What will oNames/oValues contain?
Strings => oNames.ToString
Array of Strings => directcast(oNames, string())


Armin
 
Herfried K. Wagner said:
=> 'DirectCast(oNames, String)'.
Click to expand...

ToString is faster because it just returns "Me" (inside ToString). No
casting/internal type checking necessary.
Other objects:

=> 'oNames.ToString()'.
Click to expand...

You mean, other than Object? (I ask because oNames is 'Object')


Armin
 
Armin Zingler said:
ToString is faster because it just returns "Me" (inside ToString). No
casting/internal type checking necessary.
Click to expand...

'DirectCast' won't call any method whereas calling 'ToString' involves a
virutal method call. Well, I just think that 'DirectCast' is semantically
more correct because the 'Object' variable already contains a 'String'
object.
You mean, other than Object? (I ask because oNames is 'Object')
Click to expand...

Objects whose type is neither 'String' nor 'String()'.
 
Herfried K. Wagner said:
'DirectCast' won't call any method whereas calling 'ToString'
involves a virutal method call. Well, I just think that
'DirectCast' is semantically more correct because the 'Object'
variable already contains a 'String' object.
Click to expand...

Yes, but with ToString no casting has to be done. Ok, both is
possible. :-) I currently can't test it again (IIRC ToString was
faster) but I will ASAP.


Armin
 
Back
Top