实现表格向下移动
在form_load中定义了DIM I AS INTERGER
I=0
然后在函数中
Grid3.Row = i
Grid3.TextMatrix(Grid3.Row, 0) = "" & RS!seq
Grid3.TextMatrix(Grid3.Row, 1) = "" & RS!stdt
Grid3.TextMatrix(Grid3.Row, 2) = "" & RS!endt
Grid3.TextMatrix(Grid3.Row, 3) = "" & RS!grade
Grid3.TextMatrix(Grid3.Row, 4) = "" & RS!school
Grid3.TextMatrix(Grid3.Row, 5) = "" & RS!jieye
Grid3.TextMatrix(Grid3.Row, 6) = "" & RS!Major
i=i+1
但是在保存完一条记录时,
再保存一条记录,即在表格中把上一条记录覆盖。
估计是因为每次点击保存,都会重新把i置位0
请问如何做到i在保存后值仍然是上一次的值
比如说保存完后i自加变成了1
希望再点击是仍然是1
这样就会在表格下一行保存了
高手指点
--------------------编程问答-------------------- 没人吗? --------------------编程问答-------------------- 在公共模块 定义i 试试
--------------------编程问答-------------------- 基本没有弄明白楼主的意思 --------------------编程问答-------------------- 比如说:
我有一个grid,我希望我每次保存完了的数据会保存在这个grid的一行里,
然后我再保存的时候,我希望grid向下移动一行,然后数据在保存在这一行,
但是我现在用的是定义一个整形i
在module中定义i的初始值为0
i=0
然后定义
Grid3.Row = i
就指向了grid的某一行
再把值覆到这一行
Grid3.TextMatrix(Grid3.Row, 0) = "" & RS!seq
但是这样呢,
我再次保存的时候,数据会把上一行的纪录覆盖掉,而不是我预想的保存在上一行的下一条里,
因为每次保存的时候,i都回重新被覆给零值,
于是又从零开始了,
现在有什么方法能让i不会每次都从零开始,而是接着上次保存过的纪录
--------------------编程问答-------------------- 周末都休息了? --------------------编程问答-------------------- 自己顶一下
补充:VB , 基础类