Kheilmann 发表于 2006-11-9 14:03:08

.关键字不返回选定的整个字符串

为什么下面只返回每个字符串的第一个#呢?无论我选择哪一个,都会放入“4x4x4”...
有了这张图纸。实用程序。InitializeUserInput 1," 4x4x 4 4x4x 3 4x4x 2 "
strPartSize =。get keyword(vbCr & " Pipe size::")

结尾,这个返回整个字符串?
有了这张图纸。实用程序。InitializeUserInput 1," . 5 .75 1 1.25 1.5 2"
PipeSize =。GetKeyword(vbCr & "输入管道尺寸:[.5/.75/1/1.25/1.5/2]: ")
结尾
预先感谢您的帮助。
**** Hidden Message *****

Fatty 发表于 2006-11-9 15:52:10

凯文,
不确定这是否会有帮助,但
我喜欢用这样的东西:
With ThisDrawing.Utility
    .InitializeUserInput 1, "4 3 2"
    strPartSize = .GetKeyword(vbCr & "Pipe Sizes: (4x4x/4x4x/4x4x): ")
End With
Select Case strPartSize
Case Is = "4"
strPartSize = "4x4x4"
Case Is = "3"
strPartSize = "4x4x3"
Case Is = "2"
strPartSize = "4x4x2"
End Select

~'J'~
页: [1]
查看完整版本: .关键字不返回选定的整个字符串