UC知道是一部内容开放、自由的互动网络百科全书客观、专业、权威的知识性百科全书
来源:百度知道 编辑:UC知道 时间:2024/06/25 15:52:31
Private Sub Command1_Click()Combo1.ClearOpen "c:\www.txt" For Input As #1Do While Not EOF(1) Line Input #1, txt Combo1.AddItem txtLoopClose #1Combo1.Text = Combo1.List(0)End Sub