ComboBox 控件在 Visual Basic 2005 中

nxhujiee 2010-04-16

展開全文

Visual Basic 6.0 中的 ComboBox 控件在 Visual Basic 2005 中由 Windows 窗體 ComboBox 控件所取代,。某些屬性、方法,、事件和常數的名稱是不同的,，在某些情況下，行為也有所不同,。

概念差異

更改事件

在 Visual Basic 6.0 中,，ComboBox 控件的 Change 事件在修改控件文本時引發(fā)。從控件的列表部分選擇列表項時不引發(fā) Change 事件,。以編程方式更改列表項的文本不會引發(fā) Change 事件。

Visual Basic 2005 中沒有 Change 事件，無論出于任何原因對文本進行更改,，都會引發(fā) TextChanged 事件,，例如：

修改文本輸入部分
選擇列表項
以編程方式修改列表項
調用 AddItem 方法

ItemData 屬性

在 Visual Basic 6.0 中，可以在設計時在“屬性”窗口中設置 ComboBox 控件的 ItemData 屬性,，以便將 Integer 與 ComboBox 項關聯(lián),。

在 Visual Basic 2005 中，ItemData 屬性不再存在,。Microsoft.VisualBasic.Compatibility 庫包含一個 SetItemData 函數,，該函數可用于將 Integer 與項關聯(lián)；GetItemData 函數可用于檢索該項。

Locked 屬性

在 Visual Basic 6.0 中,，ComboBox 控件的 Locked 屬性確定是否可以編輯該控件的文本框部分,。

在 Visual Basic 2005 中，Locked 屬性可防止在設計時移動控件,。Visual Basic 6.0 Locked 屬性沒有直接等效項,；但是，可以通過將 ComboBox 控件的 DropDownStyle 屬性設置為 DropDownList 實現(xiàn)相同的效果,。

注意在 Visual Basic 6.0 中,，將 Locked 屬性設置為 True 也可以防止選擇被更改。通過在 MouseDown 事件中取消選擇可以重復此行為,。

NewIndex 屬性

在 Visual Basic 6.0 中,，NewIndex 屬性用于檢索最近添加到 ComboBox 控件的項的索引。

在 Visual Basic 2005 中,，NewIndex 屬性不再存在,。添加項時，可以使用 Item.Add 方法的返回值檢索其索引,。

TopIndex 屬性

在 Visual Basic 6.0 中,，TopIndex 屬性用于返回或設置一個值，該值指定 ComboBox 或 ListBox 控件中顯示在最頂端位置的項,。該屬性通常用于滾動列表而不選擇項,。

在 Visual Basic 2005 中，ComboBox 控件不再支持 TopIndex 屬性,。大多數情況下,，這不會有什么問題，因為設置 TopIndex 屬性沒有可視效果,，除非將“樣式”屬性設置為“1 - SimpleCombo”,。這種情況下，可以使用 ListBox 控件和 TextBox 控件模擬此行為,；ListBox 控件仍然支持 TopIndex 屬性,。

滾動事件

Visual Basic 6.0 中的 Scroll 事件與 TopIndex 屬性一起使用，在滾動列表時執(zhí)行操作,。Visual Basic 2005 不支持 Scroll 事件,；但大多數情況下使用 SelectedIndexChanged 事件替代是合適的。

其他差異

此外,，還有許多適用于所有控件的概念差異,，包括數據綁定、字體處理,、拖放操作,、幫助支持等方面的差異,。有關更多信息，請參見適用于 Visual Basic 6.0 用戶的 Windows 窗體概念,。

ComboBox 控件的代碼更改

下面的示例演示 Visual Basic 6.0 和 Visual Basic 2005 在編碼方法上的不同之處,。

使 ComboBox 控件只讀的代碼更改

下面的代碼演示如何防止用戶向 ComboBox 控件添加新項。

	復制代碼
' Visual Basic 6.0 Combo1.Locked = True

Visual Basic	復制代碼
' Visual Basic 2005 ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList

選擇 ComboBox 控件中最近添加的項的代碼更改

下面的代碼演示如何將以編程方式添加到 ComboBox 控件的項設置為所選內容,。

	復制代碼
' Visual Basic 6.0 Combo1.AddItem "This is a new item" Combo1.ListIndex = Combo1.NewIndex

Visual Basic	復制代碼
' Visual Basic 2005 Dim i As Integer i = ComboBox1.Items.Add("This is a new item") ComboBox1.SelectedIndex = i

關聯(lián) ItemData 的私有子代碼更改

下面的代碼演示如何將雇員號與 ComboBox 控件中列出的每個雇員關聯(lián),，然后如何在運行時檢索該號。

復制代碼

' Visual Basic 6.0
            Private Sub Form_Load
            Combo1.AddItem "Nancy Davolio"
            Combo1.ItemData(Combo1.NewIndex) = 12345
            Combo1.AddItem "Judy Phelps"
            Combo1.ItemData(Combo1.NewIndex) = 67890
            End Sub
            Private Sub Combo1_Click()
            Label1.Caption = "Empoyee #" & _
            CStr(Combo1.ItemData(Combo1.ListIndex))
            End Sub

Visual Basic

復制代碼

' Visual Basic 2005
            Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
            System.EventArgs) Handles MyBase.Load
            ComboBox1.Items.Add("Nancy Davolio")
            Microsoft.VisualBasic.Compatibility.VB6. _
            SetItemData(ComboBox1, ComboBox1.Items.Count() - 1, 12345)
            ComboBox1.Items.Add("Judy Phelps")
            Microsoft.VisualBasic.Compatibility.VB6. _
            SetItemData(ComboBox1, ComboBox1.Items.Count() - 1, 67890)
            End Sub

Visual Basic

復制代碼

' Visual Basic 2005
            Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, _
            ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
            Label1.Text = "Employee #" & CStr( _
            Microsoft.VisualBasic.Compatibility.VB6. _
            GetItemData(ComboBox1, ComboBox1.SelectedIndex))
            End Sub

ComboBox 控件屬性,、方法和事件的等效項

下面幾個表列出了 Visual Basic 6.0 中的屬性,、方法和事件及它們的 Visual Basic 2005 等效項。具有相同的名稱和行為的屬性,、方法和事件未予列出,。如果適用，常數在屬性或方法的下面縮進,。除非另外說明,，否則所有 Visual Basic 2005 枚舉都映射到 System.Windows.Forms 命名空間。

此表提供相關主題的鏈接,，這些主題對行為之間的差異進行說明,。如果 Visual Basic 2005 中沒有直接等效項，則提供指向介紹替換項的主題的鏈接,。

屬性

Visual Basic 6.0

Visual Basic 2005 等效項

Appearance

新的實現(xiàn)。有關更多信息,，請參見 Appearance 和 BorderStyle 屬性（針對 Visual Basic 6.0 用戶）,。

BackColor

BackColor

注意
顏色在 Visual Basic 2005 中以不同方式處理。有關更多信息,，請參見顏色行為（針對 Visual Basic 6.0 用戶）,。

Container

Parent

DataChanged

DataField

DataFormat

DataMember

DataSource

新的實現(xiàn)。有關更多信息,，請參見 Data 控件（針對 Visual Basic 6.0 用戶）,。

DragIcon

DragMode

新的實現(xiàn)。有關更多信息,，請參見拖放（針對 Visual Basic 6.0 用戶）,。

Font

FontBold

FontItalic

FontName

FontSize

FontStrikethrough

FontUnderline

Font

注意
字體在 Visual Basic 2005 中以不同方式處理。有關更多信息,，請參見字體處理（針對 Visual Basic 6.0 用戶）,。

ForeColor

ForeColor

注意
顏色在 Visual Basic 2005 中以不同方式處理。有關更多信息,，請參見顏色行為（針對 Visual Basic 6.0 用戶）,。

Height

Height, Size

注意
坐標在 Visual Basic 2005 中以不同方式處理,。有關更多信息，請參見坐標系統(tǒng)（針對 Visual Basic 6.0 用戶）,。

HelpContextID

新的實現(xiàn),。有關更多信息，請參見幫助支持（針對 Visual Basic 6.0 用戶）,。

HWnd

Handle

Index

新的實現(xiàn),。有關更多信息，請參見控件數組（針對 Visual Basic 6.0 用戶）,。

ItemData

新的實現(xiàn),。有關更多信息，請參見無法升級 ItemData 屬性,。

Left

Left

注意
坐標在 Visual Basic 2005 中以不同方式處理,。有關更多信息，請參見坐標系統(tǒng)（針對 Visual Basic 6.0 用戶）,。

List

Items

ListCount

Count

ListIndex

SelectedIndex

Locked

DropDownStyle = DropDownList

注意
在 Visual Basic 6.0 中,，將 Locked 屬性設置為 True 也可以防止選擇被更改。在 Visual Basic 2005 中,，通過在 MouseDown 事件中取消選擇可以重復此行為,。

MouseIcon

新的實現(xiàn)。有關更多信息,，請參見無法設置自定義 MousePointer,。

MousePointer

Cursor

有關常數的列表，請參見 MousePointer（針對 Visual Basic 6.0 用戶）,。

NewIndex

新的實現(xiàn),。有關更多信息，請參見無法升級 NewIndex 屬性,。

OLEDragMode

新的實現(xiàn),。有關更多信息，請參見拖放（針對 Visual Basic 6.0 用戶）,。

OLEDropMode

新的實現(xiàn),。有關更多信息，請參見拖放（針對 Visual Basic 6.0 用戶）,。

Parent

FindForm 方法

RightToLeft

RightToLeft

SelLength

SelectionLength

SelStart

SelectionStart

SelText

SelectedText

Style

DropDownStyle

ToolTipText

ToolTip 組件

有關更多信息,，請參見工具提示支持（針對 Visual Basic 6.0 用戶）。

Top

Top

注意
坐標在 Visual Basic 2005 中以不同方式處理,。有關更多信息,，請參見坐標系統(tǒng)（針對 Visual Basic 6.0 用戶）。

TopIndex

新的實現(xiàn),。有關更多信息,，請參見 TopIndex 屬性和 Scroll 事件（針對 Visual Basic 6.0 用戶）,。

WhatsThisHelpID

新的實現(xiàn)。有關更多信息,，請參見幫助支持（針對 Visual Basic 6.0 用戶）,。

Width

Width, Size

注意
坐標在 Visual Basic 2005 中以不同方式處理。有關更多信息,，請參見坐標系統(tǒng)（針對 Visual Basic 6.0 用戶）,。

方法

Visual Basic 6.0

Visual Basic 2005 等效項

AddItem

Add

AddRange

Insert

Clear

Clear

Drag

新的實現(xiàn)。有關更多信息,，請參見拖放（針對 Visual Basic 6.0 用戶）,。

Move

SetBounds

注意
坐標在 Visual Basic 2005 中以不同方式處理。有關更多信息,，請參見坐標系統(tǒng)（針對 Visual Basic 6.0 用戶）,。

OLEDrag

拖放（針對 Visual Basic 6.0 用戶）.

RemoveItem

Items.Remove

SetFocus

Focus

ShowWhatsThis

新的實現(xiàn)。有關更多信息,，請參見幫助支持（針對 Visual Basic 6.0 用戶）,。

ZOrder

BringToFront SendToBack 函數

事件

Visual Basic 6.0

Visual Basic 2005 等效項

Change

TextChanged

注意
TextChanged 事件的行為略有不同。有關更多信息,，請參見 ComboBox 控件更改事件（針對 Visual Basic 6.0 用戶）,。

Click

SelectedIndexChanged

DblClick

新的實現(xiàn)。請使用 SelectedIndexChanged 或 TextChanged 事件,。

DragDrop

DragOver

新的實現(xiàn),。有關更多信息，請參見拖放（針對 Visual Basic 6.0 用戶）,。

GotFocus

Enter

LostFocus

Leave

OLECompleteDrag

OLEDragDrop

OLEDragOver

OLEGiveFeedback

OLESetData

OLEStartDrag

新的實現(xiàn),。有關更多信息，請參見拖放（針對 Visual Basic 6.0 用戶）,。

Scroll

新的實現(xiàn)。有關更多信息,，請參見 TopIndex 屬性和 Scroll 事件（針對 Visual Basic 6.0 用戶）,。

Validate

Validating

升級說明

Visual Basic 6.0 項目升級為 Visual Basic 2005 后，ComboBox 控件的 Change 事件映射到 Visual Basic 2005ComboBox 控件的 TextChanged 事件,。TextChanged 事件的行為不同于 Change 事件的行為,，此差異可能會在代碼中導致意外的結果。

任何引用 ItemData,、Locked,、NewIndex 或 TopIndex 屬性的代碼或 Scroll 事件過程中的代碼都不升級；代碼中將添加警告注釋,，在編譯應用程序前,，必須刪除或修改這類代碼,。