24h購物| | PChome| 登入
與好友分享這篇文章

電腦課

Option Base 1 Dim Adata As Variant Private Sub Command1_Click() search_num = Val(Text1.Text) For j = 1 To UBound(Adata) If Adata(j) = search_num Then num = j Next j If num = 0 Then lblShow.Caption = "沒有這個數字->" & search_num Else ...
...詳全文

新聞台: 我所想的。我所作的 | 台長：山米兒
收件者E-mail：

請以分號區隔每個E-mail
例如：john@pchome.com.tw;mary@pchome.com.tw
信件標題：
與你分享這篇文章
訊息內容：
很精采的好文章！
如果你也喜歡，請轉寄給好友幫忙增加人氣吧！
您的名字：
山米兒
TOP