第一次机房收费颗粒归仓

写在前面

机房也是一场持久战，中途遇到自考的事，然后被自己孤立了一段时间，不过这也恰恰说明一个问题，自己的时间管理做的不好，看来自己以后努力的方向是找到了。在入手敲机房的时候，按照师哥说的那样，尽量避开之前师哥师姐使用的现成的代码，对功能的实现要自己去想，这样也是有很大的好处的，就是自己的思路很清楚，不像照着敲学生那样有种晕头转向的感觉，至少自己掌握了很大的主动权。当然，不太好的地方是，自己写的代码没有技术含量，虽然很简单，但是很繁琐，不过这都过去了，至少明确自己哪里可以做的更好。

技术学习

数据库

• 附加数据库
  看完视频之后，自己不甘心用给的数据库，于是参照着之前的数据库，自己动手建了一个数据库，这样也发现了很多问题。数据库附加的时候会有这样的提醒：
  

  报错：5120，即为权限的问题，我们找到我们要附加的mdf文件，右键属性–安全，在下图中将完全控制勾上，就可以附加了：
  

  这样数据库附加的问题就可以解决了。

• 标识列
  数据库中用到了标识列，我就查了查，百度是这么解释的：标识列，是SQL Server中的标识列又称标识符列，习惯上又叫自增列。标识列的创建与修改，通常在企业管理器和用Transact-SQL语句都可实现。
  那么问题来了，如何设置呢，其实很简单，右键单击你要设计的表，在右侧标识列，添加你让哪列成为标识列，就可以了！

  

• 修改数据库
  有的时候数据库中的内容不允许我们修改，敲学生的时候我放弃了，师姐的话说的很对，出来混总是要还的，这时候，你想着可以省点事，之后你就摊上大事了，其实挺简单的。在数据库中单击工具–选项–打开如下图所示，去掉框中的对勾，即可完成对表的修改。

  

控件部分

• Msflexgrid
  例如下面这个图中，要实现对选中的内容删除，这里的删除有两部分，第一：删除数据库中的内容，第二：删除grid中的内容，当删除grid中的内容是不能将第一行删掉。

  
  以下是代码的分析

'找到选中的内容：
With MSFlexGrid1If .RowSel > .Row ThenstartRow = .RowendRow = .RowSelElsestartRow = .RowSelendRow = .RowEnd If
' 删除数据库中的内容
For i = startRow To endRowIf mRc.RecordCount <> 0 ThenmRc.MoveFirstWhile mRc.EOF = FalseIf Trim(mRc.Fields(0)) = .TextMatrix(i, 0) Then          A(i)=imRc.DeleteEnd IfmRc.MoveNextWendEnd IfNext i
'删除grid表中的内容，有两个办法，一种是重新将数据库中的内容，传给grid，另一种就是利用一个循环，将grid中选中的内容删除，我用的就是第二种办法：If startRow = 0 ThenFor i = 1 To endRow.RemoveItem A(i)Next iElseFor i = startRow 

本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！