Ok my most current problem which everyone else seem smart enough to figure out is this, I have my array will all my info in it and im trying to add certain indexes to combo boxes and other stuff from blue GUI. I got the first combo box to display the right fields but cant get any others to display, without crashing the program any help would be appreshated? heres my code.... also each comboname has the subname and other fields, im just waiting to add them until I get the first working.
Edit: punctuation usually stops for me around 2am =P
Type contacts
comboname as string
subname as string
name as string
phone as string
desc as string
address as string
Endtype
Dim contactlist$(30) as contacts
contactlist$(1).comboname=\"Select a service\"
contactlist$(2).comboname=\"Marital / Family\"
contactlist$(2).subname=\"Adult Family Member Assist. Center\"
contactlist$(2).name=\"Adult Family Member Assist. Center\"
contactlist$(2).phone=\"433-8130\"
contactlist$(2).desc=\"N/A\"
contactlist$(2).address=\"Bldg. 681\"
contactlist$(3).comboname=\"Parenting / Child care\"
contactlist$(4).comboname=\"Health care\"
contactlist$(5).comboname=\"Financial\"
contactlist$(6).comboname=\"Legal\"
contactlist$(7).comboname=\"Basic\"
contactlist$(8).comboname=\"Abuse / Neglect\"
contactlist$(9).comboname=\"EMERGENCY\"
index=9
`==========================================================================================
` Main loop
`==========================================================================================
Do
Paste image 1, 0,0
For i = 1 to index
selectItem servicecombo, 0
additem servicecombo, contactlist$(i).comboname
additem servicessublist, contactlist$(i).subname
Next i
servicecombo=createcombobox(20,100,150,20,0) `main services dropdown
servicesublist=createlistbox(20,160,200,220,0) `sub services/people
