[PL]/VB & VB.NET
[ vb 2008 ] ListView 예제.
객과 함께.
2009. 12. 30. 23:58
Imports System.Windows.Forms
Public Class Form1
Private Sub OKBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str(2) As String
str(0) = CStr(txtName.text)
str(1) = CSng(txtAGE.text)
Dim lvi As New ListViewItem(str)
Try
lviListView.Items.Add(lvi)
Catch
Finally
txtName.Text = ""
txtAGE.Text = ""
End Try
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Text = "ListView 예제"
OKBtn.Text = " O K "
End Sub
End Class
블러그에서 소스를 다운 받아서 특정 부분만을 추출 수정 후 리스트 뷰어 예제로 만들어 보았습니다.