Declare Sub Mid ( ByRef text As String, ByVal start As Integer, ByVal length As Integer, ByRef expression As Const String )
Declare Sub Mid ( ByVal text As WString Ptr, ByVal start As Integer, ByVal length As Integer, ByVal expression As Const WString Ptr )

Mid( text, start ) = expression

ИЛИ

Mid( text, start, length ) = expression

text
start
length

Копирует максимум length символов expression в text, начиная с позиции start.

Если length не указан, expression копируется полностью. Размер строки text не меняется; Если expression слишком большой, максимально-возможное количество копируется до конца text, не превышая размер text.

Mid может также использоваться в качестве функции, чтобы возвратить часть другой строки. Смотрите Mid (Функция).

Dim text As String

text = "abc 123"
Print text 'Отобразит "abc 123"

' заменяем часть текста другой строкой
Mid(text, 5, 3) = "456" 
Print text 'Отобразит "abc 456"

• Нет
  
  

• Mid (Функция)