質問編集履歴
5
改行削除
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -7,7 +7,6 @@
|
|
|
7
7
|
Value内が{}だった時の意味とif文で判定させる方法を教えて下さい。
|
|
8
8
|
|
|
9
9
|
```vb.net
|
|
10
|
-
|
|
11
10
|
While i < row
|
|
12
11
|
If dgv.Rows(i).Cells(0).Value Is Nothing Then
|
|
13
12
|
|
|
@@ -32,5 +31,4 @@
|
|
|
32
31
|
|
|
33
32
|
i += 1
|
|
34
33
|
End While
|
|
35
|
-
|
|
36
34
|
```
|
4
改行を付けたし
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -33,4 +33,4 @@
|
|
|
33
33
|
i += 1
|
|
34
34
|
End While
|
|
35
35
|
|
|
36
|
-
``
|
|
36
|
+
```
|
3
改行を付けたし
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -32,4 +32,5 @@
|
|
|
32
32
|
|
|
33
33
|
i += 1
|
|
34
34
|
End While
|
|
35
|
+
|
|
35
36
|
``
|
2
改行を付けたし
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -7,6 +7,7 @@
|
|
|
7
7
|
Value内が{}だった時の意味とif文で判定させる方法を教えて下さい。
|
|
8
8
|
|
|
9
9
|
```vb.net
|
|
10
|
+
|
|
10
11
|
While i < row
|
|
11
12
|
If dgv.Rows(i).Cells(0).Value Is Nothing Then
|
|
12
13
|
|
1
プログラム追加
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -4,4 +4,31 @@
|
|
|
4
4
|
|
|
5
5
|
DataGridViewでのセルで空白だった場合セル内のValueの値がnothing だったり、DBNullと表示されてきました。しかし現在セルを不必要に増やしたところ、Valueの値が{}様な物が入っていました。if文でDBNullだったりNothingだったらループを抜けようとしましたが、反応しません。
|
|
6
6
|
|
|
7
|
-
Value内が{}だった時の意味とif文で判定させる方法を教えて下さい。
|
|
7
|
+
Value内が{}だった時の意味とif文で判定させる方法を教えて下さい。
|
|
8
|
+
|
|
9
|
+
```vb.net
|
|
10
|
+
While i < row
|
|
11
|
+
If dgv.Rows(i).Cells(0).Value Is Nothing Then
|
|
12
|
+
|
|
13
|
+
Exit While
|
|
14
|
+
|
|
15
|
+
ElseIf dgv.Rows(i).Cells(0).Value Is DBNull.Value And dgv.Rows(i).Cells(3).Value Is DBNull.Value Then
|
|
16
|
+
|
|
17
|
+
MessageBox.Show("日付と金額が入力されていない為、保存できませんでした。", "日付と金額が入力されておりません。", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
|
18
|
+
Exit Sub
|
|
19
|
+
|
|
20
|
+
ElseIf dgv.Rows(i).Cells(0).Value Is DBNull.Value Then
|
|
21
|
+
|
|
22
|
+
MessageBox.Show("日付が入力されていない為、保存できませんでした。", "日付が入力されておりません。", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
|
23
|
+
Exit Sub
|
|
24
|
+
|
|
25
|
+
ElseIf dgv.Rows(i).Cells(3).Value Is DBNull.Value Then
|
|
26
|
+
|
|
27
|
+
MessageBox.Show("金額が入力されていない為、保存できませんでした。", "金額が入力されておりません。", MessageBoxButtons.OK, MessageBoxIcon.Error)
|
|
28
|
+
Exit Sub
|
|
29
|
+
|
|
30
|
+
End If
|
|
31
|
+
|
|
32
|
+
i += 1
|
|
33
|
+
End While
|
|
34
|
+
``
|