タイトル : Re^2: Structureを可変な配列で使用したいです。 投稿日 : 2007/06/10(Sun) 15:01 投稿者 : もねを
魔界の仮面弁士さん いつもありがとうございます。 配列は可能をヒントにして以下のようにして出来ました。 ありがとうございます。 Public Structure strMeisai Public Naiyo As String Public Syohin As String Public Suryo As String Public TaniName As String Public TaniCode As String Public Tanka As String Public Kingaku As String Public Tax As String Public Biko As String End Structure Private TIndex As Integer Private Meisai() As strMeisai TIndex = int明細行数 ← DBから取得した内容 dim Meisai(TIndex ) For i = 0 To TIndex Meisai(i).Naiyo = "" Meisai(i).Syohin = "" Meisai(i).Suryo = "" Meisai(i).TaniName = "" Meisai(i).TaniCode = "" Meisai(i).Tanka = "" Meisai(i).Kingaku = "" Meisai(i).Tax = "" Meisai(i).Biko = "" Next |