用vb编写一个小程序
楼主您好！代码如下李祥：Option ExplicitPrivate Sub Command1_Click() Dim n(7) As Double Dim k(3) As Double k(3) = 1 Dim j As Integer For j = 1 To 7 n(j) = Val(Controls("Text" & CStr(j)).Text) Next j For j = 1 To 7
上一篇：程序员在线开发工具
微信小程序开发知识
楼主您好！代码如下李祥：Option ExplicitPrivate Sub Command1_Click() Dim n(7) As Double Dim k(3) As Double k(3) = 1 Dim j As Integer For j = 1 To 7 n(j) = Val(Controls("Text" & CStr(j)).Text) Next j For j = 1 To 7
上一篇：程序员在线开发工具