• ベストアンサー

文字を数字に変換したい

mimisの回答

  • ベストアンサー
  • mimis
  • ベストアンサー率66% (16/24)
回答No.2

su = RS.fields("su") + 0 tanka = RS.fields("TANKA") + 0 でいけると思います。 ただ、数字以外が入っているとエラーになってしまいますので気をつけてください。 ちなみに数字を文字列に変換?するには su = RS.fields("su") & "" tanka = RS.fields("TANKA") &"" です。

yorikiyo
質問者

お礼

回答ありがとうございます。 tanka = RS.fields("TANKA") + 0  この行で(型が一致しません。)のエラーが出てしまいますが、 tanka = RS.fields("TANKA") &"" 文字列にしたら計算ができて思い通りの結果がでました。ありがとうございました。

関連するQ&A

  • 文字を数字に変換したい

    こんにちは SQL文で困っています。 SQL = "select * from LIBL.APF" SQL = SQL & " WHERE AAAA = '" & aaaa & "'" を発行した時にエラーが出ます。 SQL = "select * from LIBL.APF" SQL = SQL & " WHERE AAAA = '1000'" 直接文字列を打つと同じエラーがでます。 SQL = "select * from LIBL.APF" SQL = SQL & " WHERE AAAA = 1000" 直接数字を打つと正常に動作します。 データーベースのフィールド属性が数字なのでこのエラーが出ていると思い syanoを数字フィールドにしようと aaaa=1000+0 などやってみたのですが、計算はできても、中身は1000という文字になっているようです。 AS/400のデーターベースをCAで参照しIIS5.0で表示させたいのでフィールド属性は変える事ができませんので、どうしてもaaaaを数字にしたいのですがどうしたら良いのかわかりません どなたかご教授お願いします。

  • AccessVBA NULLについて

    いつもお世話になっております。 AccessVBAでコーディングを始めたのですが、 NULLの判定で分からない点がでてきました。 データベースより If rs.Fields(0) = Null Then Else 区分 = rs.Fields(0) End If この場合、rs.Fields(0)の中身がNULLの場合は rs.Fields(0)のデータを入れるとエラーになるので ELSEで逃がしたいのですが、 中身のデータがNULLにもかかわらずELSEの方を通ってしまいます。 If rs.Fields(0) Is Null Then Else シール = rs.Fields(0) End If こちらかとも思いましたが、オブジェクトが必要とエラーが返ってきました。 NULLをIF分で判定したい場合どのような記述を行えばよいでしょうか。 どうぞよろしくお願い致します。

  • カレント行取得

    Do While Not rs.EOF  If Text1(0).Text <> rs.Fields(1) Then   /*--*--*/   rs.MoveNext     Else   msg = "コードが重複しています."   MsgBox msg, vbOKOnly, "重複チェック"   Text1(0).Text = ""   Text1(0).SetFocus  End If Loop *------ text1(1) = rs.fields(1) text1(2) = rs.fields(2) -------* データベース(Access)にデータが3件入っていて、例えば、1件目のデータを更新したいのですが今のソースでは、/*--*--*/でデータベースを次々読んでいるので、3件読み終えたときにカレント行が4件目にあると思うので、それを”任意”の行にしたいのですが教えてください。

  • NULL文字のINSERT

    こんにちは。 SQLServer初心者です。 Access VBAで SQLServerから抽出したデータをDBにINSERT しようとしてるのですが、抽出した項目にNULLデータがあるので エラーになってしまいます。 どのように回避すればよろしいでしょうか? ISNULL関数を使えば回避できるのでしょうか? たとえば以下のようなINSERT分を実行したいのですが、 顧客名_漢字のフィールドにはNULL文字が入ってる場合があるとします。 よろしくお願い致します。 strSQL2 = "" strSQL2 = strSQL2 & " INSERT INTO NORSE_TMP_DATA ( " strSQL2 = strSQL2 & " ポート名" strSQL2 = strSQL2 & ", 顧客名_漢字" strSQL2 = strSQL2 & ", 顧客名_カナ" strSQL2 = strSQL2 & ", 契約状態" strSQL2 = strSQL2 & ", 契約番号" strSQL2 = strSQL2 & ", 契約枝番号" strSQL2 = strSQL2 & ", 顧客番号" strSQL2 = strSQL2 & " VALUES (" strSQL2 = strSQL2 & " '" & rs.Fields("ポート名").Value & "'" strSQL2 = strSQL2 & ", '" & rs.Fields("顧客名_漢字").Value & "'" strSQL2 = strSQL2 & ",'" & rs.Fields("顧客名_カナ").Value & "'" strSQL2 = strSQL2 & ",'" & rs.Fields("契約状態").Value & "'" strSQL2 = strSQL2 & "," & rs.Fields("契約番号").Value strSQL2 = strSQL2 & "," & rs.Fields("契約枝番号").Value strSQL2 = strSQL2 & "," & rs.Fields("顧客番号").Value strSQL2 = strSQL2 & " )"

  • エクセルの文字列から数字への変換

    エクセル2007を使用しています。 あるデータベースからデータをエクセルにインポートしたところ、日付データだけが文字列となっています。 (通常数字だとセル内右寄せですが、文字列を示す左寄せになっています) 「03/11/2010」のように一見日付データのように見えるのですが。。 完全なテキストとして認識されているようで、「DATAVALLUE関数」や「1の乗算」も全く反応しません。 文字の先頭に「’」も入っていませんし、どうしたらよいか全くわかりません。 何かよい方法があったら教えて下さい。 宜しくお願い致します。

  • テキストボックス内の型変換と数字チェックについて

    ●VB6.0を使用しているのですが、テキストボックスにある数字(string型)を数値型にして40-12など普通の計算を行うにはどのように型変換をすればいいのでしょうか? ●また数字に007や03など0で始まる数字を取り除く関数があれば教えていただけますか?

  • 数字ならできるのですが、文字だとできません。

    フォームにデータを入力しSubmitを押すとデータベースに データを書き込むというプログラムについて分からないことが あります。 フォームに「数字」を入力し送信を押すとクエリの送信に成功し データベースに書き込みができるのですが、 「日本語や英語などの文字」を入力し送信すると、クエリの送信に失敗し データベースに書き込みができません。 文字を入力するフィールドは varchar(40) sjis_japanese_ci NULL で作成しました。 DBに書き込むPHPは以下のとおりです。 <?php require_once("db.php"); $prefCd = $_POST['cd']; $prefName = $_POST['name']; $aff = $_POST['no'];  $plname = $_POST['lname']; $pfname = $_POST['fname']; $sql = "INSERT INTO db VALUES(".$prefCd.",".$prefName.",".$aff.",".$plname.",".$pfname.")"; $result = executeQuery($sql); ?> 数字だと書き込みがDBに書き込みができることから DBのフィールドの作成の方法が間違っているのかとは おもうのですが。。。 どなたかご教授下さい。 よろしくお願いいたします。

    • ベストアンサー
    • PHP
  • 住所の漢数字変換について

    データベース内の住所のデータなのですが、 以下のような処理を行うことは可能でしょうか? SQL、プログラム等、やり方は問いません。 経験者の方がいましたら教えて頂けないでしょうか? 1.「丁目」と「番」を全角ハイフンにする。また、「号」を削除する。 2.漢数字をアラビア数字にする。 (例) 東京都港区六本木十丁目二十三番七号 ↓ 東京都港区六本木10-23-7

  • ロト7 数字・アルファベットの文字列の意味について

    選択した7桁の数字の下部にある、 24桁の数字は私の推測ですが、 偽造対策で、持ち込まれた当選券が本物か確認(みずほ銀行のデータベースで照合)する番号だと思います。 右端から6桁の数字は当選した場合に、売り場がデータベースと一致するかみずほ銀行で照合する為だと思います。 以上のご意見もお待ちしています。 質問に入ります。 24桁の数字の右側にある6桁の数字と、 さらにその右側にある5桁の(数字・アルファベットの組み合わせ)はどのような照合に使われるものでしょうか? みなさんのお考えをお教え下さいますようどうか宜しくお願い致します。

  • 数字の全角文字を調べる

    visual basic 2008に関する質問です。 テキストボックスに入力した文字列の中に、数字の全角文字が 含まれているかどうかをチェックするメソッドはありますか? 下記の内容でビルドすると、エラーとなります。 (ソースより抜粋)--------------------------------------- Dim str As String = TextBox1.Text Dim chr As Char = str.Chars(0) If ((chr >= &H8250) And (chr <= &H8258)) Then Label1.Text = "数字は半角文字で入力して下さい。" End If ------------------------------------------------------- (エラー内容)------------------------------------------- 演算子'>='は、型'Char'および'Integer'に対して定義されて いません。 演算子'<='は、型'Char'および'Integer'に対して定義されて いません。 ------------------------------------------------------- 使用OSは、Windows Vistaです。 質問とあわせて、上記のエラーの対処方法について教えて頂けると 助かります。