以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]不知道哪里不对，请指教！  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4513)

--  作者：roy78 --  发布时间：2009/10/7 11:10:00 --  [求助]不知道哪里不对，请指教！  我在一个录入窗口中，单击某控件后（ComboBox,TextBox,Label这三个控件）后弹出一个\'选择窗口\'，任意一个单击 Vars("返回控件名")=e.Sender.name Vars("返回窗口名")=e.Form.name Vars("返回控件类型")=e.sender.gettype.name forms("地区选择窗口").Open 以下是选择窗口中，目录树的节点双击中的命令（因为控件的类型不一样，所以其属性也不一样） dim a as string=Vars("返回控件类型")  Select Case  a Case "ComboBox"  Forms("" &Vars("返回窗口名")& "").Controls("" &Vars("返回控件名")& "").value=vals(1) Case "Label" Forms("" &Vars("返回窗口名")& "").Controls("" &Vars("返回控件名")& "").text=vals(1) Case "TexBox" Forms("" &Vars("返回窗口名")& "").Controls("" &Vars("返回控件名")& "").value=vals(1) End Select                                     最后怎么只有  控件类型为 lable的控件可从\'选择窗口\'  中返回一个数据？？其它的无效呢？ [此贴子已经被作者于2009-10-7 11:10:58编辑过]

--  作者：roy78 --  发布时间：2009/10/7 11:46:00 --    一定要有示例才可以看明白？

--  作者：狐狸爸爸 --  发布时间：2009/10/7 11:48:00 --   作个简单的例子就行

--  作者：roy78 --  发布时间：2009/10/7 12:57:00 --    不求帮我做出，只求代码的正确性，行不？