字典翻译 问答 其它 1.PrivateSubForm_Click()DimiAsInteger,kAsInteger,cAsIntegerFori=1To5IfiMod3=0Thenk=k+2Elsec=c+3EndIfNextiPrintk,cEndSub写出程序运行时单击窗体后,Form1上的输出结果.2．PrivateSubForm_Click()StaticSumA
问题标题：
1.PrivateSubForm_Click()DimiAsInteger,kAsInteger,cAsIntegerFori=1To5IfiMod3=0Thenk=k+2Elsec=c+3EndIfNextiPrintk,cEndSub写出程序运行时单击窗体后,Form1上的输出结果.2．PrivateSubForm_Click()StaticSumA
问题描述：

1.PrivateSubForm_Click()

DimiAsInteger,kAsInteger,cAsInteger

Fori=1To5

IfiMod3=0Then

k=k+2

Else

c=c+3

EndIf

Nexti

Printk,c

EndSub

写出程序运行时单击窗体后,Form1上的输出结果.

2．PrivateSubForm_Click()

StaticSumAsInteger

Fori=1To6

Sum=Sum+i

Nexti

PrintSum

EndSub

写出程序运行时点击窗体两次后,变量Sum的值.

3．PrivateSubCommand1_Click()

DimXAsInteger,YAsInteger

X=1:Y=1

Fori=1To3

Forj=1Toi

Y=Y+j

Nextj

X=X+Y

Nexti

PrintX

EndSub

写出程序运行时单击命令按钮后,窗体Form1上的输出结果.
点击显示
其它推荐
热门其它推荐
  • 其它
    •