Visual Basic 2012 字符串的操作

字符串的处理是Visual Basic 2012 其中一个很重要的功能。它有助于处理非数字类型的数据,如姓名,地址,性别,城市和书名等等。

8.1 使用 + 与 & 符号来操作字符串

Visual Basic 2012 可使用 & 和 + 符号串联字符串,这意味着两个或两个以上较小的字符串组合成更大的字符串。例如,我们可以用“Visual” &“Basic”或“Visual”+“Basic”把“Visual”,“Basic”和“2012” 串联成 Visual Basic 2012,如下面的例子所示:

范例 8.1(a)

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1, text2, text3, text4 As String
text1 = “Visual”
text2 = “Basic”
text3=”2012″
text4 = text1 + text2+text4
Label1.Text = text4

End Sub
End Class

* text4=text1+ text2 + text4 与 text3=text1 & text2 &text3 都能产生一样的串联效果. 但是,如果一个变量是属于数字数据类型,你就不能用“+”号,而只能使用&符号。

范例 8.1(b)

Dim text1, text3 as string

Dim text2 As Integer

text1 = “Visual”

text2=22

text3=text1+text2

Label1.Text = text3

以上的代码将产生错误,因为text1及text3 被声明为字符串而 text2 被声明为整数,造成数据不匹配。如果使用 & 符号来串联则可, 如下:

Dim text1, text3 as string

Dim Text2 As Integer

text1 = “Visual”

text2=22

text3=text1 & text2

Label1.Text = text3

您可以结合两个以上的字符串,形成一个较大的字符串,如下面的例子:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1, text2, text3, text4, text5, text6 As String

text1 = “欢迎”
text2 = ” 学习”
text3 = ” Visual”
text4 = ” Basic”
text5 = ” 2012″
text6 = text1 + text2 + text3+text4+text5
Label1.Text = text6

End Sub
End Class

运行上面的程序会产生下面的屏幕截图。

vbch_fig8.1

 

8.2 Visual Basic 2012 操作字符串的内建函数

函数和一个正常的程序相似,但其主要目的是受输入和将返回值传递到主程序完成执行。Visual Basic 2012 里有许多操作字符串的内建函数,在这里我将只讨论了几个,在以后的课程中我们会解释其他的内建函数。

8.2(a)Len 函数

Len 函数返回一个整数值,这是代表一个包括空在内短语或一个句子的长度。语法是:

Len (“句子”)

例如,
Len (“Visual Basic”) = 12

Len(“欢迎学习 VB“ = 7

以下的程序可以查看一个短语或一个句子的长度:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Label1.Text = “Visual Basic 的长度是” & Len(“Visual Basic”)
Label2.Text = “欢迎学习 VB 的长度是” & Len(“欢迎学习 VB”)

End Sub

输出界面:

vbch_fig8.2

8.2(b)  Right 函数

Right函数的功用是提取一个短语的右侧部分。 Visual Basic 6的格式是

Right(“短语”,N)

其中N 是从右侧部的语句将要被提取的相位的起始位置。例如,

右(“Visual Basic中”,4)= ASIC

然而,这种格式并不适用于VB2012。 VB2012,我们需要使用以下格式

Microsoft.VisualBasic.Right(“短语”,N)

范例 8.2(a)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim text1 As String

text1 = TextBox1.Text

Label1.Text = Microsoft.VisualBasic.Right(text1, 4)

End Sub

上面的程序返回在文本框中输入的短语四个最右边的字符。

输出界面:

vbch_fig8.3

 

8.2(c) Left 函数

Left 函数的功用是提取一个短语的左侧部分. 语法是:

Microsoft.VisualBasic.Left(“Phrase”,n)

其中N 是从左侧的起始位置将要被提取的部分的语句。例如,

Microsoft.VisualBasic.Left (“Visual Basic”, 4) = Visu .

 

Share on FacebookShare on Google+Tweet about this on TwitterShare on LinkedIn