Question

我正在设计一个具有很多复选框的任务单数据库，而不是创建“是/否”字段，而是决定使用使用“表单”上的复选框的“日期”字段来使用= Now()函数设置所述日期：

Private Sub DXF_Chk_Click()
dxfLimits = Now()
End Sub

但是，如果有人取消选中该复选框，则日期只会更新，而在我们的“报告”中，这些复选框将保持选中状态。

我的想法是编写一个代码，检查“日期”字段是否已填充，并将其为On Click为空，但这不起作用：

If Me.DXF_Chk = 1 Then
  Me.dxfLimits = Now()
 Else
  Me.dxfLimits = Null
 End If

或者不理会当前的“单击时”，并在After_Update event中使用一些代码。我不确定哪种协议正确，也不确定代码本身在做什么。

对不起，我是菜鸟。

Answer 1

这就是我要做的：

Me.dxfLimits = IIF(Me.DXF_chk, Now(), NULL)

Answer 2

尝试一下

 Allocation bmpAlloc = Allocation.createFromBitmap(rs, bitmap);

 // Allocation where to store the result color (for output purposes)
 Allocation colorAlloc = Allocation.createSized(rs, Element.I32(rs), 1);

 ScriptC_findcolor scriptC = new ScriptC_findcolor(rs);
 scriptC.forEach_channelHist(bmpAlloc);
 scriptC.forEach_getResult(colorAlloc);

 int[] a = new int[1];
 colorAlloc.copyTo(a);
 int color = a[0];

OR

Private Sub DXF_chk_AfterUpdate()
    If Me.DXF_chk.Value Then
     Me.dxfLimits = Now()
    Else
     Me.dxfLimits = Null
    End If
End Sub

注意：Private Sub DXF_chk_AfterUpdate() If Me.DXF_chk = -1 Then Me.dxfLimits = Now() Else Me.dxfLimits = Null End If End Sub

MS-Access复选框= Now（）单击；取消选中是否为空？

2 个答案: