- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 设计窗口问题，求赐教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=164149)
-- 发布时间：2021/4/27 19:47:00
-- 设计窗口问题，求赐教
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试.table |
此主题相关图片如下：微信图片_20210427192402.png
此主题相关图片如下：微信图片_20210427192518.png
老师你好！
我在“网络流水”表中设计了一个窗口如上图，窗口名字叫“非当日支出及各种统计”，在此窗口中加了两个输入文本框“textbox3”,"textbox4"和一个按钮“button3”如上图， 我想在网络流水表中按条件增加行，条件范围在“textbox3”“textbox4”（这两个文本框都是整数型）之间，以前工作都是在“网络流水”表中增加多行，然后在进行序列填充实现，有时填充流水号时不是行多了就是行少了，所以我想用窗口按钮实现自动增加行，并按条件填充，谢谢。
-- 发布时间：2021/4/27 20:17:00
--
按什么条件增加行？“textbox3”“textbox4”这两个文本框干嘛用的？
-- 发布时间：2021/4/27 20:47:00
--
这两个文本框是用来输入流水号的，例如：在"textbox3"中输入200001，在"textbox4"中输入200100，然后能自动在"网络流水"表中增加行并把增加的行流水号从200001自动填充到200100
-- 发布时间：2021/4/27 20:59:00
--
Dim a As Integer = cint(e.form.controls("textbox3").text)
Dim b As Integer = cint(e.form.controls("textbox4").text)
Dim r As Row
Dim t As Table = Tables(""网络流水"")
t.StopRedraw
For i As Integer = a To b
r = t.AddNew
r("流水号") = i
Next
t.ResumeRedraw
-- 发布时间：2021/4/27 21:23:00
--
刚看了一下论坛试用问题，如果到期了，我现在做这些是不是都给删除了呢？如果给删除了就白做了，能保留文件吗？还有说几百元激活的？说什么的都有，我也是爱好者，几年前就喜欢这个软件，恰好今年在这个单位还能上，就没事边学边用，你看我用哪个比较经济实惠呢？
-- 发布时间：2021/4/27 21:38:00
--
到期文件会保留，只是打不开。如果是自己用买商业版即可，做给多个人使用的就买开发版
-- 发布时间：2021/4/27 21:47:00
--
谢谢，如果是局域网里多台电脑用就必须用开发版了吧，如果用商业版是不是有六台电脑用就必须买六套商业版吧？
-- 发布时间：2021/4/27 21:57:00
--
是的