Foxtable(狐表)用户栏目专家坐堂 → 请教两个问题, 狐爸再看下哈!(已解决)


  共有13267人关注过本帖树形打印复制链接

主题:请教两个问题, 狐爸再看下哈!(已解决)

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/7/7 16:29:00 [显示全部帖子]

1、参考:

http://help.foxtable.com/topics/0645.htm

http://help.foxtable.com/topics/0545.htm

 

2、:

 

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目109.rar


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/7/8 8:51:00 [显示全部帖子]

发邮件到zjtdr@21cn.net,索取商业版下载地址,开发版的加密狗也支持商业版的。

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/7/8 9:47:00 [显示全部帖子]

呵呵,你先自己想想,就当做练习题。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/7/8 15:20:00 [显示全部帖子]

If e.DataCol.name = "第一列" Then
    Dim v1 As String = e.NewValue
    Dim v2 As String
    Dim start As Boolean
    For i As Integer = v1.Length - 1 To 0 Step -1
        If start Then
            If Char.IsDigit(v1.Chars(i)) Then
                v2 = v1.Chars(i) & v2
            Else
                Exit For
            End If
        Else
            If  v1.Chars(i) = "x" Then
                start= True
            End If
        End If
    Next
    e.DataRow("第二列") = v2
End If

 回到顶部