回答編集履歴
1
ソース修正
test
CHANGED
|
@@ -20,10 +20,10 @@
|
|
|
20
20
|
|
|
21
21
|
```VBNET
|
|
22
22
|
|
|
23
|
-
Dim
|
|
23
|
+
Dim selectedRows As DataRow() = tblM.Select("Month = '" & txtTuki.Text & "'")
|
|
24
24
|
|
|
25
|
-
Dim r As DataRow =
|
|
25
|
+
Dim row As DataRow = selectedRows(0)
|
|
26
26
|
|
|
27
|
-
Dim Month_Kizon As Integer = r("INDEX")
|
|
27
|
+
Dim Month_Kizon As Integer = row("INDEX")
|
|
28
28
|
|
|
29
29
|
```
|