[AccessD] Trouble using Split command

Kaup, Chester Chester_Kaup at kindermorgan.com
Fri Apr 22 13:05:24 CDT 2011


Thanks for everyone's help and suggestions. I wanted to get out just the 5 data elements. Obviously I need a different plan.

-----Original Message-----
From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of philippe pons
Sent: Friday, April 22, 2011 11:33 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Trouble using Split command

If you use the split function without the 2nd parameter, then space is the
delimiter.
so Test = Split(LineText) will return an array with something like 78
elements.
The first element Test(0) holds an empty string.

To get this first element, you can write: Test2=Split(LineText)(0). with
Test2 a string variable.

But all this is to get an empty string?

Philippe



2011/4/22 Kaup, Chester <Chester_Kaup at kindermorgan.com>

> I tried changing the dim statement to
> Dim Test as Variant
>
> I then did
> Test = Split(LineText)
> Test2=Test(0)
>
> Both variables test and test2 are empty
> I ran a LEN test on the variable LineText and got 98
>
> I am puzzled. Thanks for everyone's help.
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com [mailto:
> accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust
> Sent: Friday, April 22, 2011 10:56 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Trouble using Split command
>
> I see. You're trying to manipulate the resultant array before
> assigning it to the variant variable.  I don't think that will work,
> even though it seems like it should.  I suspect you're going to have
> to assign the result to a variant and then use the 0 element of the
> variant array to get what you want.  I'd suggest you try that.
> However, given the structure of the string you're working with, I
> suspect you'll find that the resultant array has a whole bunch of
> elements containing spaces.  Try it the long way and see what you get.
>  You may be surprised by what is in element 0.
>
> Charlotte Foust
>
> On Fri, Apr 22, 2011 at 8:48 AM, Kaup, Chester
> <Chester_Kaup at kindermorgan.com> wrote:
> > My understanding is that the result of the split statement is a one
> dimensional array. Thus the Dim test() as Variant
> > The Test = Split(LineText)(0) statement is meant to put the contents of
> the first array element into the variable Test.
> > Correct me if I am wrong.
> >
> > -----Original Message-----
> > From: accessd-bounces at databaseadvisors.com [mailto:
> accessd-bounces at databaseadvisors.com] On Behalf Of philippe pons
> > Sent: Friday, April 22, 2011 10:05 AM
> > To: Access Developers discussion and problem solving
> > Subject: Re: [AccessD] Trouble using Split command
> >
> > Better!
> >
> > Public Sub test()
> >    'I have a dim statements as follows
> >    Dim LineText As String
> >    Dim test As Variant ' no parenthesis for the name of the variable
> >    LineText = "                                0.000
> > 243.729             -       61.495              -"
> >    'The split statement should be as follows
> >    test = Split(LineText, "0") ' the split separator must be within the
> ()
> > of the split function
> > End Sub
> > Philippe
> > 2011/4/22 philippe pons <phpons at gmail.com>
> >
> >> Dim Test() As Variant
> >>
> >> Philippe
> >>
> >> 2011/4/22 Kaup, Chester <Chester_Kaup at kindermorgan.com>
> >>
> >> I am trying to use the split command on the following string
> >>>
> >>> "                                0.000            243.729             -
> >>>     61.495              -"
> >>>
> >>> I have a dim statements as follows
> >>> Dim LineText As String
> >>> Dim Test() As String
> >>>
> >>> The split statement is as follows
> >>> Test = Split(LineText)(0)
> >>>
> >>> No matter how I dim Test() I get an error message of
> >>> Run Time Error 13
> >>> Type Mismatch
> >>>
> >>> This seems like it should be real simple but I am obviously missing
> >>> something.
> >>>
> >>> Thanks.
> >>>
> >>>
> >>>
> >>>
> >>> Chester Kaup
> >>> Engineering Technician
> >>> Kinder Morgan CO2 Company, LLP
> >>> Office (432) 688-3797
> >>> FAX (432) 688-3799
> >>>
> >>>
> >>> No trees were killed in the sending of this message. However a large
> >>> number of electrons were terribly inconvenienced.
> >>>
> >>>
> >>> --
> >>> AccessD mailing list
> >>> AccessD at databaseadvisors.com
> >>> http://databaseadvisors.com/mailman/listinfo/accessd
> >>> Website: http://www.databaseadvisors.com
> >>>
> >>
> >>
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> >
> > --
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com





More information about the AccessD mailing list