oceansea
16-02-05, 08:20 PM
我在vb中的代码为：
private sub command1_click()
dim ows as object
dim ouidoc as object
dim odoc as object
dim oit as object
set ows = createobject("Notes.NotesUIWorkspace")
set ouidoc = ows.currentdocument
set odoc = ouidoc.document
ouidoc.editmode = True
set oit = odoc.Items(0)
end sub
出现的错误：在最后一句 set oit = odoc.Items(0),前面都没有出错。
错误信息为：Run_time error '458'
Variable uses an Automation type not supported in Visual Basic。
请指点，谢谢。
private sub command1_click()
dim ows as object
dim ouidoc as object
dim odoc as object
dim oit as object
set ows = createobject("Notes.NotesUIWorkspace")
set ouidoc = ows.currentdocument
set odoc = ouidoc.document
ouidoc.editmode = True
set oit = odoc.Items(0)
end sub
出现的错误：在最后一句 set oit = odoc.Items(0),前面都没有出错。
错误信息为：Run_time error '458'
Variable uses an Automation type not supported in Visual Basic。
请指点，谢谢。