tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: ListBox(VBA)のずれ
投稿日: 2008/11/14(Fri) 10:02
投稿者スプリンガー
> 上記事象を再現できるコードを投稿して頂けませんか?
> (これを見ている人がその通り実行すれば同じ現象が起きるような方法を)
>
> どのように表示しておられるのか解らないし、×の文字も3種類程ありますし
> 又、上記事象を再現できるコードを作成する過程で原因が見つかる場合もありますので。
>
> それとExcel のセルに同様に表示させた場合や VB6.0 上でも同じ事が起きるのかどうか?

返答ありがとうございます。

Excelを立ち上げて、Visual Basic Editorの画面を開きます。
「挿入」でUserFormを追加し、その画面に標準のListBoxを貼り付けます。

コードに以下のイベントを追加してください。

Private Sub UserForm_Initialize()
    With ListBox1
        .AddItem "あいうえお   abc"
        .AddItem "あい×えお   abc"
        .AddItem "あいφえお   abc"
    End With
End Sub

で、F5で実行すると、
ユーザーフォームが表示され、そのリストがずれているのが確認できると思います。
「×」(ばつ)のほかにも「φ」(ファイ)などもずれるようです。
ずれ方としては、「×」が半角のような少し小さい表示になり、
それ以降ずれてしまいます。

VB6で同様に行ってみましたが、ずれずに表示されました。
Excelのセルに直接入力しても、ずれずに表示されます。

その他の画面関係の環境としては、
テーマ  XP(クラシックじゃない方)
ウィンドウとボタン XPスタイル
配色 シルバー
フォントサイズ 標準
解像度  1400×1050
DPI   96dpi

となっております。

以上、よろしくお願いいたします。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。