StrConvを用いてJIP→JIPS-E変換するには?

解決


うにくらどん  2004-03-02 07:00:44  No: 112130

誰かご存知の方がいらっしゃればお願い致します。
JIS->JIPS-Eの変換を変換規則 J2E(0) = &H0 みたいな型
を使用して変換しています。
・・・ですが、Ost  に"「"に似ているものが入ってきてしまうのですが、
なぜなのでしょう?(以下、ソースプログラム)
宜しくお願い致します。

    bytBuf() = StrConv(Kst, vbFromUnicode)
    EbcLen = UBound(bytBuf())
  
    'JIS→JIPS-E変換
    For LC = 0 To EbcLen
      bytBuf(LC) = J2E(bytBuf(LC))
    Next    
    strBuf = bytBuf()
    Ost = StrConv(strBuf, vbUnicode)


うにくらどん  2004-03-05 18:30:31  No: 112131

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


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加