我正在尝试在我的OpenOffice写入器上写一个宏来删除活动word文档中的所有注释,到目前为止,我实际研究并拼凑起来的代码可以在下面找到。
Sub RemoveAllComments()
Dim i as Integer
For i = doc.Comments.Count To 1 Step -1
doc.Comments(i).Delete
Next i
End sub
我的编译器给了我一个"Object variable not set“错误,我不确定这是如何应用于我拼凑起来的代码的。我真的是个新手,我甚至不知道To 1 Step
我在拼凑这些东西时遇到了问题。你们能帮我填空吗?我试着把它拼凑到这里的其他例子中,但是我猜我完全遗漏了一些东西?我想我需要处理我的SQL,但我希望从该表中已有的值中减去联接中的sum聚合函数。
UPDATE [30 on hand].IVQTY001
SET [30 on hand].IVQTY001 =
SELECT [30 on hand].Expr1 AS [Item#],
[30 on hand].IVQTY001 AS [001 OH],
Sum(dbo_ITEMS.QUANTO) AS [Order QTY],
FROM dbo_ITEMS INNER JOIN [30 on h
我已经在Julia中用let块拼凑了一个闭包。 counter = let
local counter = 0 # local variable
f() = counter += 1 # returned function
end
counter(); counter(); counter()
print(counter()) # 4 这是朱莉娅的洁食吗?