Foxtable(狐表)用户栏目专家坐堂 → 单元格显示的奇怪现象,是BUG?


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

主题:单元格显示的奇怪现象,是BUG?

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


加好友 发短信
等级:小狐 帖子:385 积分:3893 威望:0 精华:0 注册:2012/2/9 20:09:00
单元格显示的奇怪现象,是BUG?  发帖心情 Post By:2014/7/21 9:09:00 [只看该作者]

单元格显示的奇怪现象

 

我用代码新增行

 

单元格中无显示,但双击此单元格,内容显示出来, 鼠标离开后又看不见了.  第1行的单元格显示正常.

 

 

代码如下:

 

 

Dim Values() As String
Values = e.Form.Controls("TextBoxhaoma").value.split(Chr(13))  '根据回车符拆分数组
' messagebox.Show(Values.Length )
For Index As Integer = 0 To  Values.Length - 1
    messagebox.Show(Values(Index))
   
    Dim r As Row = Tables("mt").AddNew
    With Tables("mt")
        .Position = .Rows.Count - 1
    End With
    messagebox.Show(Values(Index))            '*** 这一行显示的values(index)是正常能看到的.
    r("destination") = Values(Index)
    r("content") = e.form.controls("textboxzhengwen").text
    r("userSendDate") =Date.now()
Next


图片点击可在新窗口打开查看此主题相关图片如下:111.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:222.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2014-7-21 9:11:34编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/21 9:12:00 [只看该作者]

r("destination") = Values(Index).Trim()

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/7/21 9:15:00 [只看该作者]

你去看看是不是多了回车或者多了空格。

 

Dim Values() As String
Values = e.Form.Controls("TextBoxhaoma").value.split(Chr(13))  '根据回车符拆分数组
For Index As Integer = 0 To  Values.Length - 1
    Dim r As Row = Tables("mt").AddNew
    r("destination") = Values(Index).replace(chr(10), "").replace(" ", "")
    r("content") = e.form.controls("textboxzhengwen").text
    r("userSendDate") =Date.now()
Next


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


加好友 发短信
等级:小狐 帖子:385 积分:3893 威望:0 精华:0 注册:2012/2/9 20:09:00
  发帖心情 Post By:2014/7/21 10:13:00 [只看该作者]

是多了空格

 回到顶部