tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: TextBoxの桁数制限
投稿日: 2005/04/22(Fri) 13:19
投稿者つかさ
[OSのVer]:Windows    [VBのVer]:VB.NET  
> 下記に変更して見て下さい。
>
> 直接の原因は ByVal wMsg As Long の部分ですが、他も修正した方がいいかと。
> Long 型 → Integer 型 へ
>
> Public Declare Function SendMessage Lib "user32" Alias "SendMessageA"
; _
>     (ByVal hWnd As IntPtr, ByVal wMsg As Integer, _
>      ByVal wParam As Integer, ByVal lParam As Integer) As Integer
>
> Public Const EM_LIMITTEXT As Int32 = &HC5
> Public Const EM_SETLIMITTEXT As Int32 = EM_LIMITTEXT
>
>                              0& の& は外す
> Call SendMessage(TextBox5.Handle, EM_SETLIMITTEXT, DI_MaxLen, 0)

早速の回答ありがとうございます。

上記提案通り行なってみましたが、やはり文字としてしかチェックされませんでした。
半角での桁数チェックは正常に行なわれているようですが、全角が含まれるとやはり
文字として扱われる様です("あいう1234"は7桁)。
こまりました・・・。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。