- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- ListView做界面 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=122441)
-- 发布时间：2018/7/25 16:14:00
-- ListView做界面
老师，在学习用ListView1做界面导航，示例有点没看懂，没做成功，麻烦老师看看，谢谢！
现在问题：1、图标不显示；
2、代码添加不进去；
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目4.rar |
-- 发布时间：2018/7/25 16:30:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目4.table |
-- 发布时间：2018/7/25 16:45:00
--
老师，可以显示，你在看看通过代码列，打开命令窗口，添加代码，不对呢。
另外怎么执行对应行的代码？
[此贴子已经被作者于2018/7/25 17:07:14编辑过]
-- 发布时间：2018/7/25 17:10:00
--
以下是引用cd_tdh在2018/7/25 16:45:00的发言：
老师，可以显示，你在看看通过代码列，打开命令窗口，添加代码，不对呢。
另外怎么执行对应行的代码？
[此贴子已经被作者于2018/7/25 17:07:14编辑过]
msgbox(e.sender.current.tag("名称"))
Functions.remove("函数")
Dim Code As String
Code = e.sender.current.tag("代码")
Functions.Add("函数",Code)
Functions.Complie()
Functions.Execute("函数")
-- 发布时间：2018/7/25 17:15:00
--
保存代码提示：
此主题相关图片如下：qq截图20180725171403.png
-- 发布时间：2018/7/25 17:22:00
--
回复5楼，我测试没问题，可以正常打开。
-- 发布时间：2018/7/25 17:25:00
--
打开没问题，只是添加代码时，写好代码，保存代码时出错。
此主题相关图片如下：2222222.png
-- 发布时间：2018/7/25 20:07:00
--
\'在命令窗口编辑后,保存代码
Dim code As String
Dim frm As System.Windows.Forms.Form = System.Windows.Forms.Form.ActiveForm
Dim obj = frm.controls("SplitContainer1")
Dim editor = obj.panel1.controls("MyCodeEditor21").Controls("SplitContainer1").Panel1.Controls("SplitContainer2").panel1.controls("Editor")
msgbox(editor.text)
CurrentTable.value = editor.text
frm.close