_src/TestByFCBatAuto/vbs_inc/vbslib/vbslib300/test/sample_lib_ex.vbs

   1 Option Explicit \r
   2 \r
   3 Dim  g_SampleLibEx_param\r
   4 g_SampleLibEx_param = 2\r
   5 \r
   6 \r
   7 Function  SampleFuncEx\r
   8   SampleFuncEx = "SampleFuncEx"\r
   9 End Function\r
  10 \r
  11 \r
  12 Class  SampleClassEx\r
  13   Public  m_Member\r
  14   Private Sub Class_Initialize\r
  15     m_Member = "SampleClassEx"\r
  16   End Sub\r
  17 End Class\r
  18 \r
  19  \r