Cast Oject to String Array

[=?Utf-8?B?U0FM?=]

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

[Herfried K. Wagner [MVP]]

"SAL" <SA*@discussions.microsoft.comschrieb:

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

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

I do not see any casting code.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Armin Zingler]

"SAL" <SA*@discussions.microsoft.comschrieb

Is it possible to Cast an Object to a String Array the way I'm doing
it in the code below?

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

Armin

[=?Utf-8?B?U0FM?=]

I was only showing the code as an example. My actual code passes oNames,
oValues into my function instead of of DIM it.

"Armin Zingler" wrote:

"SAL" <SA*@discussions.microsoft.comschrieb

Is it possible to Cast an Object to a String Array the way I'm doing
it in the code below?

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

Armin

[Armin Zingler]

"SAL" <SA*@discussions.microsoft.comschrieb

I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.

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

[Herfried K. Wagner [MVP]]

"Armin Zingler" <az*******@freenet.deschrieb:

>I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.

What will oNames/oValues contain?
Strings =oNames.ToString

='DirectCast(oNames, String)'.

Array of Strings =directcast(oNames, string())

Other objects:

='oNames.ToString()'.
--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[=?Utf-8?B?U0FM?=]

Thanks guys. I got it fixed.

"Herfried K. Wagner [MVP]" wrote:

"Armin Zingler" <az*******@freenet.deschrieb:

I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.

What will oNames/oValues contain?
Strings =oNames.ToString

='DirectCast(oNames, String)'.

Array of Strings =directcast(oNames, string())

Other objects:

='oNames.ToString()'.
--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Armin Zingler]

"Herfried K. Wagner [MVP]" <hi***************@gmx.atschrieb

"Armin Zingler" <az*******@freenet.deschrieb:

>>I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.

What will oNames/oValues contain? Strings =oNames.ToString

='DirectCast(oNames, String)'.

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

>Array of Strings =directcast(oNames, string())

Other objects:

='oNames.ToString()'.

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

[Herfried K. Wagner [MVP]]

"Armin Zingler" <az*******@freenet.deschrieb:

>>>I was only showing the code as an example. My actual code passes
oNames, oValues into my function instead of of DIM it.

What will oNames/oValues contain? Strings =oNames.ToString

='DirectCast(oNames, String)'.

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

'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.

>>Array of Strings =directcast(oNames, string())

Other objects:

='oNames.ToString()'.

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

Objects whose type is neither 'String' nor 'String()'.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Armin Zingler]

"Herfried K. Wagner [MVP]" <hi***************@gmx.atschrieb

"Armin Zingler" <az*******@freenet.deschrieb:

I was only showing the code as an example. My actual code
passes oNames, oValues into my function instead of of DIM
it.

What will oNames/oValues contain? Strings =oNames.ToString
>
='DirectCast(oNames, String)'.

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

'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.

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