Overflow

[Yahoo-]

Ok well ive seen some programs before where say u load a list into a lsit box and it exceeds a limit it says runtime error or something like that so it doesnt freeze and stuff?Well how would u go about to put something inplace for there to be a limit of 45,000?Thx for the help and any will be appreciated

[plenderj]

Um.

Something like this I'd say

'' in some sub/function somwhere
On Error Goto errHandle
    Do Until Eof(1)
        Line Input #1, someStrBuff
        List1.AddItem someStrBuff
    Loop
    Exit Sub '' or Exit Function
 
errHandle:
    If Err.Number = whateverTheCorrectErrorNumberIs Then
        MsgBox "Runtime Error" & Err.Description, vbCritical
        Exit Function
    End If

[technitaes]

Not certain if this is exactly what you want to do, but...

'Assuming some data input loop
 
Do While blnCondition 
 
    'Do something
 
    intCount = intCount + 1
    If intCount = 45000 Then Err.Raise 6
 
Loop

This will raise the Overflow error on the occurrance of the 45,000th input entry.