【Original】Implementing the Split function in VB in VC/eVC

leungpki

【Original】Implementing the Split function in VB in VC/eVC [Copy link]

In VB, sItem = Split(s, ",")

1. CString s; CString sItem[13]; byte pItem; byte p1, p2; s += ","; p1 = 0; pItem = 0; for (p2 = 0; p2 < s.GetLength(); p2++) { if (s.GetAt(p2) == ',') { sItem[pItem] = s.Mid(p1, p2 - p1); pItem++; p1 = p2 + 1; } }

复制代码

Of course, it is not universal enough, "13" and "," are fixed, and friends who need it can improve it by themselves.