2 simple question about limit exceeded private sub 
Author Message
 2 simple question about limit exceeded private sub

I have 2 simple questions ,but how do you get around limit exceed approx 750 case statements
in a private sub
Private Sub List1_Click()
Select Case List1.Text
Case "firstquestion"  'Replace w/ question
List2.Text = "answer" 'Replace w/ answer
Text2.Text = "answer"
end select

it has a search class & 2lists side by side
either way the user can select or search the list for the matching word

and also could this be done easier with loop stats
and if so how?
search option ex..

Private Sub txtsearchlist1_Change()
Dim Index As Integer

Index = FindFirstMatch(List1, txtsearchlist1.Text, -1, optSearchType(0).Value)
List1.ListIndex = Index
If Index >= 0 Then List1.Selected(Index) = True

I have been really stuck could someone post/ email/point to some code that can help me on this.Thanks

Posted via: http://www.*-*-*.com/
Currently with 409,866 posts.
Tired of checking for replies. We'll track it for you.
Win Prizes.

Fri, 21 Mar 2003 03:00:00 GMT  
 [ 1 post ] 

 Relevant Pages 

1. Private & Public Subs/Functions Question

2. Sub & Private Sub

3. Simple question about Private-declarations

4. The number of rows with pending changes has exceeded the set limit

5. Exceeding 3800 points limit in GRAPH.VBX

6. Error message exceeding limit of 16 tables/views

7. exceeded resource limit error

8. Pending Changes exceeds limit

9. Simple Question - Variable's as Sub names

10. Public WithEvents Scope Limited To Module So Private?

11. private subs, calling them

12. Running Function from Private (Userform) sub


Powered by phpBB® Forum Software