一世。我有一个表单,允许用户使用列表框和两个按钮添加多个电话号码,以添加到列表框并在他们犯错并希望在保存到数据库中的电话号码表之前更正它时从列表框中删除。
ii. 我有另一个表单允许他们编辑已保存的内容,这意味着他们可以根据情况删除或添加更多内容。
第一个(i)工作得很好,而第二个(ii)则不行。我发现我只能删除我添加的内容,但不能删除来自数据库表的内容。我怎么做?
下面是我的第二种形式 (ii) 的代码示例:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Contact_Phone(getId)
End If
end sub
Private Sub Contact_Phone(ByVal FK_CID As Integer)
Dim strSQL As String
strSQL = "Select PK_PNID,PN_Number From tblPhoneNumber where FK_CID=" & FK_CID
With cClass
.BindListBox(Me.lbPhone, strSQL, "PN_Number", "PK_PNID")
End With
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Me.lbPhone.Items.Remove(Me.lbPhone.SelectedItem.Text)
Catch ex As Exception
If ex.Message = "Object reference not set to an instance of an object." Then
Exit Sub
End If
Me.lblErr.ForeColor = Drawing.Color.Red
Me.lblErr.Text = ex.Message
End Try
End Sub