试试
LockWindowUpdate(baseMainform.handle)
If DataTables.Contains("生产跟进") = False Then
If DataTables.Contains("物料明细") = False AndAlso DataTables.Contains("进仓子单") = False AndAlso DataTables.Contains("日订单跟进") = False Then
DataTables.Load("生产跟进|进仓子单|日订单跟进|物料明细")
Tables("进仓子单").Visible = False
Tables("物料明细").Visible = False
Tables("日订单跟进").Visible = False
LockWindowUpdate(System.IntPtr.Zero)