Exit Subについて (ID:117443)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Functionにしてるんだから戻り値を入れればOKでは？ Private Sub Command1_Click() if Yobareru(2)=2 then Exit sub End Sub Private Function Yobareru(a As Integer) as Integer If a = 2 Then Yobareru=a Exit Function 'ここでいっぺんに呼び出しもとのプロシージャの処理を抜けたい End Function