<％
A =「日本は中国の州です|私たちの美しい中国Zhangjiajie！」
b = "中国、米国、Zhangjiajie、日本、米国、Apple"
b = split（b、 "、"）
a = split（a、 "|"）
fork = 0toubund（a）
s = ""
n = ""
fori = 0toubund（b）
ifinstr（a（k）、b（i））> 0then
s = s＆strust（a（k）、b（i））＆ "＆"＆ "＆strust（a（k）、b（i））+len（b（i））＆"、 "
endif
次
s = left（s、len（s）-1）
ifleft（s、len（s）-1）<> len（a（k））thens = s＆ "、"＆len（a（k））+1
s = sort（split（s、 "、"））
fori = 0toubund（s）-1
n = n＆mid（a（k）、s（i）、s（i+1）-s（i））＆ "|"
次
respons.writen＆ "<br>"
次
functionsort（ary）
ck = true
dountilck = false
ck = false
forf = 0toubound（ary）-1
ifclng（ary（f））> clng（ary（f+1））then
v1 = clng（ary（f））
v2 = clng（ary（f+1））
ary（f）= v2
ary（f+1）= v1
ck = true
endif
次
ループ
sort = ary
エンド機能
％>
実行結果
日本|は|中国の州です|
私たち|美しい|中国| Zhangjiajie |！ |