VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日： 2003/05/30(Fri) 16:37
投稿者： ゆたか
Ｅメール：
ＵＲＬ：
タイトル： 小数点

いつもお世話になっております。
質問がありますが、あるテキストボックスに小数点と数字が入力できるようにしたいのですが、今はこのようなコードになっております。

If KeyAscii = vbKeyBack Then Exit Sub
If (KeyAscii < Asc("0") Or KeyAscii > Asc("9")) And 　　KeyAscii <> 46 Then
　KeyAscii = 0
End If

ようは電卓みたいに小数点やら数字を入力したいのですが。
このままですと数字、小数点は入力できますが、おかしなことに（小数点がいくつも入ってしまう、最初から小数点”.13”みたいな）うまく処理できる方法があれば教えていただきたいと思います。
お願いします。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- Web Forum -