Foxtable(狐表)用户栏目专家坐堂 → 这二代码,功能冲突,如何处理?


  共有1935人关注过本帖平板打印复制链接

主题:这二代码,功能冲突,如何处理?

帅哥哟,离线,有人找我吗?
lin98
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1062 积分:7029 威望:0 精华:0 注册:2020/11/4 22:15:00
这二代码,功能冲突,如何处理?  发帖心情 Post By:2023/3/26 12:57:00 [只看该作者]

这二代码,功能冲突,如何处理?


Dim t1 As String = e.form.controls("TextBox1").text 
Dim t2 As String = e.form.controls("ComboBox1").text 
Dim t3 As String = e.form.controls("ComboBox2").text 
Dim t4 As String = e.form.controls("TextBox9").text 
Dim t5 As String = e.form.controls("TextBox10").text 
Dim t6 As String = e.form.controls("ComboBox5").text 
Dim t7 As String = e.form.controls("DateTimePicker1").text 

e.form.controls("按键1").enabled = Not ( t1 = "" OrElse t2 = "" _
OrElse t3 = "" OrElse t4 = "" OrElse t5 = "" _
OrElse t6 = "" OrElse t7 = "") 

--------------------------------------------------


If DataTables("表A").compute("count(审核)", "审核=false") > 0 Then
    forms("入库登记").controls("按键1").enabled = False
 
Else
    forms("入库登记").controls("按键1").enabled = True
    
End If


---------------------------------------------------------------

 回到顶部