XML内のノードの値を読みます
「文字列コンテンツのアドレス定義されたXML
薄暗いxmlFileStrとして文字列=「」
希望読み出したノードを定義するためのタイトル」
薄暗いreadNodeNameとして文字列=「」
文字列としての機能ReadXmlの説明（ByValのxmlFileStrとして文字列、ByValのreadNodeNameとして文字列）
「ノードの内容を定義します
点心のnodeValueとして文字列=「」
試します
「定義されたXMLドキュメントオブジェクト
新しいXmlDocumentオブジェクトとして暗いドキュメント
「ロードXMLコンテンツ
doc.LoadXml（xmlFileStr）
「読むのXMLコンテンツ
XmlNodeReader =新XmlNodeReader再点心（DOC）
薄暗いノード名と文字列
「ノードのサイクルを探します
re.Readながら
ケースre.NodeTypeを選択
ケースXmlNodeType.Element
NodeName = re.Name
ケースXmlNodeType.Text
もし次にNodeName.Equals（readNodeName）
nodeValue = re.Value
END IF
最後の選択
エンドながら
元として例外をキャッチ
MsgBox（ex.Message＆のvbCrLf＆ex.StackTrace）
エンドトライ
リターンのnodeValue
エンド機能