窗体控件实现在查询结果中批量生成号段

血染疆场　发表于：2018-08-07 10:28:39 　

想在窗体中添加一个按钮和一个文本框，现在窗体中查询，查询结果以列表形式在子窗体中以列表形式显示，在添加的文本框中输入数字比如说输入3，点击按钮后在子窗体查询结果列表中的特定字段就会按顺序输入1，1，1，2，2， 2，3 ，3，3……在文本框中输入4则字段自动按顺序输入1，1，1，1，2，2，2，2，3，3，3 ，3…… 求大神指点迷津

Top

Tom and Jerry 发表于：2018-08-07 10:49:32

不太理解有图就好了

Top

仙来发表于：2018-08-07 14:37:20

用循环应该行。

Dim L1,L2 AS Integer

L1=me.文本框名 '设一个常数

L2=1

For i=1 to L1*L1

if i>1 and (i-1) mod L1=0 then

L2=L2+1

end if

debug.print L2

Next i

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

窗体控件实现在查询结果中批量生成号段