Listbox ve tam ekran

[osmanfenerli1907]

Saygıdeğer hocalarım
Ben useform1deki listbox1 e çift tıklayınca tam ekran olabilirmi onu soracaktım.Cevaplarınızı bekliyorum.
Saygılarımla.. :hey:

 

[metinozlu]

Boyutları kendi formuna göre ayarlayınız

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
ListBox1.Height = 450
ListBox1.Width = 450
End Sub

Private Sub ListBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
ListBox1.Height = 45
ListBox1.Width = 45

End Sub