da bi ti niz bio vidjliv u celoj aplikaciji deklarisi ga kao public u nekom modulu:
Code:
Public niz() As String
sto se tice pretrage kao u winampu (da ti automatski izbacuje rezultate dok kucas) ja sam to ranije resevao na ovaj nacin (mada nije najefikasniji):
Code:
Private Sub txtSearch_Change()
Dim i As Long
Call lstResults.Clear
For i = 1 To UBound(data) ' data mi je bio niz tipa string (deklarisan kao public, u modulu)
If InStr(1, data(i), txtSearch.Text) > 0 Then
Call lstResults.Add(data(i))
DoEvents
End If
Next
End Sub
ovo nije najbolje moguce resenje ali moze da ti da neku ideju... (mada ja to sad resavam na slican nacin s tim sto kod za pretragu pishem u c++u i samo eksportujem funkciju za pretragu iz dll-a)