| 投稿日 | ： 2003/10/08(Wed) 19:26 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: JISコードに変換 |
> テキストボックスなどに入力した文字をJISコードに変換したいのですが
> 変換方法などはあるのでしょうか？
Streamオブジェクトの Charsetプロパティを利用できます。
With CreateObject("ADODB.Stream")
.Open
.Charset = "ISO-2022-JP"
.WriteText Text1.Text
.SaveToFile "C:\JIS.TXT"
.Close
End With