Function 警告提示有关问题

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 ""就可以了。