目安箱 IV

目安箱投稿のルールはこちらをごらんください。
ご意見は電子メールで承っています。
「目安箱」は質問禁止です。技術的な質問はそれぞれの質問箱へどうぞ。

迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

┃ ┃ ┃ ┃ ┃ ┃

18 / 277

←次へ　｜　前へ→

【281】今更ながら。

Jaka - 15/8/6(木) 12:25 -


	引用なし

	パスワード

誤字だらけやん。
１０年たってから気づきました。
すみません。
他にもありそうな気が・・・。

>　　PtWd = InputBox("ボタンに持たせる引数（数字のみ）を入力してください。", "引数入力", , XPos:=横位置, YPos:=縦位置)
>　　If PtWd = "" Then
>　　　 MsgBox "引数なし　終了"
>　　　 Exit Sub
>　　ElseIf Not IsNumeric(PasWd) Then
>　　　 MsgBox "数字だけです。　終了"
>　　　 Exit Sub
>　　End If

ElseIf Not IsNumeric(PasWd) Then
　　↓
ElseIf Not IsNumeric(PtWd) Then

1,071 hits