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


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

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

帅哥哟,离线,有人找我吗?
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(" ")
,但是不起作用,达不到删除的目的

请哪位高手指导一下

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


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

谢谢指导

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


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

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

 回到顶部
帅哥哟,离线,有人找我吗?
cxabc123
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | 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
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | 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
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

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

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 11:12:00 [显示全部帖子]

then虽然漏掉了,但是还是能够执行,我就直接用的你提供的这段代码


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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 11:20:00 [显示全部帖子]

以下是引用程兴刚在2010-3-17 9:33:00的发言:


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

 我的理解是既然定义xm=e.DataRow("姓名"),那么他们就是等价的,完全可以代替的。我想不明白的就是:既然是等价的,那么又为什么不能代替呢。

[此贴子已经被作者于2010-3-17 11:22:53编辑过]

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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 11:29:00 [显示全部帖子]

以下是引用bjljb在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(" ","")

I的问题我能搞明白是怎么回事,搞不明白的是


Dim i As Integer = 5
帮助力这样的代码有几处,我已经看了几遍就是不明白, 

Dim Mark As Integer = 65
Dim
Result As String
Select Case
Mark
    Case
0 To 40
        Result =
"E"
   
Case 41 To 60
        Result =
"D"
   
Case 61 To 70
        Result =
"C"
   
Case 71 To 90
        Result =
"B"
   
Case 91 To 100
        Result =
"A"
End Select

OutPut.Show(Result)


这一段中65是如何确定的,我始终搞不明白,请高人指导一下。


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


加好友 发短信
等级:四尾狐 帖子:810 积分:5250 威望:0 精华:0 注册:2009/2/6 10:38:00
  发帖心情 Post By:2010/3/17 11:54:00 [显示全部帖子]

随便确定一个数字就可以,还是要什么要求

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