回答編集履歴
3
修正
test
CHANGED
|
@@ -18,17 +18,21 @@
|
|
|
18
18
|
|
|
19
19
|
また、合計を算出する必要があるのであれば、まず倉庫管理コントロール側でそのコントロールが保持するデータの合計を取得できるプロパティを用意して、そのプロパティを合計するのがいいのではないでしょうか。
|
|
20
20
|
|
|
21
|
-
また、計算時に数値かどうかのチェックを行っていますが、これらはコントロール側で実装すべきことなのではないかと思います。
|
|
21
|
+
また、計算時に数値かどうかのチェックを行っていますが、これらは入力させているコントロール側が責任を持つべきでコントロール側で実装すべきことなのではないかと思います。
|
|
22
|
+
|
|
23
|
+
(というか、コントロール内部でも合計を取っていそうなので、そこでも行っているのではないですか？)
|
|
22
24
|
|
|
23
25
|
|
|
24
26
|
|
|
27
|
+
|
|
28
|
+
|
|
25
|
-
例）コントロールにSumという合計を返すプロパティを実装した場合
|
|
29
|
+
例）コントロールにRSumという合計を返すプロパティを実装した場合
|
|
26
30
|
|
|
27
31
|
```VBNET
|
|
28
32
|
|
|
29
33
|
Dim Controls = Me.Controls.OfType(Of 倉庫管理コントロール)
|
|
30
34
|
|
|
31
|
-
Dim sum = Controls.Sum(Function(c) c.Sum)
|
|
35
|
+
Dim Rsum = Controls.Sum(Function(c) c.RSum)
|
|
32
36
|
|
|
33
37
|
```
|
|
34
38
|
|
2
修正
test
CHANGED
|
@@ -16,11 +16,7 @@
|
|
|
16
16
|
|
|
17
17
|
|
|
18
18
|
|
|
19
|
-
また、合計を算出する必要があるのであれば、まず倉庫管理コントロール側でそのコントロールが
|
|
20
|
-
|
|
21
|
-
保持するデータの合計を取得できるプロパティを用意して、そのプロパティを合計するのがいいのでは
|
|
19
|
+
また、合計を算出する必要があるのであれば、まず倉庫管理コントロール側でそのコントロールが保持するデータの合計を取得できるプロパティを用意して、そのプロパティを合計するのがいいのではないでしょうか。
|
|
22
|
-
|
|
23
|
-
ないでしょうか。
|
|
24
20
|
|
|
25
21
|
また、計算時に数値かどうかのチェックを行っていますが、これらはコントロール側で実装すべきことなのではないかと思います。
|
|
26
22
|
|
1
追記
test
CHANGED
|
@@ -13,3 +13,27 @@
|
|
|
13
13
|
```
|
|
14
14
|
|
|
15
15
|
このような形で型を指定して取り出すことができます。
|
|
16
|
+
|
|
17
|
+
|
|
18
|
+
|
|
19
|
+
また、合計を算出する必要があるのであれば、まず倉庫管理コントロール側でそのコントロールが
|
|
20
|
+
|
|
21
|
+
保持するデータの合計を取得できるプロパティを用意して、そのプロパティを合計するのがいいのでは
|
|
22
|
+
|
|
23
|
+
ないでしょうか。
|
|
24
|
+
|
|
25
|
+
また、計算時に数値かどうかのチェックを行っていますが、これらはコントロール側で実装すべきことなのではないかと思います。
|
|
26
|
+
|
|
27
|
+
|
|
28
|
+
|
|
29
|
+
例）コントロールにSumという合計を返すプロパティを実装した場合
|
|
30
|
+
|
|
31
|
+
```VBNET
|
|
32
|
+
|
|
33
|
+
Dim Controls = Me.Controls.OfType(Of 倉庫管理コントロール)
|
|
34
|
+
|
|
35
|
+
Dim sum = Controls.Sum(Function(c) c.Sum)
|
|
36
|
+
|
|
37
|
+
```
|
|
38
|
+
|
|
39
|
+
みたいな感じで
|