ＣｏｍｂｏＢｏｘにて (ID:122511)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Win2000 VB6 以下のプログラムを実行するとComboBoxのTextが消えてしまうのはなぜですか？ 消えないようには出来ないのですか？ Option Explicit Private Sub Combo1_Click() Combo1.Text = "ABCD" DoEvents '←ステップ実行にてここまでは表示されます End Sub '←イベントを抜けるのと同時に消えてしまいます Private Sub Form_Load() Dim i As Integer Combo1.Text = "" For i = 0 To 9 Combo1.AddItem Str(i) Next End Sub