ClickOnce で CurrentDomain.FriendlyName を使っていると

環境

.Netframework 4.5
VB.Net

ClickOnceでAppDomain.CurrentDomain.FriendlyNameを使っていると

ビルド実行では動いてたのに、配布したら動かなくて焦った。

結論。

デザインモード時に処理を発生させないように下記プロパティで制限してた。
だが、配布時にデザインモードになっていた。

If AppDomain.CurrentDomain.FriendlyName = "DefaultDomain" Then '<- ClickOnceだと"DefaultDomain"になってた。
    Return 'デザインモードのときはなにもしないよ。
End If

ApplicationDeployment.IsNetworkDeployedプロパティでclickonceで配布しているか確認するようにした。

If Not ApplicationDeployment.IsNetworkDeployed Then
    If AppDomain.CurrentDomain.FriendlyName = "DefaultDomain" Then
        Return 'デザインモードのときはなにもしないよ。
    End If
End If