📄 16322.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<html>
  <head>
    <title>Re: 要如何比对阿!!!</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 要如何比对阿!!!</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:luo570@ms31.hinet.net">小琳</a> on July 28, 1999 at 21:04:31:<p>
In Reply to: <a href="16293.html">要如何比对阿!!!</a> posted by 完蛋了 on July 28, 1999 at 15:44:32:<p>
: <br>: Private Type Score<br>:       名称1  As String * 2<br>:       名称2  As String * 2<br>:       名称3  As String * 2<br>:       名称4  As String * 2<br>:       名称5  As String * 2<br>:    End Type<p>: Dim rec As Score<p>: Sub GetData()<p>:     Get #f, , rec<br>:     <br>:     ' 显示资料录各栏位的内容<br>:     名称1.Text = rec.名称1<br>:     名称2.Text = rec.名称2<br>:     名称3.Text = rec.名称3<br>:     名称4.Text = rec.名称4<br>:     名称5.Text = rec.名称5<br>:    <br>: End Sub<br>: 每笔资料有5个栏位 <br>:   <br>: 要搜寻的资料为"aa"   请问如果有100笔资料   要如何比对栏位内 有多少的资料是"aa"   数量是多少<br>: 烦请指导 谢谢<p>:::小女子觉得将rec设成阵列比较好做，因为须要存１００<br>笔资料，您也可以将５个栏位设定为阵列，如下：<br>Private Type Score<br>名称1(4) As String<br>End Type<br>dim abc(99) as score<br>这样的话就可以使用二个回圈来计算"aa"的数量是多少了!!!
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 16322-->
<!--top: 16330--><li><a href="16330.html">Re: 要如何比对阿!!!</a> <b>Honey</b> <i>21:27:30 7/28/99</i>
(<!--responses: 16330-->0)
<ul><!--insert: 16330-->
</ul><!--end: 16330-->
</ul><!--end: 16322-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -