Skip to content

Instantly share code, notes, and snippets.

@ochilab

ochilab/loginSample.vba

Created August 27, 2015 21:00
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ochilab/7a46a4e614103e613a19 to your computer and use it in GitHub Desktop.
Save ochilab/7a46a4e614103e613a19 to your computer and use it in GitHub Desktop.
Download ZIP
ログイン処理サンプル（講義資料
Raw
loginSample.vba
Dim txt As String
'解答モード
If OptionButton1.Value = True Then
'テキストボックスに入力されたIDを評価画面に渡す
UserForm2.id = TextBox1.Text
UserForm2.init
'解答画面表示
UserForm2.Show
'評価モード
ElseIf OptionButton2.Value = True Then
'テキストボックスに入力されたIDを評価画面に渡す
UserForm3.id = TextBox1.Text
UserForm3.Show
End If
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment