Foxtable(狐表)用户栏目专家坐堂 → 分割文本文件


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

主题:分割文本文件

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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/6/26 15:15:00 [显示全部帖子]

老师好,我仍然需要生成绿色线,但不显示绿色线的图例。您给的代码绿色线没有了。还需要绿色线。请问怎么办?

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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/6/28 14:44:00 [显示全部帖子]

老师好,我编写下面代码,编译无错,运行选择2017-11-11,
 VNumbers = DataTables("Operation").GetValues("VName, [Date]='" & selecteddate & "'")   




结果提示如下:请问如何更改上面的代码?谢谢
[Date]='2017-11-11' 不是有效的排序字符串项。

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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/6/28 14:45:00 [显示全部帖子]

selecteddate 是日期类型

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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/6/28 15:07:00 [显示全部帖子]

请问老师,我用
VNumbers = DataTables("Operation").GetValues("VName", "[Date]=#" & selecteddate & "#")   
执行后,数据库只有2行数据,返回结果为什么是3?

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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/10/22 11:39:00 [显示全部帖子]

老师好,请问,我的数据表t的数据列Date的大写的D,但是foxtable编译器总是写成下面的小写的date,结果造成有时计算出错。即使我改成大写的Date,编译器还是改成小写的date,请问为什么。

 

Dim max As Date = t.Compute("max(date)")
Dim min As Date = t.Compute("min(date)")


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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/10/22 12:22:00 [显示全部帖子]

我所有的表的日期列都用date做列名,没有出现问题,基本结果都正确。只有这一个表的compute方法出现问题,其他没有问题,请问我继续维持现状吗?


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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/10/25 19:48:00 [显示全部帖子]

请问老师,打开项目文件,报错,显示如下,导致不能打开项目文件,请问如何解决。谢谢(我按ctrl键了也不行)

 

提供程序无法确定 Object 值。例如,该行刚刚创建,未提供 Object 列的默认值,并且使用者尚未设置新 Object 值。


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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2018/10/26 8:04:00 [显示全部帖子]

请问老师,打开项目文件,报错,显示如下,导致不能打开项目文件,请问如何解决。谢谢(我按ctrl键了也不行)

 

提供程序无法确定 Object 值。例如,该行刚刚创建,未提供 Object 列的默认值,并且使用者尚未设置新 Object 值。



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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2019/1/18 12:31:00 [显示全部帖子]

老师好,我用下面代码打开附件数据文件,请问为什么是空的,如何改代码?谢谢

 

 

 

Dim strs As String = FileSys.ReadAllText(signaldata)
            Dim ss1,ss2 As String
            strs = strs.Replace(vblf,"")
            Dim rs() As String = strs.Split(vbcr)

            For i As Integer = 0 To rs.Length - 1
                'rs(i) = System.Text.RegularExpressions.Regex.replace(rs(i), " +", " ")
                Dim cs() As String = rs(i).Split(" ")

                    Dim dr As DataRow = DataTables("RMSData").Addnew()
                    Dim r As Row = Tables("RMSData").Rows(i)

                    ss1=rs(i).split(" ")(1)
                    ss2=rs(i).split(" ")(2)
                    messagebox.show(ss1 & " " & ss2)


                 
              Next i

 


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


加好友 发短信
等级:五尾狐 帖子:1010 积分:6496 威望:0 精华:0 注册:2015/2/25 23:14:00
  发帖心情 Post By:2019/1/18 12:32:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:si.txt


 回到顶部
总数 29 上一页 1 2 3 下一页