listing0401vb.aspx

来自「asp入门到精通的源代码」· ASPX 代码 · 共 32 行

ASPX
32
字号
<script language="VB" runat="server">
   public class Clock 
      public Second as integer
      public Minute as integer
      public Hour as integer
      public ClockCounter as integer = 0
      
      public sub SetTime(intSec as integer, intMin as integer, _
         intHour as integer) 
         Second = intSec
         Minute = intMin
         Hour = intHour
      end sub
      
   end class

</script>

<HTML>
<BODY>

   <%
   
      dim objClock as new Clock()
      objClock.SetTime(4,6,45)
      
      Response.Write(objClock.ClockCounter)
   
   %>
   
</BODY></HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?