sample.bas (cdf0e10c) sample.bas (5b501c92)
1rem *************************************************************
2rem
3rem Licensed to the Apache Software Foundation (ASF) under one
4rem or more contributor license agreements. See the NOTICE file
5rem distributed with this work for additional information
6rem regarding copyright ownership. The ASF licenses this file
7rem to you under the Apache License, Version 2.0 (the
8rem "License"); you may not use this file except in compliance
9rem with the License. You may obtain a copy of the License at
10rem
11rem http://www.apache.org/licenses/LICENSE-2.0
12rem
13rem Unless required by applicable law or agreed to in writing,
14rem software distributed under the License is distributed on an
15rem "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16rem KIND, either express or implied. See the License for the
17rem specific language governing permissions and limitations
18rem under the License.
19rem
20rem *************************************************************
1' Sample-Programm fuer Sample-Objekte
2
3Sub Main
4 Dim Sample As SampleObject
5 Dim Element1 As Object, Element2 As Object
6 Set Element1 = Sample!Create "Objekt"
7 Set Element2 = Sample.Create "Objekt"
8 Element1 = "Element 1"

--- 31 unchanged lines hidden --- 		21' Sample-Programm fuer Sample-Objekte
22
23Sub Main
24 Dim Sample As SampleObject
25 Dim Element1 As Object, Element2 As Object
26 Set Element1 = Sample!Create "Objekt"
27 Set Element2 = Sample.Create "Objekt"
28 Element1 = "Element 1"

--- 31 unchanged lines hidden ---