高级表格的问题

啊门

似水往昔浮流年 发表于 2011-9-11 10:39
数据库变化他自动会变化

那个我试过  我想用代码实现 不用数据库

啊门

不吸烟的青蛙 发表于 2011-9-11 10:48
LZ的意思是导入数据到表格吗？
可以导入一个单元就调用一次我写的那个函数
这样就会自动增加或者减少 ...

我试下你的代码  我不想用数据库 因为都是手动增加的 没用到数据库

啊门

不吸烟的青蛙 发表于 2011-9-11 09:57

[e].版本 2
.支持库 eGrid

.子程序 _交易窗口_创建完毕

高级表格1.列数 ＝ 5
高级表格1.行数 ＝ 5
高级表格1.行高 ＝ 24
高级表格1.列宽 ＝ 100
高级表格1.置列宽 (1, 94)
高级表格1.置列宽 (2, 94)
高级表格1.置列宽 (3, 94)
高级表格1.置列宽 (4, 94)
高级表格1.置列宽 (5, 94)
高级表格1.置数据 (0, 0, #表格常量.文本型, “交易日期”)
高级表格1.置数据 (0, 1, #表格常量.文本型, “交易日期”)
高级表格1.置数据 (0, 2, #表格常量.文本型, “交易日期”)
高级表格1.置数据 (0, 3, #表格常量.文本型, “交易日期”)
高级表格1.置数据 (0, 4, #表格常量.文本型, “交易日期”)
检测数据 ()
高级表格1.置数据 (1, 1, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (1, 2, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (1, 3, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (1, 4, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (1, 5, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (2, 1, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (2, 2, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (2, 3, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (2, 4, #表格常量.文本型, “我我我我”)
高级表格1.置数据 (2, 5, #表格常量.文本型, “我我我我”)



.子程序 _高级表格1_结束编辑
.局部变量 计次_A, 整数型
.局部变量 计次_B, 整数型
.局部变量 最后的行, 整数型
.局部变量 最后的列, 整数型

.计次循环首 (高级表格1.行数, 计次_A)
    .计次循环首 (高级表格1.列数, 计次_B)
        .如果真 (到字节集 (高级表格1.取数据 (计次_A － 1, 计次_B － 1)) ≠ {  })
            最后的行 ＝ 计次_A
            最后的列 ＝ 计次_B
        .如果真结束

    .计次循环尾 ()
.计次循环尾 ()
.如果真 (最后的行 ＜ 2)
    最后的行 ＝ 1
.如果真结束
.如果真 (最后的列 ＜ 2)
    最后的列 ＝ 1
.如果真结束
高级表格1.行数 ＝ 最后的行 ＋ 1
高级表格1.列数 ＝ 最后的列 ＋ 1
[/e]
还是不行  一定要加行数 不能实现  如果不加行数 <把行数改为2 下面增加的数据都不会显示出来了>

不吸烟的青蛙

啊门 发表于 2011-9-11 12:02
还是不行  一定要加行数 不能实现  如果不加行数

o(︶︿︶)o 唉...LZ
你这段程序就是等同于导入表格啊
只有手动输入才会自动触发我写的那个事件的
你要利用E程序自动生成表格内容
就应该这样写
[e]
.版本 2
.支持库 eGrid
.子程序 _交易窗口_创建完毕
高级表格1.列数 ＝ 5
高级表格1.行数 ＝ 5
高级表格1.行高 ＝ 24
高级表格1.列宽 ＝ 100
高级表格1.置列宽 (1, 94)
高级表格1.置列宽 (2, 94)
高级表格1.置列宽 (3, 94)
高级表格1.置列宽 (4, 94)
高级表格1.置列宽 (5, 94)
高级表格1.置数据 (0, 0, #表格常量.文本型, “交易日期”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (0, 1, #表格常量.文本型, “交易日期”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (0, 2, #表格常量.文本型, “交易日期”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (0, 3, #表格常量.文本型, “交易日期”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (0, 4, #表格常量.文本型, “交易日期”)
_高级表格1_结束编辑 ()
检测数据 ()
高级表格1.置数据 (1, 1, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (1, 2, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (1, 3, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (1, 4, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (1, 5, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (2, 1, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (2, 2, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (2, 3, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (2, 4, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()
高级表格1.置数据 (2, 5, #表格常量.文本型, “我我我我”)
_高级表格1_结束编辑 ()

.子程序 _高级表格1_结束编辑
.局部变量 计次_A, 整数型
.局部变量 计次_B, 整数型
.局部变量 最后的行, 整数型
.局部变量 最后的列, 整数型
.计次循环首 (高级表格1.行数, 计次_A)
    .计次循环首 (高级表格1.列数, 计次_B)
        .如果真 (到字节集 (高级表格1.取数据 (计次_A － 1, 计次_B － 1)) ≠ {  })
            最后的行 ＝ 计次_A
            最后的列 ＝ 计次_B
        .如果真结束
    .计次循环尾 ()
.计次循环尾 ()
.如果真 (最后的行 ＜ 2)
    最后的行 ＝ 1
.如果真结束
.如果真 (最后的列 ＜ 2)
    最后的列 ＝ 1
.如果真结束
高级表格1.行数 ＝ 最后的行 ＋ 1
高级表格1.列数 ＝ 最后的列 ＋ 1

[/e]

每调用一次高级表格.置数据()就手动调用一次_高级表格1_结束编辑（）这个函数

啊门

不吸烟的青蛙 发表于 2011-9-11 14:50
o(︶︿︶)o 唉...LZ
你这段程序就是等同于导入表格啊
只有手动输入才会自动触发我写的那个事件的

大哥 这样实现 比直接加个行数还要麻烦呀  <还有最后都会加一个空行>
我的意思是 比如每一行数据是A  那如果查内容  有3行 就直接显示3行 如果是2行 他就显示2行  默认是空表格   不用数据  想用代表实现   大哥能明白我的意思吗?

不吸烟的青蛙

啊门 发表于 2011-9-11 15:56
大哥 这样实现 比直接加个行数还要麻烦呀  
我的意思是 比如每一行数据是A  那如果查内容  有3行 就直接 ...

{:3_229:}现在回到原点...你的数据哪来的？文件导入还是手动输入？

啊门

不吸烟的青蛙 发表于 2011-9-11 15:59
现在回到原点...你的数据哪来的？文件导入还是手动输入？

是由网页数据上得来的 有十项 每一项数目都不同  我把数目都存放在变量里   A B  C  D  这样  那我想实现的是 当查第一项的时候 有三行 就显示三行  第二项有二行 就显示二行 类推下去  我现在只会 固定十行 然后都能读取出来 我就想实现 每一项取数目 都有各自的行数

不吸烟的青蛙

啊门 发表于 2011-9-11 16:03
是由网页数据上得来的 有十项 每一项数目都不同  我把数目都存放在变量里   A B  C  D  这样  那我想 ...

每一项数据是一列，
然后假设第一项数据有5个数值，那么表格的第一列就有5行

你的意思是这样吗？

啊门

不吸烟的青蛙 发表于 2011-9-11 16:29
每一项数据是一列，
然后假设第一项数据有5个数值，那么表格的第一列就有5行

第一项数据是一行   比如 第一项数据 是五列3行   第二项 是4列三行  第四项是 6列四行  这样代码怎么实现?

啊门

不吸烟的青蛙 发表于 2011-9-11 17:54
每项数据都是多行多列吗？
这样的话还是建议你仿照Excel工作簿那样来做
用一个选择夹控件来切换不同的表 ...

谢谢你 我已经用选择夹弄了 那个高级表格 实在是弄不了 选择夹我每一个都放一个高级表格