机房收费系统之添加删除用户

最新推荐文章于 2021-01-24 18:53:27 发布

最新推荐文章于 2021-01-24 18:53:27 发布 · 68 阅读

本文介绍了一个包含添加和删除用户功能的窗体实现方法。重点在于防止添加重复用户名，并通过特定的Visual Basic代码确保用户能够准确地选择并删除指定的数据条目。

窗体功能：添加，删除用户。

步骤：

1，添加用户

添加用户没有什么困难，主要是判断不让填入重复的用户名；添加完毕后显示列表要进行更新。

2，删除用户

删除用户首先要选中要删除的字段，在这里我用到了如下代码来完成只选择一行数据：

'用鼠标选中MyFlexGrid中的项，使其只能选中一行
Private Sub MyFlexGrid_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
With MyFlexGrid
.Row = .MouseRow
CurrentRow = .Row
.Col = 0
End With
End Sub
'选中一条记录
Private Sub MyFlexGrid_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
With MyFlexGrid
If CurrentRow > 0 Then
.RowSel = CurrentRow
.ColSel = .Cols - 1
End If
End With
End Sub

当CurrentRow大于0时才可以进行删除（当等于0时选择的是标题）。