0

フォームを開いて、別のフォームへのハイパーリンクとして ID 番号を設定しました。以下のコードを開いて作成しましたが、[パラメーター値の入力] ダイアログ ボックスが表示されます。ID番号を入力すると、正しく開きます。

Private Sub StudentID_Click()
    Dim recordID As Integer
    recordID = Me.StudentID
    DoCmd.OpenForm "Students Extended", , , "Studentid=StudentNumber"
End Sub
4

1 に答える 1

0

私はあなたがこのようなものを求めていると思います:

Private Sub StudentID_Click()

    Dim recordID As Long

    recordID = Me.StudentID
    DoCmd.OpenForm "Students Extended", , , "Studentid = " & recordID & ""

End Sub
于 2016-04-29T15:38:14.777 に答える