vb.net如何判斷兩個字符串是否相似?

用 Like

成都創新互聯公司長期為上1000家客戶提供的網站建設服務，團隊從業經驗10年，關注不同地域、不同群體，并針對不同對象提供差異化的產品和服務；打造開放共贏平臺，與合作伙伴共同營造健康的互聯網生態環境。為孝南企業提供專業的網站建設、成都網站設計，孝南網站改版等技術服務。擁有10年豐富建站經驗和眾多成功案例,為您定制開發。

% = 任意數量的字符

？= 單個字符

類似簡易的正規則比對。

具體可參照MSDN

例：(以下代碼可以直接放到程序里執行)

dim str as string

str = "abc123"

if str like "a%" then msgbox "yes"

if str like "%a%2%" then msgbox "yes"

if str like "%3" then msgbox "yes"

if str like "%3?" = false then msgbox "no"

vb.net比較字符串

vb.net規定如果要比較字符串，不能用“=”，strcomp(str1,str2,n)或者string.compare(str1,str2)

例如：

Dim a As String = "c"

Dim b As String = "c"

Dim n As Integer = String.Compare(a, b)

If n = 0 Then

MsgBox("=")

Else

MsgBox("")

End If

vb中判斷字符串是否相等？

VB中的字符串比較實際上是從左到右逐個比較ASCII碼,如果兩個字符串的ASCII相等說明字符串相等. 實際的比較可以直接用

str1="abcde"

str2=inputbox()....

If str1=str2 then

Print 相等

Else

Print 不相等

end if

VB計算字符串的相似度，來個可執行文件最好

Function?xsd(s1?As?String,?s2?As?String)?As?Double

Dim?d()?As?Integer,?l1?As?Integer,?l2?As?Integer

Dim?i?As?Integer,?j?As?Integer,?t?As?Integer

l1?=?Len(s1)

l2?=?Len(s2)

ReDim?d(l1,?l2)

For?i?=?0?To?l1

d(i,?0)?=?i

Next

For?i?=?0?To?l2

d(0,?i)?=?i

Next

For?i?=?1?To?l1

For?j?=?1?To?l2

If?Mid(s1,?i,?1)?=?Mid(s2,?j,?1)?Then

t?=?0

Else

t?=?1

End?If

d(i,?j)?=?min3(d(i?-?1,?j?-?1)?+?t,?d(i,?j?-?1)?+?1,?d(i?-?1,?j)?+?1)

Next

Next

If?l1??l2?Then

xsd?=?l1

Else

xsd?=?l2

End?If

xsd?=?1?-?d(l1,?l2)?/?xsd

End?Function

Function?min3(x1,?x2,?x3)

If?x1??x2?And?x1??x3?Then

min3?=?x1

ElseIf?x2??x3?And?x2??x1?Then

min3?=?x2

Else

min3?=?x3

End?If

End?Function

Private?Sub?Command1_Click()

MsgBox?"相似度："??FormatPercent(xsd(Text1.Text,?Text2.Text),?2,?vbTrue)

End?Sub

在Text1和Text2分別輸入一段文字，再點Command1就會告訴你兩段文字的相似度了。

新聞名稱：包含vb.net字符串相似度的詞條
網址分享：http://m.newbst.com/article48/dogpdep.html

成都網站建設公司_創新互聯，為您提供品牌網站建設、商城網站、做網站、網站導航、、虛擬主機

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯