Til alle jer som bare hungrer efter svar på dette utrolig dejlige
spørgsmål - kan det meddeles at svaret findes på:
http://support.microsoft.com/default.aspx?scid=KB;EN-US;q188716&
Suk - basic er sq for latterligt til tider - anyway; frem med den store VC++
6.0 compiler.
robert
"John Doe" <john@doe.com> wrote in message
news:al7lhu$uce$1@news.net.uni-c.dk...
> Hej,
>
> kan man kalde en "nedarvet" klasse i VB via CreateObject ?
>
> Mit eksempel er som følger:
> (Som virker fint med early-binding)
>
> '--------------------------------------------------
> 'Abstrakt klasse [cases.cls]
> '--------------------------------------------------
> Option Explicit
>
> Public Function Killer() As String
>
> End Function
> '--------------------------------------------------
>
> 'Klasse som implementerer [cases.cls]: case1.cls:
> '--------------------------------------------------
> Option Explicit
> Implements Cases
>
> Private Function Cases_Killer() As String
> Cases_Killer = "Case 1: "
> End Function
>
> '--------------------------------------------------
>
>
> Dim tamtam
> set tamtam = CreateObject("Tjatiiing.case1")
>
> debug.print tamtam.Killer() ' <-Her fejler den !!
>
> '-------------------------------------
>
>
>
> mvh/robert
>
>
>