如图所示三处,想得我白头发都多了好几根也没想出个办法,麻烦老师们指教..
![dvubb 图片点击可在新窗口打开查看](images/emot/em53.gif)
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/jpg.gif)
此主题相关图片如下:01.jpg
问题1,如何实现选择某项目时,判断该项目关联表是否有空行,有则返回,无则自动增加行.
我在ComboBox1控件的Valuechanged这样写报错,
注:原版是外部数据.
Dim cmd As SQLCommand
这里原有连接语句
Dim ls As DataTable
Dim dt As integer
Dim dr As string = e.form.controls("ComboBox1").Value
cmd.commandtext = "select 第三列 From [表B] where 第一列 = '"& dr &"' and 第二列 = ''"
ls = cmd.ExecuteReader()
dt = ls.datarows.count
if dt > 0 Then
Return
Else
Tables("表A.表B").AddNew()
end if
问题二:如何在指定列(如第八列)录入完数据按下回车键自动增加新行?帮助里都是到最后一行....才能新增..郁闷.
问题三:
如何在主窗口加载时不显示当前主表选择行(一般为第一行)关联表数据?直到选择ComboBox1下拉选项时才出现相应关联表数据?
[此贴子已经被作者于2009-1-11 8:41:14编辑过]