vfp树的问题？急！！！拜谢了！！！

[十豆七]

怎么点击树的节点，执行相应表单？
DO CASE
CASE THISFORM.OleTreeView.key="xm1"
DO FORM 客户基本资料编辑表单
CASE THISFORM.OleTreeView.key="xm2"
DO FORM 商品基本资料编辑表单
ENDCASE
这是我写的代码，但是提示出错，求大侠指教！！！拜谢了！！！

[十豆三]

在你的 TreeView 控件的 NodeClick 事件写代码：

Lparameters Node
Messagebox(Node.Index)
Messagebox(Node.Key)
Messagebox(Node.Text)
*-- 看看上面哪个你可以用来判断条件

Do Case
	Case Node.Text='客户基本资料' && 此处用 key 还是 index 还是Text 取决于你了，看看你想通过什么来判断了。
		Do Form 客户基本资料编辑表单
	Case Node.Text='商品基本资料'
		Do Form 客户基本资料编辑表单
Endcase

[十豆七]

好了，真是太感谢您了，铭记在心了！！！
还有一件小事，麻烦一下，我的vfp里ctrl+v，ctrl+c，这些不起作用了，按下后显示这些、，不知道为什么，我没改过什么东西啊！！！

[十豆三]

[Quote=引用 13 楼 szqy716 的回复:]
好了，真是太感谢您了，铭记在心了！！！
还有一件小事，麻烦一下，我的vfp里ctrl+v，ctrl+c，这些不起作用了，按下后显示这些、，不知道为什么，我没改过什么东西啊！！！
[/Quote]

重启 VFP ，再不行，重启 系统，再不行，重装 VFP，再不行，重装系统后再重装VFP.

[十豆七]

额。。。，十分感谢！！！您真是太好了！我现在基础确实不好，因为一直在自学，没有人教，所以进展有点慢，但是我一直在努力！！要是问了一些弱智的问题了，希望您不要介意，再次感谢您！！！

[十豆七]

为什么就没人回复我的呢？

[jxjdzwang5555]

不了解OleTreeView.这是什么控件？vfp自带的？或者开发的？

[十豆三]

在 TreeView 控件的 NodeClick 事件写相关代码。

[十豆七]

DO CASE
CASE Thisform.OleTreeView.NodeClick(Thisform.OleTreeView.Nodes(1),'ok')
DO FORM 客户基本资料编辑表单
CASE Thisform.OleTreeView.NodeClick(Thisform.OleTreeView.Nodes(2),'ok')
DO FORM 商品基本资料编辑表单
ENDCASE

这是我修改的代码，但是点击哪个节点都是DO FORM 客户基本资料编辑表单

[jxjdzwang5555]

accept "请输入要执行的表单编号" to lcbiaodan
DO CASE
CASE lcbiaodan='1'
DO FORM 客户基本资料编辑表单
CASE lcbiaodan='2'
DO FORM 商品基本资料编辑表单
ENDCASE

[十豆七]

vfp绑定的ActiveX控件，不太会用

[十豆七]

要和树连在一起用啊！我的意思是点击一个节点，执行相应的表单，我现在的问题是随便点击哪个节点都只跳出 客户基本资料编辑表单 ，求大侠们提示下啊！！！

[十豆三]

case Thisform.OleTreeView.NodeClick(Thisform.OleTreeView.Nodes(2),'ok')
这是条件吗？

[十豆七]

不是点击第二个节点的条件语句吗？这语句不太会，求您详细解释一下，搞了我一上午了，拜谢了！！！

[十豆三]

[Quote=引用 9 楼 szqy716 的回复:]
不是点击第二个节点的条件语句吗？这语句不太会，求您详细解释一下，搞了我一上午了，拜谢了！！！
[/Quote]

朋友，先不要急写程序，先把基本的搞的差不多的再写。
你发的这几个帖子，真是不知从哪说起。。。我都不知道如何回复

[十豆七]

额。。。我基础是不好，刚接触vfp，写个程序，边写边学，这样学的有兴趣些，在您的帮助下，现在已经写得差不多了，就差一些小功能没有实现了，我的意思是我做了一个树：

主界面——基础信息修改——客户信息修改
|_________商品信息修改

点击节点，跳出相应的表单，就是这些了，希望您能帮我一下，真心感谢您了！