Skip to main content

AccessTr.neT


excel kodunu vb.nette kullanma

excel kodunu vb.nette kullanma

Çözüldü #1

Private Sub Workbook_Open()

Dim WshShell
Dim inttext As Integer

Set WshShell = CreateObject("WScript.Shell")

inttext = WshShell.popup("Mesaj", 3, "Başlık", vbSystemModal)

End Sub

Bu kod ile Excel sayfasının açılışnda messagebox ı 10 sn bekletip kendiliğinden kapanmasını sağlıyorum. Fakat bunu vb.nete nasıl çevirebilirim. vb.net de 10 sn sonra kendiliğinden kapanmıyor.

Teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
Vb.net de splash ekranı için;
öncelikle splash screen'ına bir adet "timer" kontrolü ekleyelim. "timer1"'in sağ taraftaki "özellikler" (properties) penceresin'de "enabled" özelliğini "true" yapalım. "Interval" değerinide istediğin saniyeye ayarlayabilirsin. (oradaki alan milisaniye değerindendir mesela 5000 yaparsan 5 saniye demektir. ona göre istediğin süreyi belirlersin) daha sonra "timer"'ına çift tıkla açılan kod penceresinde (timer1_click olayına) aşağıdaki kodu yapıştır

Me.close()
Anaformununismi.Show()
Timer1.Stop()

bunları yazdıktan sonra sağ yukarda "solution explorer" penceresinde oluşturduğun "Proje adına" sağ tıkla ve "Properties" bölümünü seç. Açılan ekranda "Startup form" adlı bir bölüm gelecek bu bölümün altındaki listeden "Splash screen"'ini seç.

Hepsi bu kadar. umarım iyi bir anlatım olmuştur.
™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

Cevapla
Çözüldü #3
(26/09/2012, 18:17)chopper07 yazdı: Vb.net de splash ekranı için;
öncelikle splash screen'ına bir adet "timer" kontrolü ekleyelim. "timer1"'in sağ taraftaki "özellikler" (properties) penceresin'de "enabled" özelliğini "true" yapalım. "Interval" değerinide istediğin saniyeye ayarlayabilirsin. (oradaki alan milisaniye değerindendir mesela 5000 yaparsan 5 saniye demektir. ona göre istediğin süreyi belirlersin) daha sonra "timer"'ına çift tıkla açılan kod penceresinde (timer1_click olayına) aşağıdaki kodu yapıştır

Me.close()
Anaformununismi.Show()
Timer1.Stop()

bunları yazdıktan sonra sağ yukarda "solution explorer" penceresinde oluşturduğun "Proje adına" sağ tıkla ve "Properties" bölümünü seç. Açılan ekranda "Startup form" adlı bir bölüm gelecek bu bölümün altındaki listeden "Splash screen"'ini seç.

Hepsi bu kadar. umarım iyi bir anlatım olmuştur.

Teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task