Function 警告提示问题
function 过程不需要返回值 只有参数传入 下面结束处的 END function 总是划波浪形
警告里也老提示着 “函数 XXX 不会在所有代码路径上都返回值。当使用结果时，可能会在运行时发生 Null 引用异常”
如何去掉警告呢？ 我根本就不需要返回值。
Function AddNam(ByVal TmpID As String)
'''''
End Function
[解决办法]
不需要返回值，就改成Sub
[解决办法]
不需要返回值用Sub.
Sub AddNam(ByVal TmpID As String)
'''''
End Sub
需要返回值，所有路径都返回值。
[解决办法]
提示警告，就传个返回Return ""就可以了。
