老师好。下面代码想按给定的变量条件,在“累计表”的“所属期间”列查找是否存在相同的值,如果存在就提示。但现在只能返回一个。比如:“累计表”的“所属期间”列已存在各自多行的“201812、201901、201902、201903、201904”的值,在我选定条件“201904”时,能返回已存在的信息,但如果再选择“201812” 或 “201901” 或 “201902” 或 “201903” 时就返不回已存在的信息了。请老师帮助指正。谢谢。
我想要的效果是:只要在“累计表”的“所属期间”列存在与给定条件相同的任意值,就提示已存在。除非是“累计表”的“所属期间”列没有的才不提示(主要是为避免重复计做同期工资)
Dim Ljqj As String = Tables("累计表").current("所属期间") '声明变量初值为"累计表"的"所属期间"
Dim Ssqj As String '声明变量用于存储选定的"所属期间"
Dim Ssqj_n As String = e.Form.Controls("ComboBox3_Qjn").TEXT '声明变量用于存储选定的"所属期间"的"年"
Dim Ssqj_y As String = e.Form.Controls("ComboBox4_Qjy").TEXT '声明变量用于存储选定的"所属期间"的"月"
Ssqj = Ssqj_n + Ssqj_y
If Ssqj = Ljqj Then
MessageBox.Show("你选择的【" & Ssqj & "】期间的薪资已计发, 不可重复!","提示",MessageBoxButtons.Ok,MessageBoxIcon.Information)
Return
End If
[此贴子已经被作者于2019/4/10 10:25:34编辑过]