ひょんなことから、VB6 Combobox(入力も出来るほう)のTextプロパティに、半角&記号が表示されない件を調査中。
=5/25 下記のような結果となった。=
Private Sub Form_Load() Combo1.Text = "ABC& DEF&" 'ABC DEF Combo1.Text = "ABC& DEF& HIJ&" 'ABC DEF HIJ& Combo1.Text = "ABC&& DEF&&" 'ABC&& DEF&& Combo1.Text = "ABC& DEF" 'ABC& DEF Combo1.Text = "ABC DEF&" 'ABC DEF& Combo1.Text = "&ABC &DEF" 'ABC DEF Combo1.Text = "&ABC&DEF" 'ABCDEF Combo1.Text = "ABC & DEF & HIJ & KLM &" '最初の2こがばける Combo1.Text = "& ABC & DEF & HIJ & KLM &" '最初の2こがばける Combo1.Text = "&& ABC & DEF & HIJ & KLM &" '最初の2こはOK、次の2こがばける Combo1.Text = "& & ABC & DEF & HIJ & KLM &" '最初の2こがばける End Sub
どうやら、単独で表れる最初の2つの&が化けるという、何とも奇異なバグみたい。
http://www.webdb.co.jp/~atsumi/bpb/
1つ目の&が0x1Eに、2つ目の&が0x1Fに、それぞれ化ける。
しかも表示だけ。参照すると元の値が取れる。
なんで?
で、回避策。
http://hpcgi1.nifty.com/MADIA/VBBBS/wwwlng.cgi?print+200403/04030026.txt
Textプロパティの替わりに、SelTextプロパティで代用してみてください。
VB6は、もうオープンソースにしたらどうでしょう?十分に元はとれてるはずですよね?Micro$oftさん。