Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 15:45

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[vb.NET] Variable neuen Wert geben.

Discussion on [vb.NET] Variable neuen Wert geben. within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Apr 2008
Posts: 64
Received Thanks: 1
Exclamation [vb.NET] Variable neuen Wert geben.

Hey,

wie könnte ich eine Variable einen neuen Wert verpassen?
Ich möchte ein Programm erstellen das halt jede sekunde
die Zahl x mal 2 gerechnet wird z.B.: 2,4,8,16,32,64 usw.
Hier der Code :
PHP Code:
Public Class Form1


    
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Timer1
.Start()

    
End Sub

    
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
        Timer1
.Interval 1000
        Timer1
.Enabled True

    End Sub

    
Private Sub Timer1_Tick(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Timer1.Tick
        Dim x 
As Integer
        x 
2
        TextBox1
.Text 2
        x 
*= "'hier neuer Wert"
    
End Sub

    
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
        Timer1
.Stop()
    
End Sub
End 
Class 
nitey is offline  
Old 02/19/2010, 22:36   #2
 
HardCore.1337's Avatar
 
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
Ähh,

x = x * 2

wenn x am anfang den wert "2" hat wird es nun 4. Nächste Sekunde wird die FUnktion wieder aufgerufen und wieder mal 2 gerechnet.

x = 2
1 Sekunde warten
x = x * 2 (4)
1 Sekunde warte
x = x + 2 (8)
...
HardCore.1337 is offline  
Old 02/20/2010, 16:46   #3
 
elite*gold: 0
Join Date: Feb 2010
Posts: 85
Received Thanks: 7
Quote:
Originally Posted by General Desert View Post
Ähh,

x = x * 2

wenn x am anfang den wert "2" hat wird es nun 4. Nächste Sekunde wird die FUnktion wieder aufgerufen und wieder mal 2 gerechnet.

x = 2
1 Sekunde warten
x = x * 2 (4)
1 Sekunde warte
x = x + 2 (8)
...
wenn man keine ahnung hat einfach mal die ****** halten. was du da vorgeschlagen hast ist absolut umständlich und schwachsinnig.


die lösung:

du machst das als schleife


Quote:

Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'das brauchst du damit sleep überahupt funktioniert




dim i, j, x as integer
j = [deine maximale anzahl wie oft die zahl multipliziert werden soll]

for i = 1 to j
x = x * 2
sleep (1000)
next
Gotei is offline  
Old 02/20/2010, 16:48   #4
 
HardCore.1337's Avatar
 
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
ich soll keine Ahnung haben?
Du weißt schon, das das nicht der Code ist oder?

Das soll das ganze nur mal verdeutlichen
HardCore.1337 is offline  
Old 02/20/2010, 16:54   #5
 
elite*gold: 0
Join Date: Feb 2010
Posts: 85
Received Thanks: 7
Quote:
Originally Posted by General Desert View Post
ich soll keine Ahnung haben?
Du weißt schon, das das nicht der Code ist oder?

Das soll das ganze nur mal verdeutlichen
du hast keine ahnung. das merkt jeder. wieso bist du eig hier? wenn du nur so ein scheiß wie grade postest dann leitest du nur alle in die irre
Gotei is offline  
Old 02/20/2010, 16:56   #6
 
HardCore.1337's Avatar
 
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
hmm, würd ich jetzt auch mal sagen.
Ist dir schonmal aufgefallen das du im Grunde genau das gleiche machst?

Der Unterschied ist bloß der, das du schon den fertigen Code gepostet hast (stimmt, ich habe keine Ahnung von VB) und ich nur erstmal wie er rangehen soll.
Er soll vlt. auch mal ein wenig selber denken und nicht alles vorgesetzt bekommen...
HardCore.1337 is offline  
Old 02/20/2010, 16:58   #7
 
elite*gold: 0
Join Date: Feb 2010
Posts: 85
Received Thanks: 7
Quote:
Originally Posted by General Desert View Post
hmm, würd ich jetzt auch mal sagen.
Ist dir schonmal aufgefallen das du im Grunde genau das gleiche machst?

Der Unterschied ist bloß der, das du schon den fertigen Code gepostet hast (stimmt, ich habe keine Ahnung von VB) und ich nur erstmal wie er rangehen soll.
Er soll vlt. auch mal ein wenig selber denken und nicht alles vorgesetzt bekommen...
beim letzten hast du recht, allerdings hättest du dann auch schon sagen müssen dass er das per schleife lösen sollte. ein unbeteiligter der deinen post sieht und nicht in dich hineinschauen kann würde sonst denken, dass du ihm empfehlen würdest das immer wieder manuell zu verdoppeln
Gotei is offline  
Old 02/20/2010, 17:00   #8
 
HardCore.1337's Avatar
 
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
naja, stimmt schon, aber darauf wird er wohl selber kommen können, oder
HardCore.1337 is offline  
Old 02/20/2010, 17:02   #9
 
elite*gold: 0
Join Date: Feb 2010
Posts: 85
Received Thanks: 7
Quote:
Originally Posted by General Desert View Post
naja, stimmt schon, aber darauf wird er wohl selber kommen können, oder
kommt drauf an. manchen muss man wirklich alles vorsagen weil sie einfach nicht der typ fürs programmieren sind und anderen muss man nur kleine tips geben und sie denken dann selber nach und verstehen.

kommt also auf den threadersteller an.
Gotei is offline  
Old 02/20/2010, 17:54   #10
 
HardCore.1337's Avatar
 
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
ja, aber für mich sieht es so aus, als könnte er schon (ein wenig) VB. Also so die Grundlagen
HardCore.1337 is offline  
Old 02/28/2010, 16:34   #11
 
elite*gold: 0
Join Date: Jan 2007
Posts: 19
Received Thanks: 1
ich will euch zwar nicht stören und ich bin auch kein VB profi ( kenn mich mit VB gar nicht aus ), aber ne schleife ist doch nicht der sinn der aktion wenn er jede sekunde das tíck event aufruft, würde eher x einfach global deklarieren und in der EventMethode die x = 2 weglassen rest müsste passen.
bigdiddy is offline  
Reply


Similar Threads Similar Threads
Wie den neuen Mobs/ Zombie mobs lvl+Name+Stufe geben?
12/05/2010 - Metin2 Private Server - 6 Replies
Hey ich habe ein problem! Ich habe die Zombie mobs,und diese Schlangengötter bei mir eingebaut ,jedoch haben sie weder einen Namen,keine Stufe und auch kein level?..wie kriege ich das eingebaut. Siehe hier: http://i40.tinypic.com/ax0itl.jpg
Neuen Mobs skills geben
03/16/2010 - Metin2 Private Server - 9 Replies
Heyho com, Wollte mal fragen ob vllt einer weis wie man Neuen Mobs die skills gibt, beim sensenmann und blauer tod funzt das ja aber wenn ich jetzt beim Zombie God das selbe mache klappt das i.wie nicht oO hab schon einiges ausgetestet aber der macht einfach keine skills -.-* wenns jmd weis wie das geht könnte mir das einer sagen ?^^
Wie kann ich zb der neuen king rüssi mehr deff geben
03/14/2010 - Metin2 Private Server - 3 Replies
Kann mir das einer pls erklären wie ich das mache in der SuFu hab ich nix gefunden.... bekommt auch THX!!!! also über serverside
[HOW TO]Neuen NPCs Namen geben(InGame sichtbar)
02/17/2010 - Metin2 PServer Guides & Strategies - 10 Replies
Hallo, in diesem Tutorial zeige ich euch wie ihr neuen NPCs Namen geben könnte ohne den Clienten zu verändern! Los geht's :) Es gibt 2 Varianten: 1. Ihr habt den neuen NPC noch nicht eingefügt 2. Ihr habt sie schon eingefügt 1. Als erstes Anhang runterladen !!!!Server runterfahren!!!!
Es scheint einen neuen Hack zu geben
06/14/2008 - Metin2 - 16 Replies
Hi, also mir ist heute folgedes passiert. Ich (xxx) habe eine Silberarder abgebaut. nach etwa 30 sekunden kam ein ninja (yyy) er war noch nicht lvl 30 konnte also nicht abbauen. als ich dann etwas silbererz droppte, stand sofort der name des ninjas (yyy) drüber, und er hat es aufgenommen, obwohl er NICHTS gemacht hat. Er stand einfach nur da. Ich konnte es auch nicht aufnehmen!!! Meine Frage ist nun, gibt es einen neuen hack, der genau das bewirken soll, oder war das nur ein weiterer bug? ...



All times are GMT +1. The time now is 15:47.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.