<rt id="bn8ez"></rt>
<label id="bn8ez"></label>
  • 

    • <span id="bn8ez"></span>
    

    <label id="bn8ez"><meter id="bn8ez"></meter></label>
    

    
    

    




    







												


        




    
	
		


    隨筆 - 20 
文章 - 7 
trackbacks - 0


     
	

    

    
	
		
    
			
    
	
    
		
    <2025年5月>
    
	
    日一二三四五六
    27282930123
    45678910
    11121314151617
    18192021222324
    25262728293031
    1234567
    

    

    
			
			

    常用鏈接
    


    留言簿(1)
    




		
    隨筆檔案
    
		
				
			
	
		
    文章分類
    
		
				
			
	
		
    文章檔案
    
		
				
			
	



    積分與排名
    

      
	
    • 
		積分 -
		20288
	
    • 
		排名 -
		1715
	
      • 

    


    最新評論
	
    

    
	
			
		

    

    		
	

    

    
	
					


    
	
	
     1<h1>Asp.Net子程序和函數</h1>
     2<%@ page language="vb" %>
     3<script language="vb" runat="server">
     4
     5
     6Sub count2N()Sub count2N(ByVal intA as integer)
     7  Dim total as integer=0, i as integer
     8 For i=1 to intA
     9 total=total+i
    10 Next
    11 response.write("從1加到"& intA &"的總和為"& total & "<br>")
    12End sub
    13
    14
    15Function add2N()Function add2N(ByVal intA as integer)
    16   Dim total as integer=0,i as integer
    17  For i=1 to intA
    18  total += i
    19  Next
    20  Return total
    21End Function
    22</script>
    23
    24
    25<%
    26Dim total as integer,limit as integer=50
    27Call count2N(20)
    28total=Add2N(limit)
    29response.write("從1加到"& limit & "的總和為" & total & "<br>")
    30%>



    數據有兩種傳遞方法，按值和按地址，ByVal 是按值傳遞
    total += 1 的意思與total=total+1的意思一樣

    count2N( )是過程, add2N( )是函數, 過程和函數括號里面的都是變量, 調用過程和函數要聲明變量的值.
    調用過程要用 "call 過程" 調用(27行)
    調用函數可借助變量total與函數的關系調用(29行)
	
    posted on 2006-02-14 18:00 The Game, tomtom 閱讀(371) 評論(0)  編輯  收藏  所屬分類: VB.NET的程序,模塊和函數 
    

    







    
	    
    




    





    


    

	
    
		
    
				
		
	
		
    
		
		
    只有注冊用戶登錄后才能發表評論。
    
		
    
			
		
    
			
		
    
		
		
    
		


    

		    		
		
    
		
    			
		
		
		
		
    
		
    
		
		
    
		
    
			網站導航:
		
		
    
		
    
			
		
    	
		
    
			 
		
    
		
    
			
		
    
		
    
			
				
		
    		
	
    	

    



    

				
	



    



    







    
        
	



主站蜘蛛池模板：
亚洲精彩视频在线观看|
日韩精品视频在线观看免费
|
色偷偷亚洲第一综合|
亚洲美女色在线欧洲美女|
免费一级特黄特色大片在线观看|
亚洲视频免费在线播放|
国产在线国偷精品免费看|
亚洲国产高清国产拍精品|
亚洲成AV人综合在线观看|
亚洲精品白浆高清久久久久久|
在线观看免费精品国产|
www视频在线观看免费|
暖暖免费在线中文日本|
夜夜爽妓女8888视频免费观看|
亚洲欧洲无码一区二区三区|
亚洲综合视频在线观看|
久久久亚洲精品视频|
中文字幕亚洲天堂|
亚洲国产成人乱码精品女人久久久不卡|
五月婷婷综合免费|
18禁男女爽爽爽午夜网站免费|
国产免费爽爽视频在线观看|
两个人看的www免费视频|
成人在线免费视频|
一级毛片a女人刺激视频免费|
亚洲精华液一二三产区|
亚洲色丰满少妇高潮18p|
亚洲一本之道高清乱码|
亚洲成A∨人片在线观看无码|
亚洲美女色在线欧洲美女|
久久综合亚洲色一区二区三区|
久久精品国产精品亚洲色婷婷
|
精品久久久久久无码免费|
羞羞漫画页面免费入口欢迎你|
亚洲AV色无码乱码在线观看|
亚洲精品av无码喷奶水糖心|
亚洲狠狠婷婷综合久久蜜芽|
亚洲精品国产第一综合99久久|
国产亚洲美女精品久久|
一级毛片a免费播放王色电影|
特级毛片aaaa免费观看|