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
![[出力項目設定]例](Tr04030o.gif)