主题：如何用关联主表的列值作为select case选项

各位老师，

 

如下图

 

此主题相关图片如下：360截图20120921-008.jpg

 

在出库明细中点选“产品编码”会弹出一个产品选择窗口，想要在窗口中根据当前明细表的选中行的关联父行中的

“出库类别”的值来做为弹出不同的选择窗口的条件，

Select case   current.getparentrow（"出库类别"） （用出库类别列的值作为条件）

    case "产品出货"

代码1

   case "生产领料“

代码2

end select

 

红色的部份应该怎么表达，

 

谢谢！

 改成

 dim dr as datarow = Tables("出库单.出库明细").current.DataRow.GetParentRow("出库单")

 select case dr("出库类别")

 '

 end select

但会提示下述错误

此主题相关图片如下：360截图201209221-008.jpg

不用钻牛角尖吧

dim Vcklb as string

Vclb=tables("出库单").current("出库类别")

 

Select case Vcklb

 

case "产品出货"

代码1

   case "生产领料“

代码2

end select

谢谢两位，按4楼的方式可以了。有时真的就是转不过弯来。