Question

我想问你，您对比较网址的最佳方式有什么看法。可以说，URL有10种可用格式。我在下面列出了它们。

最后还有一些斜线。

如果这些网址与列表框中的项目匹配，那么轻松比较的最佳解决方案是什么？我目前正在做其他事情，它构建了3个不同的网址。但代码太乱了，我正在寻找一些更清洁的东西。

我正在寻找类似下面代码的内容。

但是，这实际上会比较两个网址吗？

For Each result As String In lb_results.Items
   If String.Compare(result, "urls to compare") Then

   End If
Next

Answer 1

如果您只是简单地比较＆＃34; domain.com＆＃34;它的变种，需要消除它......

快速规范化字符串，以便域名和扩展名必须在句点之间。

MessyURL = Replace(MessyURL, "/", ".").Trim

摆脱最后一个讨厌的最后一个斜线，现在是一个时期，如果它在那里。

If Mid(MessyURL, MessyURL.Length, 1) = "." Then
         MessyURL = Mid(MessyURL, 1, MessyURL.Length - 1)

将名称，点和com（或其他）重新组合在一起。

Dim TestName As String

TestName= MessyURL.Split(".").ElementAt(MessyURL.Split(".").Count - 2) &
 "." & MessyURL.Split(".").ElementAt(MessyURL.Split(".").Count - 1)

和whala，一个不错的＆＃39; domain.com＆＃39;要与列表进行比较的testname名称，如果不存在，则插入到列表中......

  If MyListOfUrLs.Items.IndexOf(TestName) = -1 then  MyListOfUrLs.Items.Add(TestName)

Answer 2

您只想检查网址是否与网站使用相同：

For Each result As String In lb_results.Items
   If result.Contains("domain") = True Then
         MsgBox("They have the same URL")
   End If
Next

在VB.net中比较这个的最佳方法是什么

2 个答案: