主题：[分享][原创]列截图功能（解决）谢谢老师们 最后的代码有效

CellButtonClick事件

If e.Col.name = "截图功能" Then
    ClipBoard.Clear
    Dim proc As new Process
    proc.File = ApplicationPath & "/capture.exe"
    proc.WaitForClose = True
    proc.Start
    If ClipBoard.GetImage IsNot Nothing Then
        Dim f As String = ProjectPath & format(Date.now, "yyyyMMddHHmmss") & ".jpg"
        ClipBoard.GetImage.save(ProjectPath & format(Date.now, "yyyyMMddHHmmss") & ".jpg")
        e.Row(e.Col.name) = f
    End If
    e.cancel = True
End If