【最大10000ポイント】当たる!!質問投稿キャンペーン!

OS:windows2000pro
VB:VB6.0sp5

ASCIIコードを文字に変換した後に、そのコードが Null であるか否かの確認する方法を
ご教示くださいます様よろしくお願いいたします

補足:ASCIIコードで Null のコードをパターンに持つという方法もありますが・・・・

このQ&Aに関連する最新のQ&A

A 回答 (2件)

Chr(0) 値0を持つ文字列だけれど、


こういうことかしら?

Sub test()
myStr = Chr(AsciiCode)
If myStr = vbNullChar Then
 MsgBox "Null"
Else
 MsgBox MyStr
End If
End Sub

BLUEPIXYさん、後だしでごめんなさい!
    • good
    • 0

char = chr(code) 'アスキーコードを文字に変換


if asc(char)=0 then 'char が Nullか?
MsgBox "Null"
end if

質問の意図を取り違えていたらすみません
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QVisual Basic でのコードをASCII変換、16進変換したものを元に戻す方法を教えてください

string(9)のエリア"Aa1アあa "の文字を1文字ずつASCII変換して、16進変換し、string(18)のエリアに格納します
すると"416131B182A08281202020"と変換されます
(一文字ずつ Hex(Asc(Buf))を使用しました)

逆に、"416131B182A08281202020"を"Aa1アあa "に戻したいのですが、
どのような関数を使えばよいのかわかりません。
困っています。教えてください。よろしくお願いいたします。

Aベストアンサー

VB既存の関数ではできないと思うので、自分で関数を作るなりしてください。

ヒントです。
ASC関数により変換された2バイト文字(シフトJIS)の1バイト目は81~9FおよびE0~FC(すべて16進)になります。
16進数から10進数に戻すには、頭に"&H"をつけます。(&H82A0 = 「あ」のシフトJISコード)
文字を数字に変換するのはVal関数、数字(文字コード)から文字に変換するのはChr関数です。

Qアスキーコードへの変換について VB6(初心者)

変数文字列をアスキーコードの10進数であらわしたいのですが、どのようなプログラムをかけばいいのでしょうか?
ネットで調べたのですが、よくわかりません。

たとえば
hensuumojiretuという名前の変数文字列を作り、それをアスキーコードに変換するとしたらどのようなプログラムをかいたらよいのでしょうか。

hensuumojiretuは自分で入力する形にしたいです。
それがわかったら変換後のアスキーコードを変数文字列(数字?)として定義したいと思っています。

この本に載ってるとか、このサイトにあるよという情報でもよいのでどうかおしえてくださいおねがいします。

Aベストアンサー

とりあえず、文字列→アスキーのサンプルを作ってみました。
フォームにCommand1,Text1,Label1を貼り付けてください
Private Sub Command1_Click()
Dim ln As Integer
Dim i As Integer
Dim strMoji As String

Label1.Caption = ""

strMoji = Text1.Text
ln = Len(strMoji)

For i = 1 To ln
Label1.Caption = Label1.Caption _
& Asc(Mid(strMoji, i, 1)) & vbCrLf
Next i
End Sub


人気Q&Aランキング