VB.NETで、配列をテーブルに変換する。

質問

VB.NETで、一次元配列string()にあるデータを、DataTableに変換
したいのですが、「型'String'の値を'System,Data,DataTable'に変換できません。」
と、エラーが発生してしまいます。

s1に、配列データが入っています。

Dim dt As DataTable
Dim cnt As Integer
Dim i As Integer
dt = New DataTable
count = s1.Length
For i = 0 To cnt - 1
dt = CType(s1(i), DataTable)
Next

解決方法が見つからず、行き詰っております。
宜しくお願い致します。

回答No.3

n-jun · ベストアンサー

Ｎｏ．２です。

＞ListBox1.DataSource = dtを、追加記載してから、
＞「System.Data.DataRowView」が表示され、テーブルが表示されません。
まず文字型の１次元配列をＬｉｓｔＢｏｘ１にDataSource で代入するなら

Dim s1() As String = New String() {"a", "b", "c", "d"}
ListBox1.DataSource = s1

これで十分なはずですが・・・

テーブルとして表示するならDataGridViewを配置して
行なうのがよくある使い方と思います。
http://www.cocoaliz.com/vb.net/index/24/

お礼

新規でDataGridViewを使用すると、思い通りの結果ができました。
しかし、組み込みますと、「'dataType'引数をNullにすることはできません。」のエラーが発生してしまいます。
原因を追究していましたが、解決にはなりませんでした。
方法は分かりましたので、何とか別の方向で使用出来るようにしたいと思います。
ありがとうございました。

回答No.2

n-jun

Ｎｏ．１です。

コード自体は新規のもので書いてみたものですので、
実際組み込んでみてダメだったとすると
ちょっと不明ですね。

新規でやってみてダメだったとすると
バージョンによるのかな？
⇒一応こちらは２００５の参考書を基に
２００８で検証しましたけど、
特にコードに書かれていること以外には
何もしてなくて・・・・

お礼

ありがとうございます。
組み込みでやっておりましたが、新規で実行しましても、
ListBox1.DataSource = dtを、追加記載してから、「System.Data.DataRowView」が表示され、テーブルが表示されません。

後、バージョンは、２０１２を、使用しております。

回答No.1

n-jun

Dim s1() As String = New String() {"a", "b", "c", "d"}
Dim dt As DataTable
Dim dr As DataRow
Dim cnt As Integer
Dim i As Integer
dt = New DataTable
dt.Columns.Add("test", Type.GetType("System.String"))
cnt = s1.Length
For i = 0 To cnt - 1
dr = dt.NewRow()
dr("test") = s1(i)
dt.Rows.Add(dr)
Next

For i = 0 To dt.Rows.Count - 1
Debug.Print(dt.Rows(i).Item("test").ToString)
Next

こんな感じとか？

お礼

早速のご回答ありがとうございます。
試しました所、
>dt.Columns.Add("test", Type.GetType("System.String"))

で、'dataType'引数をNullにすることはできません。と、エラーが発生してしまいます。
解決方法を探しましたが見つかりませんでした。
どのように対処すれば良いか分かりますでしょうか？