Foxtable(狐表)用户栏目专家坐堂 → 自动删除某列的空格


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

主题:自动删除某列的空格

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
自动删除某列的空格  发帖心情 Post By:2010/3/16 15:08:00 [只看该作者]

狐表中,我向把姓名列设置一段代码,使姓名输入过程中即使出现空格,也能自动删除,请问哪位这个代码应该如何写
我编的是dim xm as string =e.datarow("姓名")
xm.Trim(" ")
,但是不起作用,达不到删除的目的

请哪位高手指导一下

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/3/16 15:17:00 [只看该作者]

呵呵,心急吃不得热豆腐,你应该仔细看看帮助文件的。

放在ValidateEdit事件中:

If e.Col.Name = "姓名"
    e.Text = e.Text.REplace(" ","")
End If


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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 8:10:00 [只看该作者]

谢谢指导

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 8:11:00 [只看该作者]

我刚购买了你们的开发版的狐表,设计了一套软件,想让你们给我发布以下,就等这一点程序了,就是编不好

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 8:15:00 [只看该作者]

我有一点不明白,



If e.Col.Name = "姓名"
    e.Text = e.Text.REplace(" ","")
End If

这段中为什么不用then

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 8:29:00 [只看该作者]

 dim xm as string =e.DataRow("姓名")
        e.DataRow("姓名")=xm.Replace(" ","")
我也于昨晚终于想出来了,这会试了一下,也能够执行了
dim xm as string =e.DataRow("姓名")
        xm=xm.Replace(" ","")
这一段为什么不能执行呢,

e.DataRow("姓名")与xm有什么区别?

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 8:45:00 [只看该作者]

帮助文件的重要环节我已经 看了两三遍了,有些地方还不是很明白

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/3/17 8:55:00 [只看该作者]

呵呵,漏掉then,是手误,还有6楼的问题让人无法回答,你必须细看帮助,特别是foxtable编程这一章,而这一章的事件编程是重点中的重点
[此贴子已经被作者于2010-3-17 9:21:40编辑过]

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


加好友 发短信 三级勋章
等级:童狐 帖子:273 积分:2072 威望:0 精华:0 注册:2008/9/5 23:31:00
  发帖心情 Post By:2010/3/17 9:30:00 [只看该作者]

对于6楼的问题,我想如果能搞明白下面这段代码,就不难理解了:
Dim i As Integer = 5
i = i + 1
你说第二行代码等号两边的变量 i 能一样吗?

其实,楼主之所以被那两行代码搞糊涂了,是因为你少写了一行代码:
dim xm as string = e.DataRow("姓名")
xm = xm.Replace(" ","")
e.DataRow("姓名") = xm

搞明白这个问题以后,你的代码可以简化为:
e.DataRow("姓名")=e.DataRow("姓名").Replace(" ","")

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2010/3/17 9:33:00 [只看该作者]

以下是引用cxabc123在2010-3-17 8:29:00的发言:
 dim xm as string =e.DataRow("姓名")
        e.DataRow("姓名")=xm.Replace(" ","")
我也于昨晚终于想出来了,这会试了一下,也能够执行了
dim xm as string =e.DataRow("姓名")
        xm=xm.Replace(" ","")
这一段为什么不能执行呢,

e.DataRow("姓名")与xm有什么区别?


执行了,只是您看不见,您可以MessageBox.Show(xm)看看结果
原因很简单:xm是字符串  e.DataRow("姓名")是当前行的性名列,您没有分清主谓,差别在于您手里拿着100元钱和您兜里揣着100元钱的区别,一个是大家都看得见,一个只有您心里知道。


 回到顶部
总数 17 1 2 下一页