机房收费系统总结（一）

VB及其控件的运用更加娴熟

设计机房的过程中，反复练习了对VB控件的使用，例如;SStab、Combo、FlexGrid等。往小的说，避免输入其他字符，combo的Styl设置成2-Dropdown List；避免text输入超出内存，设置MaxLength的上限数值等等，往大的看，SStab控件，SStab.Tab=n设置第n个选项卡运行的代码；FlexGrid控件，把查询到的内容写入到表里，而且不能重复添加。经过了这次项目的锻炼，对这些控件运用起来更加的娴熟了，不过仍然有问题困惑着我，计算机语言探索的空间还很大，有困惑的牵引，才有不断探索的源动力！

这里对Flexgrid控件做一个简单的说明，拿“添加删除用户”来说吧！

在窗体加载的时候更新表头名

With FlexGrid
    .TextMatrix(0,0) = "用户名"
    .TextMatrix(0,1) = "姓名"
    .TextMatrix(0,2) = "开户人"
End With

    With FlexGrid
        .Rows = 1
        .CellAlignment = 4
        
        Do While Not mrc.EOF
            With FlexGrid
            .Rows = .Rows + 1
            .CellAlignment = 4
            .TextMatrix(.Rows - 1,0) = Trim(mrc.Fields(0))
            .TextMatrix(.Rows - 1,1) = Trim(mrc.Fields(3))
            .TextMatrix(.Rows - 1,2) = Trim(mrc.Fields(4))
            mrc.MoveNext
            End With
        Loop
    End with

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!