Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共9 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:清除行内容

1楼
1234567 发表于:2025/3/5 14:19:00

如何清除当前行的除第一列的所有列的内容?

2楼
有点蓝 发表于:2025/3/5 14:27:00
dim r as row = Tables("订单").current
if r isnot nothing
For i as integer = 1 to Tables("订单").Cols.count - 1
   r(i)=nothing

Next
end if
3楼
1234567 发表于:2025/3/5 15:13:00

DataColChanged

 

Dim dt As DataTable = e.DataTable
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "工步代码", "材料牌号"
        If dr("工步代码") = "010101" Then
            For Each c As DataCol In dt.DataCols
                If c <> "工步代码" OrElse c <> "材料牌号" Then '如何排除[工步代码]列和[材料牌号]列?
                    dr(c) = Nothing
                End If
            Next      
            dr("加工阶段") = "1"
        End If
End Select

4楼
有点蓝 发表于:2025/3/5 15:28:00
If c <> "工步代码" andalso c <> "材料牌号" Then 

http://www.foxtable.com/webhelp/topics/0220.htm
5楼
1234567 发表于:2025/3/5 15:37:00

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
6楼
有点蓝 发表于:2025/3/5 16:19:00
c.name <> "工步代码"
7楼
1234567 发表于:2025/3/5 16:27:00

If c.name <> "工步代码" OrElse c.name <> "材料牌号" Then

能否用In 运算符用来判断某一个值是否在指定的一系列值中?

8楼
有点蓝 发表于:2025/3/5 16:30:00
不能
9楼
y2287958 发表于:2025/3/6 10:44:00
If {"工步代码", "材料牌号"}.contains(c.name) = False Then

共9 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.