请教各位! private sub form_load() i=0end subPrivate Sub Timer1_Timer()i=i+1aa(i)=int(....).....End Sub 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim aa() As IntegerPrivate Sub Timer1_Timer() Static I As Integer aa(i)=int(....) I = I + 1End SubPrivate Sub Form_Load() ReDim aa(100) '触发总数End Sub 建议不使用动态数组,改用Collection 求助strsql = "select * from" & Combo2.Text & " where 日期 = #" & CDate(Combo3.Text) 关于Fix函数~ 如何關閉內存中的Excel程序? 求救:在VB中如何向EXCEL中插入图片?帮帮我。谢谢 界面美化 局域网内有两台机子,怎样才能让其中一台机子数据传到另一台机子上,并另一台机子能读取这些数据来做运算。 高手帮我修改一下程序,老是编译不了??? 简单问题,关于datagrid的!!!!!我不会. 最顶层窗口 如何解析midi文件的各个音轨 Access如何控制传真? 如何设定主关键字?
Dim aa() As Integer
Private Sub Timer1_Timer()
Static I As Integer
aa(i)=int(....)
I = I + 1
End SubPrivate Sub Form_Load()
ReDim aa(100) '触发总数
End Sub