Ekteki örnekte adı alanındaki isimlerin ilk üç karakterini exceldeki gibi başka bir text kutusuna aktarmak istiyorum. Bunun için yazılacak kod nedir arkadaşlar???

Ustalar bir metin kutusuna zafer123 yazdım diğer 2 metin kutusuna zafer ve 123 yazdırmak istiyorum yardımcı olursanız sevinir..

unutmadan bunu bir kere kullanırsanız programda kullanacağınız butun inputboxlar şifreli olur
[vb]
Public Class Form1

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Int32
Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Int32, ByVal wCmd As Int32) As Int32
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, B

textboxa girilen son karakteri alan bir komut varmı left right bunları kullanamadım bi türlü

ve girilen karakterin boşluk olup olmadığınıda karşılaştırmam gerekli acil şekilde gerekli yardımcı olursanız çok iyi olur

Merhaba;

Konuyu arattırdım fakat bulamadım. Forumda daha önce konu varsa özür dilerim.


Yapmam gereken şey özetle şu;

Bir sütun içerisinde koşula göre hücre içerisindeki karakterleri silme.

Seçtiğim sütun içindeki hücrelerde örneğin A00.01 Şeklindeki bir veriyi . (Nokta) karakteinden sonraki karakterleri silmek istiyorum.

Yaklaşık 1000 tane hücrede bu işlemi yapması gerekiyor.

Örneğin:

A00.01
A00.02
A00.03
A01.01
A01.02

Şeklindeki verileri

A00
A00
A00
A01
A01

iyi günler
içinde vbCrLf karakterleri olan metinlerim var
yani metinde birden fazla satır var
bana 7.satırdaki bilgi lazım
metin1 şu şekilde

şlkşlkşlkşlk
şişlişlişli
opoıpoıp
pğpğoğpoğ
lğplğplğplğ
jljljlkjlkjlk
METİN YILDIRIM
jlkjlkjşlklljiş

bu sekiz satır meti1 i oluşturuyor
bundan yedinci satırı alıp başka değişkene aktaracağım
malum olduğu üzere "METİN YILDIRIM" sabit değil
her kayıtta değişiyor oyüzden metindeki karakter sayısına göre almam mümkün değil
her kaydın tek or

[TUTAR] isimli metin kutusunun icerisindeki son 7 karakteri silebilecegim kodu yazarmisiniz ?

iyi günler
Left([tblStudents].[FirstName],1) & Left([tblStudents].[LastName],1) AS Student
bu cümle parçası ismin ilk harfi ile soyismin ilk harfini birleştiriyor
ismin ilk harfi ile soyismin ilk harfi arasına boşluk ekleyemedim
& " " &
[color=#111111][size=small][font=Tahoma, Verdana, Arial, sans-serif]'" & " " &