ホーム :フォーム関連 :


ラベルに文字を代入

前へ 次へ

' 条件により、ラベル文字を変更する。
Private Sub UserForm_Initialize()
Label1.Caption = joutai
If joutai = "insatu" Then Label1.Caption = "リザルト作成中"

End Sub



前へ 次へ
フォーム関連 に戻る