Excel VBA ライセンス





以下ライセンスうまくいかない・・・
どうやるのこれ??

https://www.timsoft.co.jp/stadium/%E3%82%A8%E3%82%AF%E3%82%BB%E3%83%AB%E3%81%A7%E3%83%A9%E3%82%A4%E3%82%BB%E3%83%B3%E3%82%B9%E3%82%92%E3%83%81%E3%82%A7%E3%83%83%E3%82%AF%E3%81%99%E3%82%8B%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/


以下は社内的なやつ



Sub CheckLicense()
Dim licenseKey As String

' ユーザーにライセンスキーを入力させる
licenseKey = InputBox("ライセンスキーを入力してください", "ライセンス認証")

' ライセンスキーが "111" であるかどうかを検証する
If licenseKey = "111" Then
MsgBox "ライセンスが正常に認証されました。", vbInformation, "ライセンス認証"
Else
' ライセンスが正しくない場合は、警告メッセージを表示する
MsgBox "ライセンスキーが正しくありません。", vbCritical, "ライセンス認証"
End If
End Sub




現在の閲覧者数:
"
"

スポンサーサイト



コメント

非公開コメント

ケアプロダクトデザイナー:家庭用化学製品開発製造販売技術者:104

おかげさまで4,000アクセスされました!
今後も更新がんばります。

どうも日用品関係の情報をまとめる人です。
2021年4月2日からブログ毎日更新。

↓日用商品成分相談、販売検討している方は↓

104fig〇gmail.com

※〇を@に変更してください


~資格~
危険物取扱者甲種
QC検定2級
ITパスポート
エコ検定
化粧品成分上級スペシャリスト
アロマテラピーアドバイザー
アロマテラピー検定1級

ブロとも申請フォーム

QRコード

QR