如何解决此代码中的“对象变量或块变量未设置”？

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
    conn.Open() 
    cmd.Connection = conn 
    cmd.CommandText = "Select RoomName from Room_Details" 
    dr = cmd.ExecuteReader 
    While dr.Read 
     ComboBox3.Items.Add(ComboBox2.SelectedItem(dr("RoomName"))) 
     ComboBox2.Items.Remove(ComboBox2.SelectedItem(dr("RoomName"))) 
    End While 
    conn.Close() 
End Sub

我试试这个代码，但它引发以下错误：如何解决此代码中的“对象变量或块变量未设置”？

Object variable or with block variable not set

如何提高我的代码，以解决这一问题？

来源

2012-01-31 Randy

当使用调试器时，你在哪一行看到异常？ – 2012-01-31 04:38:49

@Jay Riggs，tsk tsk，现在玩起来不错 - ） – 2012-01-31 04:42:41

@astander我知道，这就是为什么我删除了我无用的评论！ :) – 2012-01-31 04:43:49

一些可能性：

我没有看到的conn声明的任何地方，你确定它被实例化？
同上cmb - 在任何地方都看不到实例。检查是否完成。
我不确定使用ComboBox2.SelectedItem(dr("RoomName"))是正确的。也许试试ComboBox2.FindStringExact(dr("RoomName"))

来源

2012-02-03 09:59:21

如何解决此代码中的“对象变量或块变量未设置”？

回答

相关问题