Программирование
Веб программирование

Замена символов

 
 
Private Sub Command1_Click()
    Text1.Text = Replace(Text1.Text, "!", "?") 
End Sub

Есть вопросы? Спроси на нашем форуме!!
7mero4ka [14.08.2012 00:51]

Офиганный код))
я при помощи него сделал шифровальщик.
например слово: земля
будет
200,197,205,204,224,
или
22263,2,266,,267,267,,22263,2,266,,2263,2,265,,266,264,,22263,2,266,,267,2263,2,,22263,2,266,,267,2263,1,,22263,2,266,,22263,2,266,,2263,1,,
или ещё
22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,263,264,,22263,2,266,,263,264,,,22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,2263,2,,,22263,2,266,,263,263,,22263,2,266,,263,2263,1,,,22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,263,264,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,,22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,263,264,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,2263,2,265,,,,22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,,22263,2,266,,263,263,,,22263,2,266,,22263,2,266,,263,2263,267,,,22263,2,266,,2263,2,265,,,,



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.