双击窗口表单元格,打开录入窗口,在文本框录入数字,写入当前单元格。
但是第一个被双击的单元格写不进去,要变换第二个单元格以后才能写进去,是哪里的问题?
谢谢!
此主题相关图片如下:截屏图片 (1).jpg
1、窗口表的DoubleClick-双击单元格打开录入窗口
If e.Col.Name = "二审案号" Then
Forms("上诉案号").open()
End If
2、录入窗口的TextChanged-文本框录入数字,组合成案号写入当前单元格
If Forms("上诉管理").opened AndAlso e.Form.Controls("TextBox1").text <> "" Then
Tables("上诉管理_table1").Current("二审案号") = Forms("上诉案号").Controls("ComboBox1").text & e.Form.Controls("TextBox1").text & "号"
End If