4章 カスタマイズ /4-3フォーム「つくつく住所」を活用する[Access97] |
| |
Window2000で当処理を行うと漢字が文字化けを起こします。 |
<操作手順> |
Private Sub コマンド58_Click() On Error GoTo Err_コマンド58_Click Dim stAppName As String stAppName = "C:\Program Files\つくつく住所3\Mdr010fp.exe" Call Shell(stAppName, 1) Me![氏名1].SetFocus 'ここから入力開始(フォーカス) Exit_コマンド58_Click: Exit Sub Err_コマンド58_Click: MsgBox Err.Description Resume Exit_コマンド58_Click End Sub