vb中当值为null时，怎么改变它的值

答案:2 悬赏:20 手机版

解决时间 2021-12-20 14:02

提问者网友：最爱你的唇
2021-12-20 04:25

Private Sub Command1_Click()
For j = 1 To 13
Data1.Recordset.MoveFirst
re: For i = 0 To 5
If i > 0 Then Data1.Recordset.MoveNext
r=Data1.Recordset.Fields(j)；在这里的时后，在调入的数据Data1.Recordset.Fields(j)中有部分的数据是空值，赋值给r时是NULL，无法继续进行循环。
a(j, i) = r
Print a(j, i)
Next i
Next j

End Sub

请问这个问题怎么解决？
请高手帮帮忙！
万分感谢！

最佳答案

五星知识达人网友：不甚了了
2021-12-20 05:32

首先，不大清楚你R定义的是什么类型，如果是字符类型的话，应该不会不循环。
如果是数值型，那你可以加个判断语句，if Data1.Recordset.Fields(j)==null then r=0 else
r=Data1.Recordset.Fields(j) end if

另外，r=Data1.Recordset.Fields(j)；这句多了个；号。

全部回答

1楼网友：街头电车
2021-12-20 06:38

可以用IsNull()函数判断是不是NULL，然后再进行赋值。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息