diye ekte ödevin tamamı var Yarın Sabaha Götürmem gerek yardım edebilecek olan varsa çok makbüle geçer şimdiden teşekkürler...
ÖDEV 1= 20 kişinin adının ayrı label larda yazıldıgı bir listede labelların başına sıra numarası ekleyin. ÖDEV 2= bu labellerin yanına bulunan 20 adet label a sıra numarasının çift veya tek olmasına göre “a sınıfı” veya “b sınıfı” yazın. ÖDEV= sayilar adlı etikete 3’ün katlarının 35 s ayısına kadar yazdıracak olan kodu yazın Cevabı: sayilar.text=” ” Dim x as Integer For x as=0 to 35 If x mod 3=0 then Sayilar.text=sayilar.text & x & End if Next ÖDEV 4= label5 adlı etikete 7’ye kadar olan sayıların girilen bir degere kadar olan kuvvetini yazıcak olan kodu yazın deger k adlı bir degişken tarafından belirlenecek. ÖDEV 5= bir kenar uzunlugu kena1 adlı degişkenle belirtilen bir küpün içine bir kenar uzunlu kenar2 olrak belirtilen küplerden kaç tane sığacagını yazan kodu yazın. ÖDEV 6= 1’den bir sayı ya kadar olan sayıların yanlarına 0sayıya kadar olan tam sayıların toplamını yazan kodu yazın. Örnek çıktı =0-0 1-1 2-3 3-6 4-10 5-15 gibi Not:girilen degişken degişken olarak tanımlanacak
