Program der åbner lommeregner 3 gange

hov.. 0 point.

Ja altså 100 point var planen, men det får i så bare i et nyt spørgsmål :D

Hej.

Hvis dit program skal fungere på alle windows-versioner, skal du have en funktion, der finder ud af hvor calc.exe befinder sig.  Det ved jeg ikke om man kan.  Ligger den som i win2000 i system-mappen kan du bruge:

Dim fso
Dim sydir as string

Set fso = CreateObject("Scripting.FileSystemObject")
  sydir = fso.getspecialfolder(1)
  ' = MsgBox("Din system-mappe er:  " & sydir, 64, "Afhængig af styresystem.")

Under form load eller under en knap eller menupunkt:

x = shell(sydir & "\calc.exe",1)
y = shell(sydir & "\calc.exe",1)
z = shell(sydir & "\calc.exe",1)

Jeg har ikke afprøvet det.

M.v.h.  Jørn

Super.. det virkede perfekt.

http://www.eksperten.dk/spm/526758