ListBox.refresh
Dim ProjectName As StringDim Path As String
ProjectName = LstProject
Path = App.Path & "\Projects\" & ProjectName
If LstProject.Text = "" Then
MsgBox ("No Project selected")
Else
Set Fso = CreateObject("Scripting.FileSystemObject")
Fso.DeleteFolder App.Path & "\Projects\" & ProjectName
Call DeleteLine(App.Path & "\Projects\projects.ini", "[" & ProjectName & "]")
LstProject.Refresh
End If
Hvorfor virker LstProject.Refresh ikke... den viser fejl der... !!!
