XMLファイル読み込み

Imports System.Xml

Private Function hoge() As Boolean

  Dim xDoc As XmlDocument = New XmlDocument
  Dim xNode As XmlNode
  Dim strUserId As String

  xDoc.Load("hoge.xml")
  xNode = xDoc.SelectSingleNode("CONFIG/CONNECT/USERID")
  strUserId = xNode.InnerText

End Function

XML結構扱いやすいね。