編寫VB程序，實(shí)現(xiàn)如下功能：在文本框Text1和Text2中分別輸入兩個(gè)正整數(shù)，點(diǎn)擊“計(jì)算”按鈕，在標(biāo)簽Label4中輸出從開始數(shù)字到結(jié)束數(shù)字之間所有偶數(shù)的和．例如分別輸入6、1，則計(jì)算6+4+2的和，將12在Label4中顯示．

（1）觀察第二小題的代碼，從中可知“計(jì)算”按鈕的對象名為

jisuan

jisuan

．
（2）為實(shí)現(xiàn)上述功能，請?jiān)跈M線處填上正確的代碼
Private Sub jisuan_Click

（　　）

（　?。?/div>
Dim x1As Integer,x2As Integer
Dim sum As Long,i As Integer,n as Integer
x1=val（Text1．Text）
x2=val（Text2．Text）
sum=0
If x1＜x2Then n=1Else

①n=-1

①n=-1

For i=x1To x2Step n
If

②i mod 2=0

②i mod 2=0

Then
sum=sum+i

③end if

③end if

Next i

④Label4．caption=sum

④Label4．caption=sum

End Sub.