01. april 2000 - 22:22Der er
7 kommentarer og 2 løsninger
syntax
Privat Sub Comand2_Clik() MsgBox "nu fjernes"&List1.Text&"fra listen"List1.RemoveItem List1.ListIndex denne syntax kan jeg ikke få til at virke hvad er fejlen
Private i stedet for privat. Command2 i stedet for Comand2. Click() i stedet for Clik(). Mellemrum i mellem "" og &. Og så mangler der linieskift (eller :) samt et End Sub. Desuden checker du jo ikke om der overhovedet er markeret noget i List1
Efter at fejlene er rettet kommer det til at se sådan ud:
Private Sub Command2_Click() If List1.ListIndex > 0 Then MsgBox("nu fjernes " & List1.Text & " fra listen.") List1.RemoveItem(List1.ListIndex) End If End Sub
jeg slap vist de 30 point lige hurtig nok men jeg lod mig overbevise før jeg fik afprøvet dit forslag det så aldeles fornuftig ud, det er kun denne linie der er fejl i (syntax error compile error) MsgBox "Nu fjernes " & List1.Text& "Fra listen."
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.