Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Oct 1, 1996

Filling a Structure Automatically

Question:
After a structure is defined with a "TYPE" declaration, do you know of a way to directly fill the structure with data, rather than individually assiging the elements, or reading from a file? I haven't seen any way in either the manuals, or in 4 different after market reference books that I have.

Answer:
Note: This answer came from the person who asked the question.

I used the code:

        TYPE StructType
                '/* setup stucture of type char */
                a AS STRING * 1
                b AS STRING * 1
                c AS STRING * 1
                d AS STRING * 1
        END TYPE

        DIM Structure as StructType

        '/* find the address of the first element */
        ptrData& = VARPTR(Structure)


        '/* then, if I know the structure elements size, */
        '/*         I can POKE data into them */

        Test$="1234"

        '/* place the ASCII representation of each char into structure */
        for i% = 1 to len(Structure)
                POKE i% + ptrStructure& - 1, ASC(MID$(Test$,i%,1))
        NEXT

        '/* display the elements */
        PRINT CHR$(Structure.a)
        PRINT CHR$(Structure.b)
        PRINT CHR$(Structure.c)
        PRINT CHR$(Structure.d)
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date