如何从我的VBA代码中修复MS-Access中的424运行时错误“Object Required”

When running my VBA code in access I get the runtime error 424, "Object Required". This Is the code causing the error (specifically line 2)When running my VBA code in access I get the ru