| 関数名 |
UserForm_Initialize |
| 概要 |
【機能】：フォーム初期化処理 |
| 処理 |
DateBoxに開始日付値をセットする
|
| 形式 |
Private Sub UserForm_Initialize() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
OK_Click |
| 概要 |
【機能】：ＯＫクリック処理 |
| 処理 |
標準工程追加画面を閉じて(Unload)、「BAS_StandardProcessAdd」を実行する
|
| 形式 |
Private Sub OK_Click() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
Cancel_Click |
| 概要 |
【機能】：キャンセルクリック処理 |
| 処理 |
標準工程追加画面を閉じる(Unload)
|
| 形式 |
Private Sub Cancel_Click() |
| 可視性 |
プライベート |
| 引数 |
なし |
| 関数名 |
DateBox_MouseUp |
| 概要 |
【機能】：DateBoxクリック処理 |
| 処理 |
DateBoxのカレンダー入力
|
| 形式 |
Private Sub DateBox_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) |
| 可視性 |
プライベート |
| 引数 |
| Button |
Integer |
|
| Shift |
Integer |
|
| X |
Single |
|
| Y |
Single |
|
|
| 関数名 |
DateBox_KeyDown |
| 概要 |
【機能】：開始日エリアキー処理 |
| 処理 |
カレンダーフォームを表示する
|
| 形式 |
Private Sub DateBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer |
|
|
| 関数名 |
KeyDownEv |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub KeyDownEv(ByVal KeyCode As Integer) |
| 可視性 |
プライベート |
| 引数 |
|
| 関数名 |
ItemBox_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub ItemBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
OK_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub OK_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
| 関数名 |
Cancel_KeyDown |
| 概要 |
|
| 処理 |
|
| 形式 |
Private Sub Cancel_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer): KeyDownEv (KeyCode): End Sub |
| 可視性 |
プライベート |
| 引数 |
| KeyCode |
MSForms.ReturnInteger |
|
| Shift |
Integer): |
|
|
|
モジュール名：WND_BasePlanAdd