DriveType函數在vb.net

我有這個代碼來比較Driver.Name與我的資源中的字符串的問題，如：如果Driver.Name =「D：\」然後做一些事情，這是我的代碼：DriveType函數在vb.net

Imports System.IO 
Public Class Form1 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
     For Each drive As IO.DriveInfo In IO.DriveInfo.GetDrives() 
      If drive.DriveType = DriveType.Fixed Then 
       If drive.IsReady = True Then 
        ' this is the list in my resource 
        '"D:\"|"E:\"|"F:\"|"G:\"|"H:\"|"L:\"|"K:\"|"M:\"|"O:\"| 
        For Each word As String In My.Resources.String1.Split(CChar("|")) 
         If word.ToString.Contains(drive.Name) Then 
          MsgBox("One Driver Found") 
         Else 
          MsgBox("No Driver Found") 
         End If 
        Next 
       End If 
      End If 
     Next 
    End Sub 

End Class

來源

2015-06-04 user3438908

「我有問題」不是很具描述性。 – Plutonix

這段代碼總是返回MsgBox（「找不到驅動程序」） – user3438908

請花點時間仔細閱讀此* *：[Ask] – Plutonix

試着改變你的資源字符串

從這個

'"D:\"|"E:\"|"F:\"|"G:\"|"H:\"|"L:\"|"K:\"|"M:\"|"O:\"|

對此

'"D:\|E:\|F:\|G:\|H:\|L:\|K:\|M:\|O:\|"

來源

2015-06-05 01:54:59 Zeddy

仍然一樣。它沒有改變 – user3438908

你真的有資源字符串中列出的任何驅動器？我試過了，它工作正常，並顯示正確的消息。 – Zeddy

是的，我有D：\驅動器 – user3438908

DriveType函數在vb.net

回答

相關問題