如何使用VB編寫一個簡單的小程序？你好！代碼如下：option explicitprivate sub command 1uclick（）Dim n（7）as Double Dim k（3）as Do

如何使用VB編寫一個簡單的小程序？

你好！代碼如下：

option explicitprivate sub command 1uclick（）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”和amp CStr（j））.Text）Next j For j=1 To 7 k（1）=k（1）n（j）k（2）=k（2）-n（j）k（3）=k（3）*n（j）Next j我。文本8. text=“7個數(shù)字的和是：”&K（1）&vbcrlf& “七個數(shù)字的差是：”&K（2）&vbcrlf& “七個數(shù)字的乘積是：”&K（3）end subprivate sub command2uclick（）Dim i作為i=1到8個控件的整數(shù)（”text“&CStr（i））。text=”“Next iEnd subprivate sub Formuload（）對于i=1到8個控件（“Text”&；CStr（i）），將i設(shè)置為整數(shù)。Text=“”Next iEnd Sub