Foxtable(狐表)用户栏目专家坐堂 → [求助]选择行报错


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

主题:[求助]选择行报错

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


加好友 发短信
等级:六尾狐 帖子:1287 积分:10362 威望:0 精华:1 注册:2018/1/20 12:40:00
[求助]选择行报错  发帖心情 Post By:2018/8/6 14:04:00 [只看该作者]

下面的代码选择行会报错。


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180806135947.png
图片点击可在新窗口打开查看

Dim D5 As Date = Date.Today

Dim Y As Integer = D5.Year
Dim M As Integer = D5.Month
Dim D As Integer = D5.DAY

Dim DateS2 As String ="sp" & y & "年" & M & "月" & "_" & D

If DataTables("进度表").datacols.Contains(DateS2) = True Then

    With  Tables("XMFP.进度表")
        .Select(1, .Cols(DATES2).Index)
    End With
End If

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


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

Dim D5 As Date = Date.Today


Dim Y As Integer = D5.Year
Dim M As Integer = D5.Month
Dim D As Integer = D5.DAY


Dim DateS2 As String ="sp" & y & "年" & M & "月" & "_" & D


If Tables("XMFP.进度表").cols.Contains(DateS2) = True Then
    With  Tables("XMFP.进度表")
        If .rows.count > 0 Then
            .Select(0, .Cols(DATES2).Index)
        End If
    End With
End If


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


加好友 发短信
等级:六尾狐 帖子:1287 积分:10362 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2018/8/6 17:23:00 [只看该作者]

多谢了。那如何让我选择的列正好在屏幕中间显示呢。。这个有办法吗

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


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


 回到顶部