A family of Microsoft relational database management systems designed for ease of use.
Try:
=DLookUp("[Phone]","[Broker]","[BrokerShop]='" & [Forms]![Data BookDataEntry]![BrokerShopComboBox] & "'")
If the combo box Row Source uses the table [Broker] you are better off adding the Phone (and other columns) and then using a control source like:
=BrokerShopComboBox.Column(x)
x is the column number from the Row Source. Numbering begins with 0.