İşlem Tablosu Programlama Deneme Sınavı Sorusu #1254068

"Deneme_Dosya.txt" isimli bir dosyanın içerisine "VBA için Dosyaya Yazdırma Örneğidir." yazdırmak isteyen bir kullanıcı şu şekilde bir komut hazırlamıştır:

Private Sub CommandButton1_Click();

Open "c:\\VBADosya\Deneme_Dosya.txt" For Output As #1

Print #1, "VBA için Dosyaya Yazdırma Örneğidir."

End Sub

Kullanıcı bu kodu çalıştırdığında hata mesajı ile karşılaştığına göre, bu komutta nasıl bir düzeltme yaparak sorunu çözebilir? 


"Private Sub CommandButton1_Click();" ifadesini "Private Sub CommandButton1_Click()" olarak değiştirerek.

"Open "c:\\VBADosya\Deneme_Dosya.txt" For Output As #1" ifadesinde fazladan kullanılmış \ sembolünü kaldırarak "Open "c:\VBADosya\Deneme_Dosya.txt" For Output As #1" olarak düzenleyerek. 

"Print #1, "VBA için Dosyaya Yazdırma Örneğidir."" ifadesinde "Function_PrintF #1, "VBA için Dosyaya Yazdırma Örneğidir."" olarak düzeltme yaparak.

"End Sub" ifadesini "End File Sub#1" olarak değiştirerek.

"Open "c:\\VBADosya\Deneme_Dosya.txt" For Output As #1" ifadesinde küçük harfle yazılan c sürücü simgesini C olarak değiştirerek.


Yanıt Açıklaması:

Kullanıcının yazdığı komut incelendiğinde Private Sub CommandButton1_Click(); komut ifadesinde gereksiz ; kullanıldığı anlaşılmaktadır. Bu hatanın giderilmesi için aşağıdaki işlemin gerçekleştirilmesi gerekmektedir.

"Private Sub CommandButton1_Click();" ifadesini "Private Sub CommandButton1_Click()" olarak değiştirmek

Yorumlar
  • 0 Yorum