Interfas ustvaril in dvakrat kliknete btncalcular koda
dim x kot celo število, F kot celo število, celo število N, kot je dim kot celo število = 1 cum N = funkciji CInt (txtN.text) za X = 2, N +1 X koraku F = Bilančni + X ACU = F Naslednja txtN.text = F
jodist ajaj resnica? ne pomaga, ko gre za te stvari .. če veš, kaj dirria .. Bolje je, da se naučijo sami .. informacijskimi sebičnost je tisto, kar ste dobili več q .. Zaupanje? samo-Pope
Jaz sem učenja za programiranje imam ta program in moram, ko sem vnesite podvojenih podatkov, ki že obstaja q povej mi in jaz pustite prazno na cambos za vstop v drugo
Javna Class Form1
Private Sub Button1_Click (ByVal pošiljatelj Kot System.Object, ByVal e As System.EventArgs) Ročaji Button1.Click
Če TextBox1.Text = "" In TextBox2.Text = "" Potem MessageBox.Show ("Kodeks Ime in ne more iti v beli") Konec Če
Hej, to je, če želite, da postopno povečanje
oži in kako??
Če želite narediti to uporabi klavzula zmanjšuje koraku (korak) in podaš negativno parameter. Tako kot v tem primeru:
Za i kot Integer = 10 do 1 Step -1
MsgBox ("Replay številka:" & i)
Naslednja
jemljemo kot fakulteto števila poleg strukture za Visual Basic?
Interfas ustvaril in dvakrat kliknete btncalcular
koda
dim x kot celo število, F kot celo število, celo število N, kot je
dim kot celo število = 1 cum
N = funkciji CInt (txtN.text)
za X = 2, N +1 X koraku
F = Bilančni + X
ACU = F
Naslednja
txtN.text = F
Preizkusite ga, če naletite tudi
jodist ajaj resnica? ne pomaga, ko gre za te stvari .. če veš, kaj dirria .. Bolje je, da se naučijo sami .. informacijskimi sebičnost je tisto, kar ste dobili več q .. Zaupanje? samo-Pope
slišali in se za mejne da vsakič, ko klik ali vam priporočamo
Bena DEMA ... T čestitamo vaše spletne strani! Je d muxa pomoč!
Jaz sem učenja za programiranje imam ta program in moram, ko sem vnesite podvojenih podatkov, ki že obstaja q povej mi in jaz pustite prazno na cambos za vstop v drugo
Javna Class Form1
Private Sub Button1_Click (ByVal pošiljatelj Kot System.Object, ByVal e As System.EventArgs) Ročaji Button1.Click
Če TextBox1.Text = "" In TextBox2.Text = "" Potem
MessageBox.Show ("Kodeks Ime in ne more iti v beli")
Konec Če
ListView1.Items.Add (TextBox1.Text) SubItems.Add (TextBox2.Text).
Za i = 0 Za ListView1.Items.Count-1
Če TextBox1.Text = ListView1.Items (I). Potem Besedilo
MessageBox.Show ("Zapis že obstaja")
Konec Če
Naslednja
End Sub
Konec razred