Vad gör jag för fel? när jag trycker på "no" gör den samma sak som när jag trycker "yes"

  MsgBox("Är du säker på att du vill återställa alla spiklägen?", vbYesNo, "Vill du återställa?")
        If vbYes Then
            Call TcClientSync.WriteVar(Array1Lage1, False)
            bSpik1Lage1.ForeColor = Color.Black
        ElseIf vbNo Then
            cancel = True
        End If

Eftersom du inte frågor om resultatet från msgboxen.
Använd istället MessageBox.Show, och använd resultatet därifrån.

får bara fel. Hur skulle du skriva det?

if messagebox.show(blablabla) = dialogresult.yes then 'eller något sådant, är inte 100% på detaljerna

If MessageBox.Show("Vill du ta bort posten?") = Windows.Forms.DialogResult.Yes Then
'gör något
End If

Så! tack det fungerade.