vb.net button的疑問~

程式設計 vb vb.net

0936 2008-12-22 18:06:12 ‧ 8543 瀏覽

我在button裡放了下面的程式
我希望button一按下去 Image1就可以顯現出來
但加了if... end if 裡的程式後，Image1完全都不動
如果沒加if... end if 裡的程式 Image1就可以執行
為什麼呢？難道vb.net一次只能執行一個事件嗎？

1 Private Sub ImageButton3_Click(ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton3.Click   
2     Image1.Visible = True  
3     System.Windows.Forms.Application.DoEvents()   
4     If Rabut_LandArea.Checked Then  
5         ZoneAreaData()   
6     ElseIf Rabut_IsPublic.Checked Then  
7         PublickAreaData()   
8     ElseIf Rabut_DecideInfo.Checked Then  
9         DecideInfoData()   
10     ElseIf Rabut_ApplyCase.Checked Then  
11         ApplyCaseData()   
12         Image1.Visible = True  
13     ElseIf Rabut_CityPlan.Checked Then  
14         CityPlanAreaData()   
15     End If  
16 End Sub

登入發表討論

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

1 個回答

bcc958

iT邦新手 5 級 ‧ 2008-12-23 10:28:02

最佳解答

您想要的應該是每段都要判斷
才會一一執行

使用if then...elseif...
只要符合第一個執行的條件
後面的就都不會做了

&lt;pre class="c" name="code">If Rabut_LandArea.Checked Then ZoneAreaData()      
If Rabut_IsPublic.Checked Then PublickAreaData()      
If Rabut_DecideInfo.Checked Then DecideInfoData()      
If Rabut_CityPlan.Checked Then CityPlanAreaData()      
If Rabut_ApplyCase.Checked Then ApplyCaseData()      
         Image1.Visible = True