Foxtable(狐表)用户栏目专家坐堂 → 显示字符数量包括空格


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

主题:显示字符数量包括空格

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
显示字符数量包括空格  发帖心情 Post By:2014/9/16 16:38:00 [显示全部帖子]

Dim cst As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim length As Integer = 0
Dim fdr As DataRow
For Each i As Integer In cst.CheckedIndices
    fdr = DataTables("关键词库").Find("类别 = '" & Forms("商品档案窗口").Controls("ComboBox4").Text & "' and 中文 = '" & cst.Items(i) & "'")
    If fdr IsNot Nothing Then
        If fdr.IsNull("英文") = False Then
            length += fdr("英文").Length
        End If
    End If
Next

Forms("商品档案窗口").Controls("Label1").Text = "" & 128 - length & ""
能帮我看看  128-length(包括空格应该怎么改一下啊)
谢谢 

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/16 16:51:00 [显示全部帖子]

Dim cst As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim length As Integer = 0
Dim fdr As DataRow
For Each i As Integer In cst.CheckedIndices
    fdr = DataTables("关键词库").Find("类别 = '" & Forms("商品档案窗口").Controls("ComboBox4").Text & "' and 中文 = '" & cst.Items(i) & "'")
    If fdr IsNot Nothing Then
        If fdr.IsNull("英文") = False Then
            length += fdr("英文").Length
        End If
    End If
Next
Forms("商品档案窗口").Controls("Label1").Text = "" & 128 - length & ""
谢谢 ! 
Label1是记“英文”列有多少字符的,但是没有包括空格,可不可以让Label1显示128-英文列(包括英文列空格的字符)
谢谢

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/16 20:38:00 [显示全部帖子]

还是不行,能帮我看看吗?感谢!
图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:字符加空格.table



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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/16 21:28:00 [显示全部帖子]

好的 感谢你哦

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/16 21:38:00 [显示全部帖子]

谢谢 还是能实现了呢?我在试试!

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/17 11:06:00 [显示全部帖子]

甜美女!能在帮我看看吗?改了还是不行呢?
谢谢你!

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


加好友 发短信
等级:九尾狐 帖子:2705 积分:18035 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2014/9/17 11:22:00 [显示全部帖子]

我是不是事件写错了啊!
谢谢
图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看

 回到顶部