HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
0114
ふくなが全角スペースの置き換えについて3解決


ふくなが

リンク

2009/1/14(Wed) 17:51:12|NO.22803

現在製作しているプログラムで、
全角スペースを半角スペースに置き換える作業が必要なのですが、
以下のプログラムがうまく動作しません。
どうやら、全角スペースと「ー」の両方が半角スペースに置き換えられているようです。
どのように改善すればよいでしょうか?
もしよろしければ指摘をお願いします。


a="" b="スタート ゴール" c=0 d="" repeat getstr a,b,c,' ' if a="" : break c+=strsize+1 d+=a+" " loop mes d



この記事に返信する


リンク

2009/1/14(Wed) 18:13:33|NO.22804

全角スペースは2バイト
getstr は1バイト用みたいですね
strlen だとうまくいくようです
以下は1文字の全角スペースを半角スペースに変換します

a=0 b="スタート ゴール" c=0 d="" c=strlen(b) a=instr(b,0," ") d=strmid(b,0,a) d=d+" " d=d+strmid(b,a+2,c-a-2) mes d stop



リンク

2009/1/14(Wed) 18:15:24|NO.22805

間違えました strlen だとうまく・・・ -> instr です



ふくなが

リンク

2009/1/15(Thu) 16:12:00|NO.22844

ありがとうございました。



ONION software Copyright 1997-2023(c) All rights reserved.