açılışta textboxta sabit veri

[cihangirkara]

arkadeşler iyi günler

ekteki dosyama yarımcı olursanız sevinirim

firma risk yp formuna yeni textboxlar ekledim textbox28,29,30,31

isteğim bunlarda form açıldığında 1.00 yazması

textbox28.value=format(textbox28,"#,##1.00") yazdım olmadı

 

[Mahmut Kök]

Properties penceresindeki ilgili metinkutusunun text kısmına istediğiniz veriyi yazabilirsiniz. text kısmına doğrudan 1.00 yazmayı deneyiniz.

 

[cihangirkara]

söylediğiniz gibi yaptım ama olmadı

 

[Mahmut Kök]

Örnek dosya ekledim. İstediğiniz, eğer eklediğim örnekteki gibiyse, yukarıda tarif ettiğim şekilde yaptım. İyi çalışmalar.

 

[cihangirkara]

hocam bu tamam

aynı şeyi combobox ta nasıl yaparız veya comboboxta seçilen bir değer devamlı kalabilirmi

 

[06eed]

Userform yükleme kodlarına;

textbox28.value=format(1,"#,##0.00")
combobox1.value=format(1,"#,##0.00"), yazarak deneyin.

 

[cihangirkara]

hocam yanlış anlaşıldı combobox a 000 yazdırmak istemiyorum dosyayı incelerseniz combobox ta seçtiğim değer kaydedilince bir daha açtığımda o gözüksün

 

[Haluk]

Private Sub UserForm_Initialize()
    For i = 1 To 10
        ComboBox1.AddItem "Metin- " & i
    Next
    ComboBox1.ListIndex = [A1]
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    [A1] = ComboBox1.ListIndex
End Sub

 

[Haluk]

Veya;

Private Sub UserForm_Initialize()
    For i = 1 To 10
        ComboBox1.AddItem "Metin- " & i
    Next
    ComboBox1.ListIndex = GetSetting("MyApp", "Startup", "ComboIndex", Default:="3")
End Sub
'
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    SaveSetting "MyApp", "Startup", "ComboIndex", ComboBox1.ListIndex
End Sub

 

[cihangirkara]

hocam initialize de zaten for döngüsü var bunu nasıl ekleyeceğim

 

[Haluk]

For-next kısmını kaldırın, diğerleri kalsın. Ben örnek olarak vermiştim.

 

[cihangirkara]

hocam oldu ama bende combobox 18 adet

isteğim şu hem 18 indede bu olay olsun hemde textboxla seçilen firmaya göre olsun yani sadece o firmaya ait kredi kodları combobox ta çıksın

ilginize teşekkürler