VBA Access

[Aezugles]

Hallo Leute, ich bins wiedermal

habe ein kleines problem:

Private Sub Form_Load()

Dim ParaLogin As String

Dim qry As DAO.QueryDef

Dim rs As DAO.Recordset

Dim rspers As DAO.Recordset

Dim qrypers As DAO.QueryDef

ParaLogin = User()

MsgBox (ParaLogin)

Set qry = CurrentDb.QueryDefs("__bsp__qryLogin")

Set qrypers = CurrentDb.QueryDefs("qryStaffForCombo")

qry.Parameters!ParamLogin = ParaLogin

Set rs = qry.OpenRecordset

Set rspers = qrypers.OpenRecordset

rs.MoveFirst

MsgBox (rs!positionId)

MsgBox (rs!bossId)

MsgBox (ParaLogin)

If rs!staffId = rspers!staffId Then

'Me.staffSearch = rspers!FullName

'Me.staffSearch.Value = rspers!FullName

Me.staffSearch.Text = rspers!FullName '*hier probleme

End If

End Sub

Dies ergibt einen Run-time Error 2185, d.h. access will einen Fokus auf die Form haben, bevor es Me.staffSearch.Text = rspers!FullName einschreibt.

Das Feld ist ein Dropdown TextFeld.

Wie gebe ich Access den Fokus, sprich wie heisst der Zustand der Form nach Load()?

Darf man einem Dropdown menü, den Wert so bestimmen? Am beste wäre, wenn nichts anderes mehr im Dropdown menü auswählbar währe.

Danke für die Hilfe

Gruss

Aezugles