17023.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 26 行

HTML
26 行
字号 
<html>  <head>    <title>File1.Pattern.Value = Combo1.Text ?????????</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>File1.Pattern.Value = Combo1.Text ?????????</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:f1222205@ms31.hinet.net">初学者</a> on August 10, 1999 at 21:07:36:<p>请问大家:  要怎样才能把File1(FileListBox)的pattern的值设为Combo1(ComboBox)里的值。以下为部分程式码:(但不太正确)<br>Private Sub Combo1_Change()<br>    File1.Pattern.Value = Combo1.Text<br>End Sub<br>Private Sub Form_Load()<br>    fil_pat(0) = "*.*"<br>    fil_pat(1) = "*.bmp"<br>    fil_pat(2) = "*.bmp;*.ico"<br>    fil_pat(3) = "*.bmp;*.ico;*.jpg;*.tif"<br>    fil_pat(4) = "*.vbp;*.frm"<br>    For i = 0 To 4<br>        Combo1.AddItem fil_pat(i)<br>    Next i<br>    <br>End Sub<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 17023--><!--top: 17077--><li><a href="17077.html">Re: File1.Pattern.Value = Combo1.Text ?????????</a> <b>小琳</b> <i>22:28:09 8/11/99</i>(<!--responses: 17077-->0)<ul><!--insert: 17077--></ul><!--end: 17077--></ul><!--end: 17023--><br><hr size=7 width=75%><p></body></html>

17023.html - 源码说明

本页面展示了「VB技巧问答10000例,是一个教程」中的 17023.html 源码文件，采用 HTML 编程语言编写，共 26 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与10000相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?