Interfas vytvorili a dvakrát kliknite si btncalcular kód
dim x as integer, F As Integer, číslo N ako dim ako integer = 1 Vyvrcholenie N = Cinta (txtN.text) pre x = 2 N +1 krok X F = Neuhradená + X Acu = F Ďalšie txtN.text = F
jodist ajaj pravda? bez pomoci, pokiaľ ide o tieto veci .. ak viete, čo dirria .. Je lepšie sa učiť na vlastnú päsť .. informatiky sebectvo je to, čo ste získali viac q .. Dôvera? vlastné pápež
Učím sa programovať som tento program a potreboval by som, keď zadám duplicitné dáta, ktoré už existuje Povedzte mi, a nechám prázdne, cambos do iného sa
Public class Form1
Private Sub Button1_Click (Bývalá odosielateľ ako System.Object, Bývalá e As System.EventArgs) Madlá Button1.Click
Ak TextBox1.Text = "" A TextBox2.Text = "" Tak MessageBox.Show ("Kód a názov nemôže ísť v bielom") End If
Hej, to je, ak chcete postupne zvyšovať
zužuje a ako??
Ak chcete toto použitie ustanovenia o znížení krok (step) a odovzdať negatívny parameter. Rovnako ako v tomto príklade:
For i As Integer = 10 k 1. kroku -1
MsgBox ("Replay číslo:" & i)
Ďalšie
sa berie ako faktoriál čísla vedľa štruktúry pre Visual Basic?
Interfas vytvorili a dvakrát kliknite si btncalcular
kód
dim x as integer, F As Integer, číslo N ako
dim ako integer = 1 Vyvrcholenie
N = Cinta (txtN.text)
pre x = 2 N +1 krok X
F = Neuhradená + X
Acu = F
Ďalšie
txtN.text = F
Skúste to, ak sa dostanete tiež
jodist ajaj pravda? bez pomoci, pokiaľ ide o tieto veci .. ak viete, čo dirria .. Je lepšie sa učiť na vlastnú päsť .. informatiky sebectvo je to, čo ste získali viac q .. Dôvera? vlastné pápež
počuť a aby na hranici, že pri každom kliknutí alebo mi odporúčate
Bena Dema ... T pogratulovať svoje stránky! Je d muxa pomoc!
Učím sa programovať som tento program a potreboval by som, keď zadám duplicitné dáta, ktoré už existuje Povedzte mi, a nechám prázdne, cambos do iného sa
Public class Form1
Private Sub Button1_Click (Bývalá odosielateľ ako System.Object, Bývalá e As System.EventArgs) Madlá Button1.Click
Ak TextBox1.Text = "" A TextBox2.Text = "" Tak
MessageBox.Show ("Kód a názov nemôže ísť v bielom")
End If
ListView1.Items.Add (TextBox1.Text). SubItems.Add (TextBox2.Text)
Pre i = 0 až ListView1.Items.Count-1
Ak TextBox1.Text = ListView1.Items (I). Potom Text
MessageBox.Show ("Záznam už existuje")
End If
Ďalšie
End Sub
End Class