主题：[求助] 单元格填入多次内容

 你逻辑是什么？你条件肯定有问题，根据什么修改什么你要先理清楚

以下命令红色部分字体该怎么写命令？

If e.DataCol.Name = "光缆名称"   Then '如果更改的是 ***列 和 ***列

If  当前表中 其他行的【光缆名称】 与 当前行的【光缆名称】  相同  Then

MessageBox.show("【光缆台帐表】中已经存在该名称光缆!!!", "非常关键提醒")

If DataTables("表A").Compute("count(光缆名称)","光缆名称 = '" & Tables("表A").Current("光缆名称") & "'") > 1 Then

End If

如何设置在切换 TabControl 页面时的命令；

比如我要在TabControl1中从 页面1 切换到 页面2 时；检查 页面1 中的 表1 是否被修改、如果被修改则弹出提示。

 编写SelectedIndexChanging事件

If e.Sender.SelectedIndex = 0 Then

ElseIf e.Sender.SelectedIndex = 1 Then

End If

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

 我的【ODM框ODF盘】内容格式为： ODM_01/ODF_02 我希望读取到e.Form.Controls("ODM框ODF盘_" & i2).Text的内容格式为：

ODM_01

ODF_02

以下命令该怎么修改？

For i1 As Integer = 001 To 048
For i2 As Integer = 1 To 4
Dim dr1 As DataRow = DataTables("光缆纤芯台帐表").Find("机房名称 = '" & e.Form.Controls("机房名称1").Text  & "' and 光缆名称 = '" & e.Form.Controls("光缆名称1").Text  & "'and 编号 =  " & (i2-1)*12+1)
If dr1 IsNot Nothing Then
e.Form.Controls("机柜编号_" & i2).Text =  dr1("机柜编号")

End If
Next
Next

我在某控件的 Enter 中写有以下命令；如果我的【业务名称表】新增加了选项内容。那么我只有关闭该控件所在的窗口后、再打开窗口才能看到新增加的选项。我该怎么做才能够不需要关闭窗口就能够看到新增加的选项？

Dim flt As String
e.Sender.ComboList = DataTables("业务名称表").GetComboListString("业务名称","分公司='" &  _User分公司 & "'",flt)

 如果在Enter事件写了，焦点离开以后重新进入，就是直接获取最新的数据的，没你说的问题。