主题：有客户电脑发现一个错误，但在我的电脑没发现，求助！

请问在打开一窗口时出出如下提示，是什么意思？如何查找原因？

有关调用实时(JIT)调试而不是此对话框的详细信息，
请参见此消息的结尾。

************** 异常文本 **************
System.NullReferenceException: 未将对象引用设置到对象的实例。
   在 Foxtable.WinForm.Control.WriteValue()
   在 Foxtable.WinForm.Form.O__ooo_o(Object A_0, FormClosingEventArgs A_1)
   在 System.Windows.Forms.Form.OnFormClosing(FormClosingEventArgs e)
   在 System.Windows.Forms.Form.WmClose(Message& m)
   在 System.Windows.Forms.Form.WndProc(Message& m)
   在 System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
   在 System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
   在 System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)

************** 已加载的程序集 **************

是不是这个问题？ 并列窗口？

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=62170&authorid=0&page=0&star=1

是一直都出错，还是具体怎样操作之后才报错，还是随机出错？加入msgbox检查一下代码

客户系统（WIN7）是随机出错的，没并列窗口，操作过程是：在一表的行中双击，然后会根据其中一列的内容，打开不同的独立窗口。

DoubleClick

双击单元格后执行。

e参数属性：

Table:  引发事件的表
Row:    引发事件的行
Col:    引发事件的列
Cancel： 逻辑型，设置为True，将禁止双击单元格进入编辑状态。

代码：

Dim s As String = ""
Dim r As Row = Tables("obas_part_spec").Current
If r IsNot Nothing Then
    s = r("产品类别")
 
End If

Select Case s
   
    Case "铝门锁","鹅旦锁","有尾门锁"
       
        Forms("产品规格表2").Show
       
    Case Else
       
        Forms("产品规格表").Show
       
End Select

改成这样看看

e.Cancel = True

Dim s As String = ""
s = e.row("产品类别")

Select Case s
    Case "铝门锁","鹅旦锁","有尾门锁"
        Forms("产品规格表2").Show
    Case Else
        Forms("产品规格表").Show
End Select