variablen Problem

Hi Leute..
Ich hab ne General function:
Private Function fctGetNextID() As String
Dim IntCounter
Dim intNewId As Long
intNewId = 1
For IntCounter = 1 To TreeView1.Nodes.Count
If Right(TreeView1.Nodes.Item(IntCounter).Key, Len(TreeView1.Nodes.Item(IntCounter).Key) - 1) >= intNewId Then
intNewId = Right(TreeView1.Nodes.Item(IntCounter).Key, Len(TreeView1.Nodes.Item(IntCounter).Key) - 1) + 1
End If
Next
fctGetNextID = "a" + CStr(intNewId)
End Function
in der wird IntCounter deklariert..doch nun will ich beim speichern diese variable verwenden und er sagt mir in evb immer variable nicht deklariert...
For IntCounter = 1 To TreeView1.Nodes.Count

im normalen vb funzt das ohneweiteres....
kann mir da jemand helfen ?

mfg
evbnoob

möchtest du das:
For IntCounter = 1 To TreeView1.Nodes.Count
in der gleichen private function tun, oder irgendwo anders?

IntCounter ist in deinem Beispiel nur für diese Funktion deklariert!

Versuche mal Dim IntCounter ganz oben zu deklarieren, dort wo die declarationen sind...!

Falls du englisch kannst, möchte ich dir www.devbuzz.com empfehlen, dort im Forum gibt es wirkliche eVB-Spezialisten!

Gruss

Sven