Give @DonManfred a break. He is probably still celebrating Germany's World Cup 2018 victory from last night. Here it is
B4X:
Dim Str As String= "1,2,3"
Dim strArray() As String=Regex.Split(",",Str)
Dim a As Int= strArray(0) :Log(a) 'displays 1
Dim b As Int= strArray(1) :Log(b) 'displays 2
Dim c As Int= strArray(2) :Log(c) 'displays 3