CheckedListBox的有关问题

CheckedListBox的问题
Private Sub Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        With CheckedListBox1
            .Items.Add("11")
            .Items.Add("22")
            .Items.Add("33")
            .Items.Add("44")

            .SelectedIndex = 3
        End With
    End Sub
------------------------------------

问题：
怎样用代码初始化某行的“是否打勾”状态，比如：“22”的那行默认是打勾的，如何用代码来指定？
[解决办法]
Me.CheckedListBox1.SetItemChecked(1, True)