問題：VBAのMS Access

Question

私はコンボボックス

StrSQL = "Select BankID, BankName As [Please Select Bank] from tblBank" 
With Me.cmbBankSearch 
    .RowSource = StrSQL 
    .ColumnCount = 2 
    .BoundColumn = 1 
    .ColumnWidths = "0in.;1in." 
    .ColumnHeads = True 
    .LimitToList = True 
    .Requery 
    .Value = "Please Select Bank" 
End With 

しかし、原因、私は銀行を選択してください」である最初の項目を選択することはできませんよ、いくつかの理由を移入するコードを以下しています"

何か間違っていますか？

下記のコメントに従って、以下のコードを変更しました。

StrSQL = "Select 0 as BankID, 'Please Select Bank' As [Please Select Bank] from tblBank UNION Select BankID, BankName As [Please Select Bank] from tblBank" 

With Me.cmbBank 
    .RowSource = StrSQL 
    .ColumnCount = 2 
    .BoundColumn = 1 
    .ColumnWidths = "0in.;1in." 
    .ColumnHeads = True 
    .LimitToList = True 
    .Requery 
End With 

Answer 1

これは、（コンボ/リストボックスからの値が常に文字列である）十分なはずです：

StrSQL = "Select BankID, BankName As [Please Select Bank] from tblBank" 
With Me.cmbBankSearch 
    .RowSource = StrSQL 
    .ColumnCount = 2 
    .BoundColumn = 1 
    .ColumnWidths = "0in.;1in." 
    .ColumnHeads = True 
    .LimitToList = True 
    .Value = "0" 
End With 

編集 - 列の頭を持っていないに：

With Me.cmbBankSearch 
    .RowSource = StrSQL 
    .ColumnCount = 2 
    .BoundColumn = 1 
    .ColumnWidths = "0in.;1in." 
    .ColumnHeads = False 
    .LimitToList = True 
    .Value = "0" 
End With