Программист Дёня VladConnВсе показанные варианты опираются на использование циклов, что делает их медленными. Использование функции Replace позволяет их (циклы) избежать.
И для чего это реплейс, в Делфи вообще есть возможность вкраплять блоки ассемблера, так прогу вообще можно упростить и убыстрить даже с циклами
Кстати, предложите свой вариант

У нас тут не Делфи! И не язык ассемблера. А для чего "реплейс" - для того самого! Насчет своего варианта: нет времени, к сожалению. Тут и так застрял на соседнем топике, там один товарищ никак не уразумит, что безындексные циклы - вещь медленная по сравнению с прямыми запросами и прочими goodies.

OK, отвечаю благосклонно. Замечание о Делфи было всего лишь шуткой. Умнее других себя не считаю, ведь много ума не надо, чтобы нажать F1, в поисковом окне набрать Replace и все о Replace узнать. Да и на форуме этом, да и в сети - сколько угодно об этой функции. Зачем же повторять справку? Другое дело - если затруднение с кодированием. И кем вы себя тогда считаете, если ленитесь (боюсь подумать - не догадались) нажать F1.

Но если вам что неясно в справке об этой функции, то милости просим. Конечно, объясним. Идея, собственно, была во включении вызовов к Replace один в другой: т.е. матрешка из Replace:

Private Sub Command1_Click()
Dim strSource As String
Dim strResult As String

strSource = "I meet my classes today!"
MsgBox strSource
strResult = Replace(strSource, "c", "", , , vbBinaryCompare)
MsgBox strResult
strResult = Replace(strResult, "l", "", , , vbBinaryCompare)
MsgBox strResult

End Sub

Желающие могут ознакомиться в словаре с радикально меняющимся смыслом трансформируемого слова "classes".

vladconn

У меня справка на англ. только. Внизу я ее привожу. А здесь

http://msdn.microsoft.com/library/rus/default.asp?url=/library/rus/vblr7/html/vafctreplace.asp

ее описание на русском для VB.NET, почти тоже самое. Если что-то все-равно неясно, пожалуйста спрашивайте.

Успехов.


Replace Function


Description

Returns a string in which a specified substring has been replaced with another substring a specified number of times.

Syntax

Replace(expression, find, replacewith[, start[, count[, compare]]])

The Replace function syntax has these parts:

Part Description
expression Required.String expression containing substring to replace.
find Required. Substring being searched for.
replacewith Required. Replacement substring.
start Optional. Position within expression where substring search is to begin. If omitted, 1 is assumed.
count Optional. Number of substring substitutions to perform. If omitted, the default value is –1, which means make all possible substitutions.
compare Optional. Numeric value indicating the kind of comparison to use when evaluating substrings. See Settings section for values.


Settings

The compare argument can have the following values:

Constant Value Description
vbUseCompareOption –1 Performs a comparison using the setting of the Option Compare statement.
vbBinaryCompare 0 Performs a binary comparison.
vbTextCompare 1 Performs a textual comparison.
vbDatabaseCompare 2 Microsoft Access only. Performs a comparison based on information in your database.


Return Values

Replace returns the following values:

If Replace returns
expression is zero-length Zero-length string ("")
expression is Null An error.
find is zero-length Copy of expression.
replacewith is zero-length Copy of expression with all occurences of find removed.
start > Len(expression) Zero-length string.
count is 0 Copy of expression.


Remarks

The return value of the Replace function is a string, with substitutions made, that begins at the position specified by start and and concludes at the end of the expression string. It is not a copy of the original string from start to finish.

Да, насчет отсутствующей справки. Здесь:

http://www.microsoft.com/Rus/Msdn/Subscribe/VisualStudio2005/default.mspx

информация о подписке. По-моему, это оно.

Успехов.