Hi,
Let's see if I'm correct on this first.
so you have a file that has 77 lines?
each line contains button?.something,button?.something, andonand on..
and you can get all that info into a file?
hope you are familiar with following commands:
open
line input
instr
I haven't tested this thingy but try it out.. let me know if it works ([email protected])
That is just an example, I don't promise that it works or anything (should). After that you have to program how to put the information on the arrays into the buttons.Code:Dim tooltiptext(1 To 77), tag(1 To 77), caption(1 To 77) As String, value(1 To 77) As whateverneed Private Sub load_infos() Dim filename As String Dim currentline As Integer currentline = 1 Open filename For Input As #1 'Open file Do While Not (EOF(1)) 'Loop to the end of the file Line Input #1, intemp 'Read one line from the file to the variable intemp tag(currentline) = Left(intemp, InStr(intemp, ",")) 'Extract tag from the line temp = Right(intemp, Len(intemp) - InStr(intemp, ",")) caption(currentline) = Left(intemp, InStr(intemp, ",")) 'Extract caption from the line temp = Right(intemp, Len(intemp) - InStr(intemp, ",")) value(currentline) = Left(intemp, InStr(intemp, ",")) 'Extract value from the line, I don't know what you are using but I haven't seen this.. temp = Right(intemp, Len(intemp) - InStr(intemp, ",")) tooltiptext(currentline) = Left(intemp, Len(intemp)) 'Extract tooltiptext from the line currentline = currentline + 1 Loop ' end loop Close #1 'close file End Sub
------------------
-Matti Kiviranta
AyS of AyS Systems
(PGP protected![]()




Reply With Quote