Visual Basic Soruları

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Avukat
    haybeci
    haybeci's avatar
    Kayıt Tarihi: 07/Aralık/2007
    Erkek

    selam müridler yanıtlarsanız sevinirim..

    1. bi formdan diğerine geçince diğerinin kapanmasını istiyorum bunun için kısa bi kod duymuştum araştırdım bulamadım...

    2. form içerisine bi label yazıp 5 saniyede bir görünüp kaybolmasını istiyorum

    3. formda müzik çalmasını istiyorum

    şimdiden teşekkür ederim yardımlarınız için...


    Dünyada kendi işkence örneklerini sergilememiş ulus ve dönem hemen hemen hiç olmamıştır. Ancak ne insanlar değişmişlerdir ne de olaylar ve sonuçları.
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Avukat
    haybeci
    haybeci's avatar
    Kayıt Tarihi: 07/Aralık/2007
    Erkek

    up up up


    Dünyada kendi işkence örneklerini sergilememiş ulus ve dönem hemen hemen hiç olmamıştır. Ancak ne insanlar değişmişlerdir ne de olaylar ve sonuçları.
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    kvasir
    kvasir's avatar
    Kayıt Tarihi: 24/Ağustos/2005
    Erkek

    VB6 mı?

  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    crafty
    crafty's avatar
    Kayıt Tarihi: 19/Eylül/2006
    Erkek

    birinci sorunun cevabı şu ana formu kaparsan tüm uygulama kapanır atıyorum üç tane formun var form1 ana form. form1 den form2 ye geçerken form1.hide form2.show kullan form2 den form1 e geçerken form2.close form1.show kullanacaksın yine form3 içinde aynı şekilde...

    ikinci sorunun cevabı ise timer timeri form load ile başlatacaksın timer zamanlayıcısını 5000 yapacaksın trick bölümüne de label5. ile ilgili kodlarını yazacaksın...

    üçüncü sorunun cevabı form1 e müzik koyarsan kanımca hide olsa bile çalmaya devam edecektir...


    Kasnak yuvarlandı elek oldu, eski orospular melek oldu...
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Avukat
    haybeci
    haybeci's avatar
    Kayıt Tarihi: 07/Aralık/2007
    Erkek

    teşekkür ederim hocam ama pek usta sayılmam daha ayrıntılı anlatırsan şimdilik daha güzel olur, vbdream hocam evet 6


    Dünyada kendi işkence örneklerini sergilememiş ulus ve dönem hemen hemen hiç olmamıştır. Ancak ne insanlar değişmişlerdir ne de olaylar ve sonuçları.
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    kvasir
    kvasir's avatar
    Kayıt Tarihi: 24/Ağustos/2005
    Erkek

    jelwy bunu yazdı:
    -----------------------------
     

    teşekkür ederim hocam ama pek usta sayılmam daha ayrıntılı anlatırsan şimdilik daha güzel olur, vbdream hocam evet 6


    -----------------------------

     

    1-) Eventleri hatırlamıyorum, lostfocus yada deactivate tarzı eventler, FORM için, bunun içine "Unload Me" yaz. (Eventler, forma çift tıkla kod sayfası açılır, kod yazdığın textboxun hemen üstünde 2 tane açılır menü var, sağdaki)

    yanlış anlamışım:

    butonla geçiş varsa crafynin dediği gibi:

    Unload Me

    Load Form2

    Form2.Show

    kullanabilirsin misal.

     

    2-) timer koy, interval 5000 yap şu kodu kullan:

    If label1.visible = true Then

    label1.visible = false

    Else

    label1.visible = true

    End If

    3-)

     

    'bu declare de sorun var derse "_" sil parentezli 2 satırı 1 e yapıştır

    Declare Function sndPlaySound32 Lib "winmm.dll" Alias "sndPlaySoundA" _

    (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

     

    Sub PlaySound()

    If Application.CanPlaySounds Then

    'buradada muzigin dosya yolu

    Call sndPlaySound32("c:\kamil\bombabomba.wav", 0)

    End If

    End Sub

     

    .mp3 formatı denersen ne olur bilmiyorum midi olayı farklı yenisin diye kasmadım şimdilik .wav dene anladınmı olayı devamını hallederiz.

     

     

  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    eergin06
    eergin06's avatar
    Kayıt Tarihi: 10/Ağustos/2002
    Erkek

    timer nesnesinin interval değerini 5000 yapacaksın ve içine şunu yazabilirsin

     

    if label5.visible = true then label5.visible=false else label5.visible=true


    Zulm ile abad olanın Ahiri berbad olur
Toplam Hit: 1867 Toplam Mesaj: 7