投稿日	： 2004/04/08(Thu) 17:10
投稿者	： 放浪者
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^5: Textboxを使用した入力チェックの手段

>    
>     If p > 0 Then
>         '整数部チェック
>         If Len(Mid(Trim(strChar), 1, p - 1)) > 9 Then
>             MsgBox "整数部は９桁以内！！", vbExclamation, "入力エラー"
>             Exit Sub
>         End If
>         '小数部チェック
>         If Len(Mid(Trim(strChar), p + 1, l - p)) > 2 Then
>             MsgBox "小数部は２桁以内！！", vbExclamation, "入力エラー"
>             Exit Sub
>         End If
>     Else
>         '整数部チェック
>         If Len(Trim(strChar)) > 9 Then
>             MsgBox "整数部は９桁以内！！", vbExclamation, "入力エラー"
>             Exit Sub
>         End If
>     End If
>

この部分を、Select Case で 整理すると見やすくなりそうですね・・・
コードは載せませんけど m(__)m

★ - Textboxを使用した入力チェックの手段 - ゆづき 04/08-14:18No.8608
• Re: Textboxを使用した入力チェックの手段 - へいぽ 04/08-14:38 No.8609
  • Re^2: Textboxを使用した入力チェックの手.. - ゆづき 04/08-15:03 No.8611
    • Re^3: Textboxを使用した入力チェックの手.. - 放浪者 04/08-15:20 No.8612
    • Re^3: Textboxを使用した入力チェックの手.. - 黒影 04/08-15:30 No.8613
      • Re^4: Textboxを使用した入力チェックの手.. - 放浪者 04/08-16:18 No.8615
      • Re^4: Textboxを使用した入力チェックの手.. - 黒影 04/08-16:43 No.8617
        • Re^5: 一部修正 - 黒影 04/08-16:57 No.8619
          • Re^6: これだけでも良かった - 黒影 04/09-14:56 No.8633
        • Re^5: Textboxを使用した入力チェックの手.. - 放浪者 04/08-17:10 No.8620
          • Re^6: Textboxを使用した入力チェックの手.. - ゆづき 04/08-19:17 No.8622