- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]格式转换表达式公式 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=68054)
-- 发布时间：2015/5/8 15:31:00
-- [求助]格式转换表达式公式
2/2/2 或10/10/10 怎样转换成2层2站2门或10层10站10门
-- 发布时间：2015/5/8 15:34:00
--
这个得用代码.表达式做不到.
Dim ss As String() = "2/2/2".Split("/")
Dim str As String=ss(0) & "层" & ss(1) & "站" & ss(2) & "门"
MessageBox.show(str)
-- 发布时间：2015/5/8 15:36:00
--
Dim str As String = "2/2/2"
Dim pstr As String = "层/站/门"
Dim nstr As String = ""
Dim ary1() As String = pstr.Split("/")
Dim ary2() As String = str.Split("/")
For i As Integer = 0 To ary2.Length - 1
nstr &= ary2(i) & ary1(i)
Next
msgbox(nstr)
-- 发布时间：2015/5/8 16:13:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
当我输入第一列时，第二列自动转换
此主题相关图片如下：1.jpg
-- 发布时间：2015/5/8 16:19:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |