nu sunt familiarizați cu această bază necesită introducerea datelor în baza de date și de locuri de muncă lor de schityvanie.V trebuie să descrie clasa Olympiada (nume. Numele Ball în știința calculatoarelor). Date de intrare pentru matrice tastatura constând din elemente de tip n Olympiada. Afișați informațiile din această listă. datele personale ale elevilor care au participat la Olimpiada de Informatică și să câștige cel puțin 30 de puncte.
Pot folosi BASIC pentru a crea un screensaver?
Este necesar să se deseneze cercuri concentrice cu o rază descrescătoare. Raza fiecărui cerc următor este de 9/10 din raza celui precedent. Desenul este oprit când raza devine egală cu o valoare minimă Rmin = 1.vb.net1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Clasa Form1 Public Dim R Ca Single Dim Rmin Ca grafica Single Dim As Graphics Private Sub Form1_Load (ByVal expeditor Ca System.Object, ByVal e Ca System.EventArgs) Minere grafice MyBase.Load = PictureBox1.CreateGraphics () R = Rmin = 8 1 ConcentricCricles apel (R, Rmin) End Sub Sub ConcentricCricles (ByVal R Ca single, ByVal Rmin Ca single) Dacă R> Rmin Apoi graphics.DrawEllipse (Pens.Black, 0, 0, R, R) R = 0,9 * ConcentricCricles R apel (R, Rmin) End If End Sub End ClassNe poate înțelege modul în care pentru a concluziona, nu există nimic pe formular.
Pe formular există 2 Combobox, o casetă Text și 2 butoane. în Combobox - o listă descendentă cu numele străzilor. (Este programat). Nu există bază. De exemplu: Arsenal Arefeva Vasina Vasenko a intrat în câmpul de text al numelui străzii sau numele complet, apăsați butonul și numele străzilor (sau alt nume) sunt copiate în noul Combobox2. Și când apăsați al doilea buton (Resetare), totul revine la poziția inițială. Vă mulțumim anticipat pentru pomoschDobavleno după 2 ore 7 minute în continuare a decis să ia datele dintr-un fișier text: vb.net1 2 3 4 5 6 Încercați ComboBox1.Items.Clear () ComboBox1.Items.AddRange (IO.File.ReadAllLines (Application.StartupPath "\ City.txt", System.Text.Encoding.Default)) Captura de ex Ca MessageBox.Show Excepție (ex.Message.ToString ()) End TryTogda trebuie sa caute poate fi implementat printr-un fișier text cu linia de ieșire dorită în ComboBox. Spune-mi cum să fac asta? multumesc anticipat
Trimiteți-le prietenilor: