come da titolo mi sarebbe piaciuto fare una funzione che ritornasse (da una stringa passata come input) un elemento della columnview da aggiungere nel codice principale.
public sub qualcosa()
..............
For i = 0 To risp.Count - 1
If risp[i] Like "U[0-9]*" Then
indice = ExtractClipIndex(risp[i])
In_point = ExtractClipInPoint(risp[i])
Out_Point = ExtractClipOutPoint(risp[i])
Clip_Lenght = ExtractClipLenght(risp[i])
Clip_Name = ExtractClipName(risp[i])
ColumnView_Clips.Add(indice, In_point)
ColumnView_Clips[indice][1] = Out_Point
ColumnView_Clips[indice][2] = Clip_Lenght
ColumnView_Clips[indice][3] = Clip_Name
Endif
Next
End
per evitare di fare 4 volte gli stessi confronti avrei preferito fare una cosa del genere:
public sub qualcosa()
dim Risposta as columnview.item
..............
For i = 0 To risp.Count - 1
If risp[i] Like "U[0-9]*" Then
Risposta=ExtractClipInfo(risp[i])
ColumnView_Clips.Add(Risposta)
Endif
Next
End
Public Function ExtractClipInfo(StringaDiRisposta As String) As ColumnView
......
End