在LISTBOX 中 添加 按钮

添加HTML Radio按钮实现选中一行

若使用了<AlternatingItemTemplate>则在其中添加如下代码：

<td><input name="SelectRadio" type="radio" value='<%# Eval("ID")%>' onclick="SelectRow(this.value)"/>Select</td>

在<LayoutTemplate>中添加：<th >SelectRow</th>

在<ItemTemplate>中添加：

<td><input name="SelectRadio" type="radio" value='<%# Eval("ID")%>' onclick="SelectRow(this.value)"/>Select</td>

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '这里把文本框的值添加入checkedlistbox1

If Me.TextBox1.Text.Trim <>"" Then '为空时不 *** 作

Me.CheckedListBox1.Items.Add(Me.TextBox1.Text)

End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click '这里在单击>按钮时将checkedlistbox1中选中项添加入checkedlistbox2

For i As Integer = 0 To Me.CheckedListBox1.CheckedItems.Count - 1

Me.CheckedListBox2.Items.Add(CheckedListBox1.CheckedItems(i).ToString)

Next

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '在单击>>按钮时将checkedlistbox1中所有项添加入checkedlistbox2

For i = 0 To Me.CheckedListBox1.Items.Count - 1

Me.CheckedListBox2.Items.Add(CheckedListBox1.Items(i).ToString)

Next

End Sub

End Class

一、常用属性和方法

CheckedListBox控件的属性和方法基本上都可以在ListBox控件中找到，可以参看这里：vb.net入门——ListBox控件的使用。值得我们重视的是，CheckedListBox控件的CheckedItems属性，它是CheckedListBox控件中复选框选中的项的集合，我们可以通过检索该属性来获得选中的项。

CheckOnClick 指示是否只要一选择项即切换复选框。默认行为是在首次单击时更改选定内容，然后让用户再次单击以应用选中标记。但在某些情况下，您可能愿意一单击项就选中它。

下面我们就直接以实例来了解和掌握CheckedListBox控件的方法和属性。

二、在CheckedListBox控件中添加、移除项

因为CheckedListBox控件控件的使用和ListBox控件相似，所以我们这里就只针对用编程的方法来对CheckedListBox控件的 *** 作。

1、添加项

添加一个名为“新建文件”的项，且复选框为选中状态

CheckedListBox1.Items.Add("新建文件", True)

添加一个名为“拷贝文件”的项，且复选框为未选中状态

CheckedListBox1.Items.Add("拷贝文件", False)

2、删除项

使用Remove来删除项，或者使用RemoveAt来移除指定索引的项

删除CheckedListBox中的选中的项

CheckedListBox1.Items.Remove(CheckedListBox1.SelectedItem)

删除指定索引的项

CheckedListBox1.Items.RemoveAt(0)

3、删除所有项

CheckedListBox1.Items.Clear()

三、确定 CheckedListBox 控件中已选中的项

当显示CheckedListBox 控件中的数据时，可以循环访问CheckedItems属性中存储的集合，或者使用GetItemChecked 方法一一检查列表确定所选中的项。

GetItemChecked 方法采用项的索引号作为参数，并返回True或者False。SelectedItems 和 SelectedIndices属性并不确定哪些项目已选中，它们只指示哪些项目为突出显示。CheckedItems集合是从0开始的。

示例：

1、在窗体上，放置一个CheckedListBox和两个Button控件，并在CheckedListBox的“字符串编辑器”中添加字面为 a 到 l 的几个项目，如下图所示：

2、两个按钮中的Click事件的代码如下：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If CheckedListBox1.CheckedItems.Count <>0 Then

Dim i As Integer

Dim s As String = ""

For i = 0 To CheckedListBox1.CheckedItems.Count - 1

s = s &"选中项" &(i + 1).ToString &"=" &CheckedListBox1.CheckedItems.Item(i).ToString &ControlChars.CrLf

Next

MessageBox.Show(s)

End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim i As Integer

Dim s As String = ""

s = "选中项：" &ControlChars.CrLf

For i = 0 To (CheckedListBox1.Items.Count - 1)

If CheckedListBox1.GetItemChecked(i) = True Then

s = s &"项" &(i + 1).ToString &"=" &CheckedListBox1.Items(i).ToString &ControlChars.CrLf

End If

Next

MessageBox.Show(s)

End Sub

运行测试，把列表框中的第一、第四项选中，如图所示：

现在先点击第一个按钮，d出的信息如下所示：

指示的项是在选中列表的索引

再单击第二个按钮，d出的信息如下所示：

很明显，所指示的项索引是整个列表中的索引。

其他的 你用事件自己搞定...

---