In questi casi "devi" usare Regex.Split (leggi la sua documentazione).
Per prima cosa, leggi le 4 righe:
Dim Righe() As String = Regex.Split(CRLF, VariabileStringa)
Per "spezzettare" ogni riga, stesso procedimento; mentre per suddividere la variabile in righe ho usato come "pattern" (il separatore) la costante stringa CRLF, in questo caso la virgola (un "literal");
For Each Riga In Righe
Dim Parti() As String = Regex.Split(",", Riga)
' Parti(0) conterrebbe 1
' Parti(1) conterrebbe "pulsante 1"
' Parti(2) conterrebbe "https://miosito1.it"
Next