主题：图片列一插入图片FOXTABLE就全部关闭退出

备注列拓展为 图片类型，一旦插入图片FOXTALBE就强制退出了。

 你的datacolchanged事件编写有问题

 

http://www.foxtable.com/help/topics/1522.htm

 

我还没有看到 代码和编程。现在就想先用表里的 备注拓展为图片类型来方便管理图片。变成方面我不懂，也不知道datacolchanged事件在哪里编写，有其他什么办法解决吗

 

不可能插入图片就退出的。

 

你看看你有没有写什么事件代码 http://www.foxtable.com/help/topics/1445.htm

 

此主题相关图片如下：ffff.jpg

 把你做的项目发上来看看。

当时需要用到 模糊输入，所以参考了这章设置了代码。运行正常，效果也不错。今天的图片就无法插入了

 

或者贴出对应代码。

CellButtonClick

有3个地方设置了代码--

1--CellButtonClick  代码：

If e.Col.Name = "YP供应商编号" Then

    e.Cancel = True

    Forms("GY供应商信息选取").Open()

End If

2--在新建窗口--GY供应商信息选取，设置了事件代码Textchanged：

Dim txt As String = e.Form.Controls("TextBox1").Text

Dim tbl As Table = Tables("GY供应商信息选取_Table1")

If txt = "" Then

    tbl.Filter = ""

Else

    txt = "'%" & txt & "%'"

    tbl.Filter = "GY供应商编号 Like " & txt & " Or GY供应商全称 Like " & txt & " Or GY供应商简码 Like " & txt 

End If

3---在新建窗口--GY供应商信息选取，设置了事件代码 Keydown：

Dim tbl As Table = Tables("GY供应商信息选取_Table1")

If e.KeyCode = Keys.Up Then

    tbl.Position = tbl.Position - 1

    e.Cancel = True

ElseIf e.KeyCode = Keys.Down Then

    tbl.Position = tbl.Position + 1

    e.Cancel = True

ElseIf e.KeyCode = Keys.Enter Then

    If tbl.Current IsNot Nothing Then

        Tables("YP样品信息表").Current("YP供应商编号") = tbl.Current("GY供应商编号")

    End If

    e.Cancel = True    

    e.Form.Close()

End If