请问怎样提取字符串中某几个字符！

[dudulang]

我在编程中需要在一个字符串中提取几个字符，请问有什么好点的办法吗！还有，怎样往文本框（TEXT控件）输入一个回车符，不甚感谢！

[GLAY]

Mid 函数

返回 Variant (String)，其中包含字符串中指定数量的字符。

语法

Mid(string, start[, length])

Mid 函数的语法具有下面的命名参数：

部分 说明
string 必要参数。字符串表达式，从中返回字符。如果 string 包含 Null，将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("")。
length 可选参数；为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到尾端的所有字符。
说明

欲知 string 的字符数，可用 Len 函数。

注意 MidB 函数作用于字符串中包含的字节数据。因此其参数指定的是字节数，而不是字符数。

Mid 函数示例
本示例使用 Mid 语句来得到某个字符串中的几个字符。

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" 建立一个字符串。
FirstWord = Mid(MyString, 1, 3) ' 返回 "Mid"。
LastWord = Mid(MyString, 14, 4) ' 返回 "Demo"。
MidWords = Mid(MyString, 5) ' 返回 "Funcion Demo"。

[crystal_heart]

字符串中有中文又有英文，那长度会很奇怪的。

[enterlc]

回车是 vbCrLf

[Sean918]

Visual Basic 语言参考

Mid 函数请参见
Left 函数 | Len 函数 | LTrim、RTrim 和 Trim 函数 | Mid 语句 | Right 函数 | ArgumentException
从一个字符串返回包含指定数量字符的字符串。

Public Shared Function Mid( _
ByVal Str As String, _
ByVal Start As Integer, _
Optional ByVal Length As Integer _
) As String
Parameters
Str
必选。String 表达式，从该表达式返回字符。
Start
必选。Integer 表达式。str 中的字符位置，从该位置开始提取字符串的一部分。如果 Start 大于 Str 中的字符数，Mid 函数将返回零长度字符串 ("")。Start 从一开始。
Length
可选。Integer 表达式。要返回的字符数。如果 Length 省略或超过文本的字符（包括 Start 处的字符）数，则返回从字符串开始位置到结尾的所有字符。
异常/错误
异常类型 错误号 条件
ArgumentException 5 Start <= 0 或 Length < 0。

备注
若要确定 Str 中的字符数，请使用 Len 函数。

示例
本例使用 Mid 函数从字符串返回指定数量的字符。

Dim MyString, FirstWord, LastWord, MidWords As String
MyString = "Mid Function Demo" ' Creates text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

[dengwei007]

chr(10)+chr(13)回车符

[cgh1970]

up

[csdnHelp]

你去查MSDN，可以感觉到无穷魅力！！！！

[zyhjswx]

说具体点吗？