VB程序员博客
Imports System.Windows.Forms.ListViewItem.ListViewSubItem
Imports System.IO
Public Class Form1
Friend WithEvents lvtanaorosisentaku As System.Windows.Forms.ListView
Friend WithEvents CheckBoxes As System.Windows.Forms.CheckBox
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Inherit
Me.Controls.Add(Me.lvtanaorosisentaku)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "Form1"
Me.Text = "アドレス選択"
Me.ResumeLayout(False)
Me.adoresusenntaku.Items.Clear()
Me.adoresusenntaku.CheckBoxes = True
Me.adoresusenntaku.Columns.Clear()
Me.adoresusenntaku.Columns.Add("", 100, HorizontalAlignment.Left)
Me.adoresusenntaku.Columns.Add("名称", 170, HorizontalAlignment.Left)
Me.adoresusenntaku.Columns.Add("メールアドレス", 170, HorizontalAlignment.Left)
Me.adoresusenntaku.HeaderStyle = ColumnHeaderStyle.Clickable
Me.adoresusenntaku.View = View.Details
Dim Path As String
Dim streamRead As StreamReader
Dim strLine As String
接来下怎么在LISTBOX中..加入行数据??特别是在CHECKBOX中加入.急