noob here need helo on declareing

[gareth_2007]

what i want to do is declare

arnold as string

and then say

arnold = (App.Path & "\Data\Students\Class 1\Green\Arnold.ini", "Student", "4")

but i want is so if i need to use it any where in the program i can just put arnold if you see what i mean.
there are going to me 32 names used so is there a way to do it in a module? cheers gareth

[jcis]

What's that? looks like paramaters to a Sub without the Sub name. Are you trying to read data from an INI file?

[gareth_2007]

yes i am i have that all working but the ReadIniValue is not there because i just want to say some where along the line ReadIniValue arnold and then it will look at the ini file that has been declared with arnold .

[Static]

maybe something like this? Using a UDT

Private Type INIData
    sPath As String
    sSection As String
    sLine As String
End Type
 
Dim Arnold As INIData
 
Private Sub Command1_Click()
    ReadINI Arnold
End Sub
 
Private Sub Form_Load()
    Arnold.sPath = App.Path & "\Data\Students\Class 1\Green\Arnold.ini"
    Arnold.sSection = "Student"
    Arnold.sLine = "4"
End Sub
 
Private Function ReadINI(sData As INIData) As String
    'Here is where you pass in the data to your INI read function
    'Just an example
    'ReadIniValue sData.sPath, sData.sSection, sData.sLine
End Function

[gareth_2007]

thanks thats a nice bit of code! its allmost what im looking for. i just want arnold to = (App.Path & "\Data\Students\Class 1\Green\Arnold.ini", "Student", "4") so if i did ReadIniValue or WriteIniValue i could just put arnold and i could do that on any form in the program

[Hack]

I would do it this way

Public Function ReadINI(sSection As String, sPath As String, sName As String) As String
    'Here is where you pass in the data to your INI read function
End Function
 
Private Sub Command1_Click()
ReadINI "Student", App.Path & "\Data\Students\Class 1\Green\", "Arnold"
End Sub

I would also have a drop down combo box containing all the names that you need. I would have another drop down combo contains the INI file section names. With that, your user could selection what section and what name, so you would do

Private Sub Command1_Click()
ReadINI, cboSection.Text, App.Path & "\Data\Students\Class 1\Green\", cboName.Text
End Sub

[gareth_2007]

wow man that is sweet just how i want it but sorry to be a pain and i would love it if you could do this for me: i have 6 classes an to houses green and yellow using the last bit of code you wrote and combo dropdown boxes could you please write the could! i really appreciate what you written so far

[Hack]

Do you know how to add items to a combo box or a listbox?

[gareth_2007]

yer i just trying to think how to do that

[PMad]

This one is easy!

1) Make a Module

2) Declare your string like this: Global Arnold as String

3) On your main form that loads up first, under Load or Activate, put in your arnold = whatever code and your set.. Anywhere in the program you can say Arnold = whatever, or whatever = arnold, or use it however you wish.

[Hack]

yer i just trying to think how to do that

Use the Additem method

Combo1.Additem "Whatever"