TEXTBOX DA 11 HARFIN NE OLDUĞUNU ÖĞRENMEK

[tevfikdemir]

Merhaba Textbox a girdiğim verilerin 11. harfine göre model yılı yazdıracağım.11.Harfin ne olduğunu hangi komut ile öğrenirim.

Saygılar

 

[Levent Menteşoğlu]

Aşağıdaki gibi bir komutu deneyebilirsiniz. 11.karakter deg isimli değişkene atanır.

deg=mid(textbox1,11,1)

 

[tevfikdemir]

leventm,
aşağıdaki gibi uyarladım fakat compile error:Sub or fonksion not defined yazıyor.

Private Sub sase_AfterUpdate()

deg = mig(sase,11, 1)
motor.Value = deg



End Sub

problem bendemi acaba.

Saygılar

 

[Levent Menteşoğlu]

aşağıdaki gibi uyarladım

Nasıl uyarladınız? Bu satırı textboxın exit olayına yazın.

 

[tevfikdemir]

Özür ,Düzeltmemi yaptım.Yukarıdaki gibi uyarladım. :8)

Yukarıdaki gibi uyarladığım halde olmuyor.Exit olayınada yazdım sonuç=0

Private Sub sase_Exit(ByVal Cancel As MSForms.ReturnBoolean)
deg = mig(sase,11, 1)
motor.Value = deg

End Sub

olmuyor.!! :kafa:

 

[Levent Menteşoğlu]

Kusura bakmayın ben yanlış yazmışım. mig değil mid olacak.

deg = mid(sase,11, 1)

 

[tevfikdemir]

Tam bende çözmüş size yazıyordum.

Teşekkürler.

Saygılar