自己定义的副程式

《自己定义的副程式》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、VBProgramming0504Dept.ofInformationEngineeringandComputerScienceFengChiaUniversityTaichung,Taiwan,R.O.C.Chin-YiTsai迴圈ForI=1to10PrintINextII=1WhileI<=10PrintII=I+1WendI=1DoWhileI<=10PrintII=I+1LoopI=1DoPrintII=I+1LoopUntilI>102I=1DoPrintII=I+1LoopI=1DoPrin

2、tII=I+1ExitDoLoopI=1DoPrintII=I+1IfI=10ThenExitDoLoop3副程式自己定義的副程式SubMySub()Print“Hello”EndSub如何呼叫???CallMySub自己定義的副程式SubMySub(A,B,C)PrintAPrintBPrintCEndSub如何呼叫???CallMySub(10,20,30)結果:1020304函數呼叫副程式：Call副程式()呼叫函數：v=函數名()函數會有東西傳回來給vFunctionf(x)f=x*2EndFun

3、ctionV=f(3)PrintV5事件EventPrivateSubCommand_Click()Print“Hello”EndSub如果”按下去”發生一個”按下去”的事件反應是什麼???印出Hello的字串6Line(起點之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,

4、RGB(255,255,255)DrawWidthDrawStyle7PSet(X,Y)Line-(X,Y)89