如何在表單中分支？-有解無憂

我正在 MS Access 中創建一個表單。我有兩個名為“CIP/MYOP NO：”和“如果是，合同編號：”的欄位，我使用查找向導為這兩個欄位創建了一個是/否答案選項。當用戶為“CIP/MYOP NO:”選擇“是”時，應出現一個需要附件的欄位。當為“如果是合同編號：”選擇“是”時，應出現一個文本欄位。選擇“否”時，它應跳到表單中的下一個欄位。

我將如何去創造這樣的東西？我嘗試使用 If/Else 和 GotoControl 創建宏，但一直收到資料型別錯誤。我對語法或宏一無所知，谷歌也沒有讓我更接近解決問題。如果有人可以提供幫助，我將不勝感激。

uj5u.com熱心網友回復：

請執行下列操作。

將附件欄位和文本框的可見屬性設定為否您可以使用屬性視窗來執行此操作。
在 Vba 中撰寫以下內容以根據是否勾選了是或否來觸發上面 1 中的控制元件可見或不可見。我使用的是/否資料型別，其中選中 = 是，未選中 = 否。您將在三個事件下撰寫三個代碼。

A. CIP/MYOPNO 控制元件的更新后事件 B. YesContractNumber 控制元件的更新后事件 C. 表單當前事件（這是為了確保 A 和 B 中的代碼是根據活動記錄中的值觸發的，并且不會影響另一條記錄。

    Private Sub CIP_MYOPNOYES_AfterUpdate()
    If Me.CIP_MYOPNOYES.Value = -1 Then
    Me.ATTACHMENT.Visible = True
    Else
    Me.ATTACHMENT.Visible = False
    End If
    
    End Sub

     Private Sub CONTRACTNUMBERYES_AfterUpdate()
        If Me.CONTRACTNUMBERYES.Value = -1 Then
      Me.CONTRACTNOSTEXTFIELD.Visible = True
      Else
      Me.CONTRACTNOSTEXTFIELD.Visible = False
      End If
     End Sub




     Private Sub Form_Current()
         If Me.CIP_MYOPNOYES.Value = -1 Then
      Me.ATTACHMENT.Visible = True
      Else
      Me.ATTACHMENT.Visible = False
      End If
    
       If Me.CONTRACTNUMBERYES.Value = -1 Then
      Me.CONTRACTNOSTEXTFIELD.Visible = True
      Else
    Me.CONTRACTNOSTEXTFIELD.Visible = False
    End If
    
    End Sub

我附上了兩張顯示如何在表單中分支？它的圖片。

如何在表單中分支？

轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/419400.html

標籤：

上一篇：vuejs中api呼叫完成后如何執行函式？

下一篇：根據鏈接表中的PK，使用FK在Access中顯示鏈接表中的記錄