質問編集履歴
4
誤字修正 DB型からDT型 (DataTable)
title
CHANGED
@@ -1,1 +1,1 @@
|
|
1
|
-
SQLから取得したレコード順に
|
1
|
+
SQLから取得したレコード順にDT型からHashtable型に格納したいです。
|
body
CHANGED
File without changes
|
3
修正
title
CHANGED
File without changes
|
body
CHANGED
@@ -33,8 +33,6 @@
|
|
33
33
|
Dim htStorage As New Hashtable
|
34
34
|
|
35
35
|
For x As Integer = 0 To dtStorage.Rows.Count - 1
|
36
|
-
'初期化処理
|
37
|
-
htStorage = New Hashtable
|
38
36
|
'取得した行のカラム数分回す
|
39
37
|
For y As Integer = 0 To dtStorage.Columns.Count - 1
|
40
38
|
'Key=Columns、Value=列の値
|
2
誤字
title
CHANGED
File without changes
|
body
CHANGED
@@ -19,9 +19,9 @@
|
|
19
19
|
2列目Key=|sex| value=|男|
|
20
20
|
|
21
21
|
現在の結果
|
22
|
-
0列目Key=|age|
|
22
|
+
0列目Key=|age| Value=|21|
|
23
|
-
1列目Key=|sex|
|
23
|
+
1列目Key=|sex| Value=|男|
|
24
|
-
2列目Key=|name|
|
24
|
+
2列目Key=|name| Value=|田中|
|
25
25
|
|
26
26
|
###該当のソースコード
|
27
27
|
```ここに言語を入力
|
@@ -32,7 +32,6 @@
|
|
32
32
|
|
33
33
|
Dim htStorage As New Hashtable
|
34
34
|
|
35
|
-
'取得した行数分回す
|
36
35
|
For x As Integer = 0 To dtStorage.Rows.Count - 1
|
37
36
|
'初期化処理
|
38
37
|
htStorage = New Hashtable
|
1
誤字
title
CHANGED
File without changes
|
body
CHANGED
@@ -1,6 +1,6 @@
|
|
1
1
|
###前提・実現したいこと
|
2
2
|
|
3
|
-
DBからレコードを取得し
|
3
|
+
DBからレコードを取得しDataTable型の変数に入れたのち、Key=カラム、Value=列の値で
|
4
4
|
Hashtableを作成したのですが、Hashtableにレコードの順(Select文の結果順)で値が
|
5
5
|
格納されず、順番がバラバラで格納され困っています。
|
6
6
|
|