請教高手﹐Notes中多值域的問題﹐急﹐急急急急急急急急急急急﹗(在線等待)
doc中有Items域,并且為多值域,域值為("a";"b";"c";"d";"e")
Dim doc As NotesDocument
Dim a As Variant
a = Evaluate(|@Member("c";Items)|, doc)
Messagebox("Value is " & a(0))
不之為何a的值傳回0﹐正確應為3.(點解)
问题点数：0、回复次数：5Top
1 楼fely（fely）回复于 2005-04-01 21:15:37 得分 0
不能这么写的，因为Items在LS里无法理解，它不会像公式般去找文档的items域。
如果items不是多值域的话则可以写成
a = Evaluate(|@Member("c";"|+doc.Items(0)+|")|, doc)
是多值域则不能这么写，也不能写成：
a = Evaluate(|@Member("c";"|+doc.Items+|")|, doc)
解决方法请知道的也告诉我一声。Top
2 楼ValiantWang（^^冰河^^）回复于 2005-04-02 08:30:21 得分 0
或者問題以解決﹕
可先將items值變成一個字串,再將字串用"﹔"號隔開﹐然后再取出.
程式為:
Dim a As Variant
a = Evaluate(|@Member("c";@Explode("|+doc.GetFirstItem("Items").Text+|";";"))|)
Messagebox("Value is " & a(0))
此程式會傳回3;
Top
3 楼zengxianfeng（冲星中......）回复于 2005-04-04 17:04:33 得分 0
这样应该可以
Dim doc As NotesDocument
Dim a As Variant
a = Evaluate(|@Member("c";@explode(Items))|, doc)
Messagebox("Value is " & a(0))
Top
4 楼wbx09（）回复于 2005-04-05 16:58:33 得分 0
把直转换成数组就可以了。楼主去试一下吧，Top
5 楼graydom（龟）回复于 2005-04-05 17:37:09 得分 0
en,解决就好Top
相关问题
- 求教，急急急急急急急急急急..
- 怎么做在线音乐?求有经验的指教???急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急
- 急急急急急急急急急急急急急急,小弟求教SHELL.Application的问题,急急急急急急急急急急急急急急急急急急急急急
- excel问题，100分请教大家，急急急急急急急急急急急！！！！！！！！！！
- 请教，急急急急！！！！
- 在线急等~求高手指教~~急急急急急急急急急!!!!数据转换!!!!急急急急急急急急急急急急急急急急急急急急急急急
- 急，急，急！求教
- 求教············急急急！~~~~~~~
- 请教,急!急!急!
- 请教一个概念什么是数据窗口画笔？急急急急急急急急急急急急急
