建议UDF函数能编写添加三维数组的显示函数_ArrayDisplay3D

苹果控 · 发表于 2014-1-20 22:43:33

建议UDF函数能编写添加三维数组的显示函数_ArrayDisplay3D，就像Excel 多标签显示表格一样，sheet1、sheet2、.......、sheetn

afan · 发表于 2014-1-20 23:47:01

发帖注意版块

skyfree · 发表于 2014-1-23 16:19:01

写这么多年程序了，真一次没用过三维数组，真有这类需求，都可以转化为更低维数的数组。

netegg · 发表于 2014-1-24 19:51:42

自己做个tab不就行了

netegg · 发表于 2014-1-25 01:01:28

然后每个tabitem里嵌一个listview

netegg · 发表于 2014-1-25 09:18:17

本帖最后由 netegg 于 2014-1-25 18:12 编辑

[au3]#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <guitab.au3>
Opt("GUIOnEventMode", 1)

$Form1 = GUICreate("Form1", 625, 443, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Tab1 = GUICtrlCreateTab(64, 32, 521, 377)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
Dim $list[11], $o = 0
For $x = 0 To 9
GUICtrlCreateTabItem('sheet' & $x)
$list[$x] = GUICtrlCreateListView('|0|1|2', 70, 70, 500, 300)
For $d = 0 To 10
GUICtrlCreateListViewItem($d&'|['&$x & '][' & $d &']['& $o & ']|[' & $x &']['& $d &']['& $o + 1&']|[' & $x &']['& $d &']['& $o + 2&']', $list[$x])
Next
$o=0
Next
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)

While 1
Sleep(100)
WEnd

Func Form1Close()
Exit
EndFunc ;==>Form1Close
[/au3]
三维数组显示，抛砖引玉一下，具体的自己完善吧

不死帝国 · 发表于 2014-1-28 11:13:38

初学者不明觉党。。。

		自动登录	找回密码
密码			加入

[GUI管理] 建议UDF函数能编写添加三维数组的显示函数_ArrayDisplay3D

评分

相关帖子

本帖子中包含更多资源