to być próbka kod
Ciemnawy s1 Jako Sznurek = "abc"
Ciemnawy s2 Jako Sznurek = "abgc"
Ciemnawy diffcnt Jako Integer = (0)
Dla Przypalać c Przypalać W s1
Jeśli nie s2.Contains (c) Wtedy
diffcnt = diffcnt + (1)
Kończyć Jeżeli
Następnie
Dla S2 c Przypalać W s2
Jeśli nie s1.Contains (c) Wtedy
diffcnt = diffcnt + (1)
Kończyć Jeżeli
Następnie
Response.Write (diffcnt & "list być różny")
