View Single Post
  #2 (permalink)  
Old 02-20-2008, 02:31 PM
wolfgang wolfgang is offline
Knows the basics
 
Join Date: Apr 2007
Location: Steinheim, Germany
Posts: 61
Default

Hallo Wolfgang,
herzlich willkommen bei Basic4PPC.
Wer programmiert hat immer ein Problem und für dessen Lösung sind ja Foren da.
Das Ereignis test _click wird erst ausgelöst, wenn der Button wieder losgelassen wird. Wenn Du genau weißt wie oft etwas wiederholt werden muss, kannst Du folgendes probieren:
Code:
Sub Globals
	'Declare the global variables here.
End Sub

Sub App_Start 
	Form1.Show
End Sub


Sub Button1_Click
	For i = 0 To 100
		Form1.Text = i
		i = i + 1
		Sleep(100)
	Next
End Sub
Die Schnittstelle habe ich durch Form1.Text ersetzt. Das Sleep(100) dient nur dazu, dass Du besser siehst was passiert.

Gruß Wolfgang
__________________
Thanks for all
wolfgang
___________________
Desktop: Dual Core 3.0 GHz, XP SP3
Device: IPAQ 3970 WM 2003, Asus 632N WM5, HTC 3650 Cruise
GPS: Clip-on Bluetooth, Navman 3000
Reply With Quote