vb从最右边截取字符

VB可使用Split函数取出问帖所要的斜杠后右侧字符串。

公司主营业务：成都网站制作、网站建设、移动网站开发等业务。帮助企业客户真正实现互联网宣传，提高企业的竞争能力。创新互联是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化，感谢他们对我们的高要求，感谢他们从不同领域给我们带来的挑战，让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联推出息烽免费做网站回馈大家。

Split函数：

描述

返回一个下标从零开始的一维数组，它包含指定数目的子字符串。

实现代码如下：

Private Sub Command1_Click()

Dim strsj As String

Dim i As Long

Dim rightStr

strsj = "

rightStr = Split(strsj, "/")

i = UBound(rightStr)

Debug.Print rightStr(i)

End Sub

vb.net怎么提取字符串？

在VB中是这样的，没学过VB.net，你变换一下就可以了

按你说的，用用Left,Right和Mid

Option Explicit

Private Sub Command1_Click()

Dim Num(2)

Num(0) = Val(Left(Label1.Caption, 2))

Num(1) = Val(Mid(Label1.Caption, 3, 1))

Num(2) = Val(Right(Label1.Caption, 2))

MsgBox "Num(0)="  Num(0)  vbCrLf  "Num(1)="  Num(1)  vbCrLf  "Num(2)="  Num(2)

'如果想测试是不是可以计算，可以用这一句

'MsgBox "Num(0)+1="  Num(0) + 1  vbCrLf  "Num(1)+1="  Num(1) + 1  vbCrLf  "Num(2)+1="  Num(2) + 1

End Sub

Private Sub Form_Load()

Label1.Caption = "12345"

End Sub

有问题请追问，满意请采纳！

vb 字符串从右边截取

VB

从右边截取字符串可以使用Right函数：

Private

Sub

Command1_Click()

s

=

"1234567890"

s1

=

Right(s,

4)

Print

s;

"的右边4个字符是";

s1

End

Sub

vb.net 去掉字符串右边四位

Mid("123456", 1, Len("123456") - 4)

Mid("1234567", 1, Len("1234567") - 4)

希望能帮到你吧。

标题名称：vb.net右边字符串 vb定义字符串
文章转载：http://kswjz.com/article/dodposg.html