示例文件中的 用户管理 窗口 的 删除用户 按钮,我想新增一个 admin 管理员 账号,这个账号不允许删除,怎么实现
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")If lst.SelectedIndex >=0 Then Dim UserName As String = lst.SelectedItem _UserTable.SQLDeleteFor("[Name] = '" & UserName & "'") lst.Items.RemoveAt(lst.SelectedIndex) lst.Select() End If
这个是原代码