はじめまして、いつも大変参考にさせて頂いております 
例えば 
Private sub (Byref ss As string) 
 : 
 : 
End Sub 
 
Dim s as string 
 xyz(s) <---- (A) 
 : 
 : 
 
で(A)のところで 
変数 's' は、値が割り当てられる前に参照によって渡されています。Null 参照の例外が実行時に発生する可能性があります。 
と警告ｴﾗｰが出ますよねぇ 
これを防ぐには 
Dim s as string = ""や 
s = "" 
で初期化してやるば良いのは分かるのですが、他に方法はないんですか？