有兩種方法:
成都創(chuàng)新互聯(lián)公司于2013年開始,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司,擁有項(xiàng)目成都網(wǎng)站制作、網(wǎng)站建設(shè)網(wǎng)站策劃,項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命,1280元法庫做網(wǎng)站,已為上家服務(wù),為法庫各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:13518219792
1.用Right函數(shù),從字符串右邊取出的指定數(shù)量的字符.
Right(string,
length)
取最后一位
A
=
"ABC123"
D
=
RIGHT(A,1)
取最后二位
D
=
RIGHT(A,2)
取最后第二位
D
=
RIGHT(A,2,1)
2.用MID函數(shù)
返回
Variant
(String),其中包含字符串中指定數(shù)量的字符。
語法
Mid(string,
start[,
length])
此發(fā)先要用LEN函數(shù)確定字符串長(zhǎng)度,然后才能確定起始位,例:
A
=
"ABC123"
取最后一位
D
=
MID(A,LEN(A),1)
取最后二位
D
=
MID(A,LEN(A)-1,2)
取最后第二位
D
=
MID(A,LEN(A)-1,1)
后一種在取每位字符時(shí)配合FOR
NEXT循環(huán)更有用.
你csv文件是用什么分割符的?
把csv文件當(dāng)做文本文件處理
File.ReadAllLines 讀取所有行,
然后循環(huán)每行,按照分隔符split后就是每一列
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String = TextBox1.Text
Dim p As Integer = InStrRev(s, vbCrLf)'從右側(cè)開始查找出現(xiàn)回車符的位置(但位置仍從左算起)
Dim s1 As String'用于保存最后一行字符串
If p = 0 Then'若未找到回車符,則直接將整個(gè)字符串賦給S1
s1 = s
Else
s1 = Mid(s, p + 2)'若找到回車符,則截取回車符右邊的部分
End If
MsgBox(s1)'顯示你要找的最后一行字符串
End Sub
1、Trim(C):去掉字符串C兩端的空格。
2、Left(C,n):截取C最左邊的n個(gè)字符。
3、Right(C,n):截取C最右邊的n個(gè)字符。
4、Mid(C,m,n):截取C中從第m個(gè)字符開始的n個(gè)字符。
5、Len(C):返回C包含的字符數(shù),漢字空格都算一個(gè)字符。
6、Lcase(C):將C中的大寫字母轉(zhuǎn)化成小寫字母。
7、Ucase(C):將C中的小寫字母轉(zhuǎn)化成大寫字母。