建站
咨詢
售后
建站咨詢
新聞中心
VB.net, 如何判斷一個(gè)字符串包含另一個(gè)字符串？
很簡(jiǎn)單，用字符串查找函數(shù)就可以實(shí)現(xiàn)了。
安徽網(wǎng)站建設(shè)公司成都創(chuàng)新互聯(lián)公司,安徽網(wǎng)站設(shè)計(jì)制作，有大型網(wǎng)站制作公司豐富經(jīng)驗(yàn)。已為安徽近千家提供企業(yè)網(wǎng)站建設(shè)服務(wù)。企業(yè)網(wǎng)站搭建\外貿(mào)網(wǎng)站制作要多少錢，請(qǐng)找那個(gè)售后服務(wù)好的安徽做網(wǎng)站的公司定做！
當(dāng)在StrB查找到StrA字符串時(shí)，返回肯定是非0的數(shù)，值就是True，找不到為0或者-1，值就是Flase
比如：
Dim StrA As String = "Time is Limited"
Dim StrB As String = "Time"
Dim Stu As Boolean= InStr(StrA, StrB)
這運(yùn)行段代碼，Stu值就是True了。
我覺(jué)得這樣最簡(jiǎn)單有效。
vb.net 如何把全角轉(zhuǎn)換成半角
可以，用VB自帶函數(shù)就可以了半角轉(zhuǎn)全角：Text2.Text = StrConv(Text1.Text, )全角轉(zhuǎn)半角：Text2.Text = StrConv(Text1.Text,vbNarrow)當(dāng)然你可以做得智能一點(diǎn)，譬如只允許輸入數(shù)字、符號(hào)和字母什么的。
vb.net 里的substring()作用
substring 就是對(duì)一個(gè)指定的字符竄進(jìn)行字符竄截取的方法。
運(yùn)用的形式差不多如下：
截取后的字符竄 = 指定字符竄.substring（開(kāi)始截取位置[第一位從0開(kāi)始],截取長(zhǎng)度）
Dim str As String = "dsk_cy"
Dim resultStr As String = str.substring(0,2)'截取最左邊的兩個(gè)字符 即 resultStr = “ds”
Dim reulst As String = str.substring(1,2) '截取從最左邊數(shù)第二位開(kāi)始的兩個(gè)字符 即 result = “sk”
希望對(duì)你有幫助！
vb.net 中的split函數(shù)的應(yīng)用？
就是拆分字符串嘛用一個(gè)例子就知道了s=split("趙,錢,孫,李",",")s是個(gè)字符串?dāng)?shù)組,這樣的話,s中就有四個(gè)元素s(0)是趙s(1)是錢s(2)是孫s(3)是李比自己一個(gè)個(gè)賦值快多了
我用VB.NET寫(xiě)的折半查找法哪出錯(cuò)了呢？
Sub?Main()
Dim?arr?As?Integer()?=?{2,?3,?7,?8,?12,?23,?34,?44,?45,?68}
Dim?txt?As?New?StringBuilder("顯示A中元素:")
For?Each?i?As?Integer?In?arr
txt.Append(i).Append("?")
Next
Console.WriteLine(txt.ToString)
Console.WriteLine("請(qǐng)輸入查找數(shù)值:")
Dim?num?As?Integer?=?CInt(Val(Console.ReadLine))
Console.WriteLine("你輸入的數(shù)據(jù)是："??num.ToString)
Dim?loca?As?Integer?=?Array.IndexOf(arr,?num)?+?1
If?loca?=?0?Then
Console.WriteLine(num??"的位置在第"??loca??"個(gè)")
Else
Console.WriteLine("數(shù)組中無(wú)"??num)
End?If
Console.ReadLine()
End?Sub
數(shù)組中搜索匹配值的索引，如果數(shù)組中沒(méi)有重復(fù)的值，沒(méi)必要弄那么復(fù)雜的循環(huán)，IndexOf函數(shù)就搞定了。
如果有重復(fù)的，用下面的循環(huán)，可以返回多個(gè)匹配值的索引；
Sub?Main()
Dim?arr?As?Integer()?=?{2,?3,?7,?8,?12,?12,?12,?23,?34,?44,?45,?68}
Dim?txt?As?New?StringBuilder("顯示A中元素:")
For?Each?i?As?Integer?In?arr
txt.Append(i).Append("?")
Next
Console.WriteLine(txt.ToString)
Console.WriteLine("請(qǐng)輸入查找數(shù)值:")
Dim?num?As?Integer?=?CInt(Val(Console.ReadLine))
Console.WriteLine("你輸入的數(shù)據(jù)是："??num.ToString)
Dim?length?As?Integer,?counts?As?Integer()?=?New?Integer()?{}
For?i?As?Integer?=?0?To?arr.Length?-?1
If?arr(i)?=?num?Then
length?=?counts.Length
ReDim?Preserve?counts(length)?:?counts(length)?=?(i?+?1)
End?If
Next
length?=?counts.Length?-?1
If?length??0?Then
txt?=?New?StringBuilder
txt.Append(num).Append("的位置在第")
For?i?As?Integer?=?0?To?length
txt.Append(counts(i))
If?i??length?Then?txt.Append("|")
Next
txt.Append("個(gè)")
Console.WriteLine(txt.ToString)
Else
Console.WriteLine("數(shù)組中無(wú)"??num)
End?If
Console.ReadLine()
End?Sub
名稱欄目：vb.net折半查找 折半查找c
標(biāo)題鏈接：http://fisionsoft.com.cn/article/hiogoh.html
