Foxtable(狐表)用户栏目专家坐堂 → [求助].NET Framework 版本:2.0.50727.8806 Foxtable 版本:2016.7.29.1 错误所在事件:窗口,面试成绩,Button4,Click 详细错误信息: 语法错误:“A”运算符后缺少操作数。


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

主题:[求助].NET Framework 版本:2.0.50727.8806 Foxtable 版本:2016.7.29.1 错误所在事件:窗口,面试成绩,Button4,Click 详细错误信息: 语法错误:“A”运算符后缺少操作数。

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


加好友 发短信
等级:五尾狐 帖子:1116 积分:8608 威望:0 精华:0 注册:2012/7/10 9:09:00
[求助].NET Framework 版本:2.0.50727.8806 Foxtable 版本:2016.7.29.1 错误所在事件:窗口,面试成绩,Button4,Click 详细错误信息: 语法错误:“A”运算符后缺少操作数。  发帖心情 Post By:2022/7/21 7:00:00 [只看该作者]

下段代码运行时提示:
.NET Framework 版本:2.0.50727.8806
Foxtable 版本:2016.7.29.1
错误所在事件:窗口,面试成绩,Button4,Click
详细错误信息:
语法错误:“A”运算符后缺少操作数。
代码如下:
Dim bjs As List(Of String) = DataTables("笔试成绩").GetValues("职位代码")
For Each bj As String In bjs
    '获得该班级的全部行,按总分降序排序
    Dim drs As List(Of DataRow) = DataTables("笔试成绩").Select("[职位代码] = " & bj, "总成绩 DESC")
    For n As Integer = 0 To drs.Count - 1 '遍历所有行
        If n > 0 AndAlso drs(n)("总成绩") = drs(n-1)("总成绩") Then '如果总分和上一行相同
            drs(n)("面试排名") = drs(n-1)("面试排名") '则排名等于上一行
       Else
           drs(n)("面试排名") = n + 1 '设置排名
       End If
        If n>0 AndAlso  drs(n)("总成绩") = drs(n-1)("总成绩")  Then
            drs(n)("标识") = True
            drs(n-1)("标识") = True
        Else
            drs(n)("标识") = False
        End If
    Next
Next
e.Form.Controls("笔试").Table.Sort="职位代码,面试排名"

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


加好友 发短信
等级:三尾狐 帖子:754 积分:5378 威望:0 精华:0 注册:2012/10/5 21:53:00
  发帖心情 Post By:2022/7/21 8:10:00 [只看该作者]

Select("[职位代码] = '" & bj & "'", "总成绩 DESC")

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


加好友 发短信
等级:超级版主 帖子:106732 积分:542855 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/21 9:15:00 [只看该作者]


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


加好友 发短信
等级:五尾狐 帖子:1116 积分:8608 威望:0 精华:0 注册:2012/7/10 9:09:00
  发帖心情 Post By:2022/7/21 15:06:00 [只看该作者]

谢谢

 回到顶部