No.2
- 回答日時:
こんにちは。
maruru01です。これもスマートじゃないですが、16進数を意識した方法です。
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim ret As Double
On Error Resume Next
ret = CDbl("&H" & Chr(KeyAscii))
If Err.Number <> 0 Then
KeyAscii = 0
Err.Clear
End If
End Sub
No.3
- 回答日時:
VB.NETでないが、この辺はVBの根幹に関わるところなので、変化ないと思いますので、参考に。
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
For i = 1 To Len(TextBox1.Text)
a = Asc(Mid(TextBox1.Text, i, 1))
' MsgBox a
Select Case a
Case Is <= 57 And a >= 48
GoTo p01
Case Is <= 102 And a >= 92
GoTo p01
Case Else
MsgBox "Err"
Exit Sub
End Select
p01:
Next i
MsgBox "OK"
End Sub
Isのところ辺りとか、Andなどや、なぜか92と102の前後を逆にすると旨く行かないとかご参考までに。
イベントをTextBoxのDblClickなどにしているのは、小生の無知のせいで、良いものがあれば変えて下さい。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- がん・心臓病・脳卒中 HPV 18型、軽度異形成について はじめにASC-USと診断され、HPV検査したところ18型に感染 10 2023/02/11 15:41
- 婦人科の病気・生理 不正出血について 最近、ASC-US→HPV18型→軽度異形成→ASC-USと診断されたのですが診断 1 2023/02/20 15:07
- Excel(エクセル) 全角文字「ヴ」の半角文字「ヴ」への変換方法について 3 2022/11/05 12:07
- その他(Microsoft Office) 英数字のみ全角から半角に変換 4 2023/07/28 14:48
- 日本語 Simulation のカタカナ表記の変遷を教えてください 5 2023/07/21 04:30
- 婦人科の病気・生理 子宮頸がん検査結果のASC-USについて詳しいかたいますか? 質問したいです。 4 2022/10/21 19:59
- Excel(エクセル) A=IF(C19="","",IF(OR(C19>$P$20,C19<$S$20),"不合格",IF 5 2022/03/28 09:21
- PHP php my adminより取り出したデータ表示 2 2022/06/15 11:56
- Visual Basic(VBA) 【再々投稿】VBAのプログラムで動作しなくて困っています 8 2022/10/14 09:06
- 婦人科の病気・生理 子宮頚がん検査にてasc-us 3aと診断され、追加で受けたHPV検査の詳細結果が分かったのですが、 2 2022/10/17 15:39
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
visual basic初心者です。 visu...
-
VBSのプログラム
-
エクセルVBAでテキストボッ...
-
ユーザーフォームへのデータ入...
-
アクセスできない保護レベルエ...
-
VB2005テキストボックスへのコ...
-
VBAのフォーム カーソル移動
-
Excel ユーザーフォームで計算 ...
-
VBA public変数はどのようなこ...
-
sublimit textっていうエディタ...
-
C#のループでtextboxに値を入れ...
-
[VB6] SQLの作成について
-
Pythonのre.split()の正規表現...
-
プログラムの素朴な質問です 分...
-
Functionの戻り値を配列にした...
-
Excel VBAでsub,dimは何の略?
-
リストビューの列ヘッダーの幅...
-
レコードセットにnullの場合
-
二点の座標から距離や角度を求...
-
VB.NETでのイベントの途中終了
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAでテキストボッ...
-
アクセスできない保護レベルエ...
-
visual basic初心者です。 visu...
-
VBAで入力数値について
-
ユーザーフォームへのデータ入...
-
【VB.NET】テキストボックスに...
-
Excel ユーザーフォームで計算 ...
-
VBでの入力値制限について
-
ACCESS 除算での小数点切上げ方法
-
テキストボックスを空白にする方法
-
【C#】コンボボックスにおけるS...
-
visual studio 2008 C# で、値...
-
TEXTBOXの表示形式の変...
-
テキストボックス1の値に対する...
-
256色で任意の色を作成する時、...
-
VBAのフォーム カーソル移動
-
VBAのユーザーフォームで、テキ...
-
Vba 電卓のテキストボックスに...
-
VBSのプログラム
-
整数かどうかチェックする
おすすめ情報