主题：9月2日更新可以下载了

表达式不能用这个。
计算代码看这个例子：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目7_0902.zip

暂没有参数,不知道以后加加不
不过可以处理一下,得到简拼
Dim a As String
Dim b As String = GetPY("中国")
Output.Show(b)
For i As Integer = 0 To b.Length - 1
    If i = 0 OrElse b.Chars(i - 1) = " " Then

        a &= b.Chars(i)

    End If

Next

Output.Show(a.ToUpper)

 

这个代码在命令窗口执行的,如果放到取值代码里面要改下


lxl兄提供的简拼代码在计算代码窗口中又如何使用呢?

顶，同时怕自己速度跟不上。。。唔唔。。大家跟贴不要太快啊。说明还没看完呢。

你问的是在命令窗口中怎么使用吧？

命令窗口中可以这样：

 

Dim a As String

Dim b As String = GetPY("中国")

Tables("表A").Current("第二列")=b

For i As Integer = 0 To b.Length - 1

    If i = 0 OrElse b.Chars(i - 1) = " " Then

        a &= b.Chars(i)

    End If

Next

Tables("表A").Current("第三列")=a.ToUpper

唉，网费到期，今天刚处理完毕，赶紧下载！

更新速度快

学习.

呵呵，怎么看都有VB.NET的影子，连语法都有些相似，
估计把Foxtable学会了，可以转学VB.NET了……
新版的易表用.NET来写的吧？