常用标准控件练习（4） 下列程序是滚动条的练习： 在窗体上建立一个包含3个水平滚动条的控件数组，然后编写下列事件过程 PrivateSubForm_Load() HScroll1(0)
12.程序控制结构练习（2） 注意SelectCase语句的灵活运用啊，通过昨天的例子是否有新发现呢—— 继续—— 下列程序段的运行结果是？ OptionExplicit PrivateS
11.程序控制结构练习（1） 下列程序段的运行结果是？ DimiAsInteger DimXAsInteger i=2 X=4 SelectCasei Case0 Print“Case0“ Case1 Print“Case1“ CaseX-i Print“CaseX-i“ CaseX P
14.程序控制结构练习（4）下列代码段运行后“i”和“X”的值是多少？DimiAsIntegerDimXAsIntegeri=1X=2Doi=i+1X=X+iLoopUntili>=7这种题在机器上一运行结果马上就
15.程序控制结构练习（5） 下列程序段运行后，k的值是多少？ k=0 Fori=1To4 Forj=1To3 IfjMod2=0Thenk=k+1 k=k+1 Next Next
13.程序控制结构练习（3） 试试看，下面的循环体执行了几次？ DimiAsInteger DimkAsInteger k=0 Fori=0To10 k=k+1 i=i+k Next 可以这样修改代码来测试： PrivateSubForm_Clic
17.数组练习（1） 先不上机，试试分析下面程序段的运行结果是什么？ DimintA(4)AsInteger DimintB(4)AsInteger DimiAsInteger Fori=0To2 intA(i+1)=i*2+1 intB(3-i)=intA(i+1) Next P
19.数组练习（3）下列程序段运行后，k的值是多少？Dimx(1To10)AsIntegerDimp(1To4)AsIntegerDimkAsIntegerDimiAsIntegerFori=1To10x(i)=i+1NextFori=1To4p(i)=x(i*2)k=k+p(i)*2NextPrintk
20.过程函数练习（1） 上机试试看下列程序的运行结果， 然后把语句“DimsumAsInteger”换成“StaticSumAsInteger”再试试看—— PrivateSubCommand1_Click() DimAAsLong A=
23.过程函数练习（4） 试试看下列程序的运行结果是多少，练习下函数的应用。 PrivateFunctionMyfun(a()AsInteger) DimBeginaAsInteger DimEndaAsInteger