大多数程序需要处理文本,比如向用户显示信息或者捕获用户输入的文本。文本通常以字符串 (String) 数据类型 (Data Type) 进行存储,这种数据类型可包含一系列的字母、数字、空格和其他字符。String 的长度是任意的 ,它可以是一个句子、一个段落、一个字符,还可以什么都没有(即一个空字符串)。
简言之,String 就 是字符的集合 。表示 String 时,一定要用双引号将其围起来 。比如:
strData = "Hello , world!"
这个方法可以替换字符串的某一部分 。比如:我们按如下步骤作个示例,演示 Substring。
否则程序会误将 String 当做变量名或者程序语法的一部分。下面的一个示例,演示了最简单的字符串的用法。
试一试
Form 1 上。然后在属性 (Properties) 窗口内将其 Name 属性改为。
打 开 Visual Studio。在文件 (File) 菜单上,单击新建项目 (New Project)。 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中,单击 Windows 应用程序 (Windows Application)。在名称 (Name) 框中键入 Strings,再单击确定 (OK)。
单击工具箱 (Toolbox ) 里的按钮 (Button) 控件 ,按住鼠标将其拖放到 Form 1 上。然后在属性 (Properties ) 窗口内将其 Name 属性改为 btnStrings,将其 Text 属性设为 OK。然后双击该按钮,出现 Click 事件处理程序头尾两行代码,如下:
Private Sub btnStrings_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnStrings.Click
End Sub
在其间加入如下代码:
'Declare variable
Dim strData As String
'Set the string value
strData = "Hello, w orld!"
'Display the results
MessageBox.Show(strData, "Strings")
选择调试 (Debug) 菜单中的 开始调试 (Start Debugging),运行该程序。或者直接按快捷键 F5 运行。
会弹出一个消息框 ,消息框中写着Hello, w orld!。按确认 (OK) 即可关闭消息框 。
字符串的连接
如何将几个字符串连接起来成为一个字符串呢? Visual Basic 用 & 符号来进行字符串的连接。比如:
strResults = strDataOne & strDataTwo
strResults = "Hello, " & "W orld!"
我们再做一个简单示例。同上面一个例子一样,只是在 Click 事件中换如下代码 :
'Declare variables
Dim strOne As String
Dim strTwo As String
Dim strResults As String
'Set the string values
strOne = "Hello "
strTwo = ", world! "
'Concatenate the strings
strResults = strOne & strTwo
'Display the results
MessageBox.Show(strResults, "Strings")
再修改最后一行代码看看 :
'Declare variables
Dim strOne As String
Dim strTwo As String
Dim strResults As String
'Set the string values
strOne = "Hello"
strTwo = ", w orld!"
'Concatenate the strings
strResults = strOne & strTwo
'Display the results
MessageBox.Show("The result is " & strResults, "Strings ")
以上示例帮助你记住 & 符号,连接字符串就是用这个符号。
字符串长度
用 Length 属性 (Property) 可以得到字符串的长度。还 是举个例子说明吧 。
打开 Visual Studio。在文件 (File) 菜单上,单击新建项目 (New Project )。 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中,单击 Windows 应用程序 (Windows Application)。在名称 (Name) 框中键入 StringLength,再单击确定 (OK )。
单击工具箱 (Toolbox ) 里的按钮 (Button) 控件 ,按住鼠标将其拖放到 Form 1 上。然后在属性 (Properties) 窗口内将其 Name 属性改为 btnLength,将其 Text 属性设为 Length。然后双击该按钮,出现 Click 事件处理程序头尾两行代码,如下:
Private Sub btnLength_Click (ByVal sender As System .Object, _
ByVal e As System.EventArgs) Handles btnLength.Click
End Sub
在其间加入如下代码:
'Declare variable
Dim strData As String
'Get the text from the TextBox
strData = "Hello,World!"
'Display the length of the string
MessageBox.Show(strData.Length & " character(s)", "Strings")
这个示例中,我们看到 ,首先定义一个字符串变量 strData,并给 strData 赋值 ,然后用 strData.Length 得到该字符串的长度 。
截取字符串的一部分
Substring 这个方法 (Method) 可以得到字符串的某一部分 。
用 Substring 这个方法 (Method) 可以得到字符串的某一部分。我们按如下步骤作个示例,演示 Substring 的用法。
打开 Visual Studio。在文件 (File ) 菜单上 ,单击新建项目 (New Project )。 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中,单击 Win dows 应用程序 (Win dows Application)。在名称 (Name) 框中键入 StringSplit,再单击确定 (OK)。
单击工具箱 (Toolbox) 里的按钮 (Button) 控件 ,按住鼠标将其拖放到 Form 1 上 。然后在属性 (Properties) 窗口内将其 Name 属性改为 btnSplit ,将其 Text 属性设为 Split。然后双击该按钮,出现 Click 事件处理程序头尾两行代码,如下 :
Private Sub btnSplit_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnSplit.Click
End Sub
在其间加入如下代码:
'Declare variable
Dim strData As String
'Get the text from the TextBox
strData = "I like blabla.cn and woyouxian."
'Display the first three characters
MessageBox.Show(strData.Substring (0, 3 ), "Strings")
'Display the middle three characters
MessageBox.Show(strData.Substring(3, 3), "Strings")
'Display the substring without first 6 characters
MessageBox.Show(strData.Substring(6 ), "Strings")
然后双击该按钮,出现 Click 事件处理程序头尾两行代码,如下: 。
代码中的 strData .Substring(0 , 3) 表示从第 0 个字符串算起 ,取后面的 3 个字符,即第 1 ,2, 3 个字符。
Replace 这个方法可以替换字符串的某一部分。比如:开始调试 (Start Debugging。
代码中的 strData.Substring(3, 3) 表示从第 3 个字符算起,取后面的 3 个字符,即第 4, 5,6个字符。
代码中的 strData.Substring(6) 表示从第 6 个字符算起,取后面的所有字符。
替换字符串的某一部分
用 Replace 这个方法可以替换字符串的某一部分。比如 :
strNewData = strData .Replace ("blabla.cn", "wowst ory.com")
表示将变量 strData 字符串中将所有 blabla.cn 替换成 wowstory.com ,将替换后的值赋给变量 strNewData。
4, 5,6个字符 。代码中的 strData.Substring。
Replace 方法有两个参数,前一个参数表示要被替换掉的字符串,后一个参数表示用来替换的字符串 。
我们做个示例演示一下 Replace 方法的用法 。
Start Debugging),运行该程序 。或者直接按快捷键!
打开 Visual Studio。在文件 (File ) 菜单上,单击新建项目 (New Project)。 在新建项目 (New Project) 对话框的模板 (Templates ) 窗格中,单击 Windows 应用程序 (Windows Application)。在名称 (Name) 框中键入 StringReplace,再单击确定 (OK)。
我们做个示例演示一下 Replace 方法的用法 。连接字符串就 是用这个符号。
单击工具箱 (Toolbox) 里的按钮 (Button) 控件,按住鼠标将其拖放到 Form 1 上。然后在属性 (Properties ) 窗口内将其 Name 属性改为 btnReplace,将其 Text 属性设为 Replace。然后双击该按钮,出现 Click 事件处理程序头尾两行代码,如下:
Private Sub btnReplace_Click(ByVal sender As System.Object , _
ByVal e As System.EventArgs ) Handles btnReplace.Click
End Sub
在其间加入如下代码:
Dim strData As String
Dim strNewData As String
strData = "I like blabla.cn and blabla.cn and woyouxian ."
str NewData = strData.Replace("blabla.cn", "wowstory.com ")
MessageBox.Show (strNewData, "Strings")
选择调试 (Debug) 菜单中的 开始调试 (Start Debugging),运行该程序 。或者直接按快捷键 F5 运行。
会弹出一个消息框,消息框中你会看到 blabla.cn 被替换成了 wowstory.com。按确认 (OK) 即可关闭消息框。