# File1.Pattern.Value = Combo1.Text ?????????

Posted by 初学者 on August 10, 1999 at 21:07:36:

请问大家: 要怎样才能把File1(FileListBox)的pattern的值设为Combo1(ComboBox)里的值。以下为部分程式码:(但不太正确)
Private Sub Combo1_Change()
File1.Pattern.Value = Combo1.Text
End Sub
Private Sub Form_Load()
fil_pat(0) = "*.*"
fil_pat(1) = "*.bmp"
fil_pat(2) = "*.bmp;*.ico"
fil_pat(3) = "*.bmp;*.ico;*.jpg;*.tif"
fil_pat(4) = "*.vbp;*.frm"
For i = 0 To 4
Combo1.AddItem fil_pat(i)
Next i
End Sub

Follow Ups:

- Re: File1.Pattern.Value = Combo1.Text ????????? 小琳 22:28:09 8/11/99 (0)