Dim str1 As String = "112113114111"
創新互聯長期為上1000家客戶提供的網站建設服務,團隊從業經驗10年,關注不同地域、不同群體,并針對不同對象提供差異化的產品和服務;打造開放共贏平臺,與合作伙伴共同營造健康的互聯網生態環境。為山丹企業提供專業的成都網站設計、網站建設,山丹網站改版等技術服務。擁有10多年豐富建站經驗和眾多成功案例,為您定制開發。
Dim str2 As String = "11"
Dim count As Integer = 0
For i As Integer = 0 To str1.Length - 1
Dim f As Integer = str1.IndexOf(str2, i)
If f -1 Then
MsgBox("str2出現在str1的" f "個字符位置")
i = f
count += 1
End If
Next
MsgBox("統計出str1中共有" count "個str2!")
'這個當然可以,用mid?取字符串的位置長度
Dim?str?As?String?=?"16461了工有6149奪中46146好31"
Label1.Text?=?Mid(str,?str.Length?-?3,?3)?'取字符串最后3位數
Label2.Text?=?Mid(str,?1,?3)?'取字符串前面3位數
使用VB提供的取子串函數Mid(S,k,n);
函數Mid(S,k,n)的功能,從指定的字符串表達式S的第k位開始取連續的n個字符。
例如:S = "1234567890",Mid(S,1,3) ,返回"123"
例如:S = "1234567890",Mid(S,3,7) ,返回"3456789"
等等;
結合VB的IF語句,就可以實現你的要求;
If Mid("1234567890",1,3) = "123" Then
MsgBox("正確")
Else
MsgBox("錯誤")
End If
string.LastIndexOf(搜索的字符串, 位置)
位置 = 已經選中的字符串在整個文本中的Index序號
void rtf_Click(object s, EventArgs e)
{
MessageBox.Show(rtf.SelectionStart.ToString());
}
Instr函數 instr(,字符串1,字符串2) 其中,start為起始位置,默認為1可忽略;字符串1為長串,字符串2為短串。功能為在長串中查找短串出現的位置。
當前名稱:vb.net字符串位置 vb取字符串中指定位置的字符
文章URL:http://vcdvsql.cn/article12/hhpgdc.html
成都網站建設公司_創新互聯,為您提供網站改版、定制開發、小程序開發、企業網站制作、微信小程序、網站維護
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯