自己定义的副程式 (2)

按一下以編輯母片標題樣式,按一下以編輯母片,第二層,第三層,第四層,第五層,*,Programming Methodology Lab.,VB Programming 0504,Dept.of Information Engineering and Computer Science,Feng,Chia,University,Taichung,Taiwan,R.O.C.,Chin-Yi Tsai,迴圈,For I=1 to 10,Print I,Next I,I=1,While I=10,Print I,I=I+1,Wend,I=1,Do While I 10,2,I=1,Do,Print I,I=I+1,Loop,I=1,Do,Print I,I=I+1,Exit Do,Loop,I=1,Do,Print I,I=I+1,If I=10 Then Exit Do,Loop,3,副程式,自己定義的副程式,Sub,MySub,(),Print“Hello”,End Sub,如何呼叫,?,Call,MySub,自己定義的副程式,Sub,MySub(A,B,C),Print A,Print B,Print C,End Sub,如何呼叫,?,Call MySub(10,20,30),結果,:,10,20,30,4,函數,呼叫副程式：,Call,副程式,(),呼叫,函數：,v=,函數名,(),函數會有東西傳回來給,v,Function,f(x,),f=x*2,End Function,V=f(3),Print V,5,事件,Event,Private,Sub,Command_Click,(),Print“Hello”,End Sub,如果,”,按下去,”,發生一個,”,按下去,”,的事件,反應是什麼,?,印出,Hello,的字串,6,Line,(,起點之,X,座標,起點之,Y,座標,)-(,終點之,X,座標,終點之,Y,座標,),RGB(R,G,B),例如,:,Line(100,100)-(1000,1000),RGB(255,0,255),Circle,(,圓點之,X,座標,圓點之,Y,座標,),半徑長度,RGB(R,G,B),Circle(100,100),5000,RGB(255,255,255),DrawWidth,DrawStyle,7,PSet,(X,Y),Line-(X,Y),8,9,