AccessTr.neT
excel kodunu vb.nette kullanma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html)
+--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html)
+--- Konu Başlığı: excel kodunu vb.nette kullanma (/konu-excell-kodunu-vb-nette-kullanma.html)



excel kodunu vb.nette kullanma - drummers - 24/09/2012


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


Cvp: excel kodunu vb.nette kullanma - chopper07 - 26/09/2012

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.


Cvp: excel kodunu vb.nette kullanma - drummers - 16/11/2012

(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