タイトル : Re^2: コンボボックスの名前 投稿日 : 2005/10/28(Fri) 17:25 投稿者 : さち
じゃんぬねっとさん、ありがとうございます。 説明不足ですみません。 やりたいことはコンボボックスの項目をXMLファイルの要素 から拾って生きたいと考えています。 フォーム上にコンボボックスは沢山ありまたまったく同じ内容のものもあります そこであらかじめXMLファイルに項目を記述しておいてそこから 抜き出していく事を考えました以下ソースとXMLファイルの内容です。 comboBox1に対応するcombo1から要素の内容を抜き出していきたいと考えています 考えが甘かったのでしょうか・・・ じゃんぬねっとさんのおっしゃるようにComboBoxes(0) = ComboBox1 のようにしてみたのですがやはりComboBox1をうまくして出来ません じゃんぬねっとさんのHP今拝見しています。 勉強になります。ありがとうございます。 Function ComboBoxSource(ByRef ComboBoxNumber As String) Dim doc as XmlDocument = new XmlDocument() Dim domdata as XmlNodeList doc.Load("sorce.xml") domdata = doc.GetElementsByTagName("'combo' + ComboBoxNumber") If domdata(0).ChildNodes.Count >= 0 Then Dim i As Integer for i = 0 To domdata(0).ChildNodes.Count-1 "comboBox" + ComboBoxNumber.Items.Add(domdata(0).ChildNodes(i).InnerText) Next End If End Function ++++++++++++++++++++++++++++++++ <?xml version="1.0" encoding="Shift_JIS"?> <sorce> <combo1> <text>9:00</text><text>10:00</text><text>11:00</text>&l t;text>12:00</text><text>13:00</text> </combo1> <combo2> <text>田中</text><text>楠元</text><text></text> </combo2> <combo3> <text>普通</text><text>書留</text><text>配達記録</text> </combo3> </sorce> |