Question

vb中listview控件的问题

我想把表中的一行添加到listview控件中，显示竖行排列，如果出现表中某个字段的值是空值，也不提示错误，我用do while进行填加的时候，如果有空值就提示错误，怎么解决呢？代码如下：
Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
iniDB '自定义连接数据库
ListView1.ListItems.Clear
Dim b As Integer

Set listv = New ADODB.Recordset
listv.Open "select * from 学生学籍管理表 where 姓名= '" + TreeView1.SelectedItem + "'", cnn, adOpenStatic, adLockBatchOptimistic
Do While Not listv.EOF
b = b + 1
If b = listv.Fields.Count Then
Exit Do
End If
ListView1.ListItems.Add , , listv.Fields(b)
Loop
End Sub

Answer 1

最前面一行加上
on error goto next