2014-03-27 158 views
1

我想知道如果我能得到一些幫助使這項工作propery。我的代碼總是返回true,即使它應該是false

DevCon = File.ReadAllText("DevConDump.txt") 
    DevID = File.ReadAllText("isLegacy.txt") 
    DevCon = DevCon.ToUpper 
    DevID = DevID.ToUpper 
    Dim words As String() = DevID.Split(New Char() {","c}) 
    For Count = 0 To words.Length 
     If DevID.Contains(words.ElementAt(Count)) = True Then 
      MsgBox(DevID.Contains(words.ElementAt(Count))) 
      MsgBox(words.ElementAt(Count)) 
      'RegKey.CreateSubKey("Intel_DEVID") 
      'RegKey.SetValue("Intel_DEVID", "isLegacy") 
      'RegKey.Close 
      MsgBox("isLegacy") 
     End If 
    Next 

DevConDump.txt包含文本的單行線,包含了一些信息,這將告訴我它是什麼(在這種情況下,一組字母和數字,如「DEV_0011」的,無用的信息所包圍。

isLegacy.txt包含的值的列表,可以爲它包含的內容。

當我運行此代碼,即使它正在檢查值是公然錯誤(例如,如果我把字符串PETER in)它總是返回true,該值不存在。

有人能告訴我我哪裏出了問題嗎?

VB.NET,VS2010

+0

我看不到任何'返回TRUE;這裏 – Steve

+0

什麼要退? – Morvader

+0

在這種情況下,如果它返回true,它會將「isLegacy」寫入註冊表,並執行直至完成。 (此代碼已被註釋掉,直到我可以解決此問題。) – user3468962

回答

2

除非我失去了一些東西DEVID和字包含相同的數據:

Dim words As String() = DevID.Split(New Char() {","c}) 

所以

DevID.Contains(words.ElementAt(Count)) = True 

永遠是正確的。

你打算:

DevCon.Contains(words.ElementAt(Count)) = True 
+0

謝謝!就是這樣!將接受答案,然後讓我在3分鐘! :) (我不能相信我錯過了那個......) – user3468962

+0

NP每個人都需要第二雙眼睛 – Gratzy

相關問題