Close Dani :-), but this isn't C/Java :-P.
First of all, I'm assuming your using VB6. If you're not, tell me what VB version you're using and I'll adjust the code.
A better way of implimenting this, is to add a Class Module. I named my class module clsStateTime, and this is the code inside it:
Public state As String
Public Function TimeZone() As String
Select Case UCase(state)
Case "NY"
TimeZone = "EST"
Case "NJ"
TimeZone = "EST"
Case Else
TimeZone = "Unknown"
End Select
End Function
You should fill in the other 50 states with the results you want. To use this class, I made this code under a command button (but, you could do it however you want):
Private Sub Command1_Click()
'The index holds the amount of values you want to put in the array
Dim stinfo(3) As New clsStateTime
stinfo(0).state = "nj"
stinfo(1).state = "ny"
stinfo(2).state = "asdf"
MsgBox (stinfo(0).TimeZone)
MsgBox (stinfo(1).TimeZone)
MsgBox (stinfo(2).TimeZone)
End Sub
Just as a note, the index is the number in between the ()!
Dani, notice how I Dim'ed it with a (2), but I used 3 "slots" in the array? Thats another VB difference :-P. Oh yeah, we don't dim vars with the type first either :-P.