darkhast yek kod

.

kheylie vb6 kar nakardam ama fk konam ine codesh :

Msgbox.Show("MATNET")


Tuye Sub e Form Load bayad Mineveshti

chejoori baiad azash estefade konam man taze karam

hamon tur ke goftam kheylie vb6 kar nakardam o kheylie nasb nist!!!
be har hal

boro ghesmate code nevisi
balaye ghesmate code nevisi 2 ta kadr hast ke tosh chizaei neveshte shode [ age eshteb nakonam ]

kadre samte chapi : begard FORM ro peyda k.o.n va rosh kilik k.o.n

kadre samte rasti : Begard LOAD ro peyda k.o.n va rosh 2 bar kilik k.o.n
injori Sub e Form Load bAz mishe
bad , codi ke dadamet ro unja benevis
hamin

msgbox ("matn",noe click o error,"sar barg")

ino ham vase load form ham vase y cmd mituni bnvisi

rahate

emtehan kn motevaje mishi

fek konam in rah rahat tar bashe

Code:

Private Sub Command1_Click()
Dim StartPos, Counter As Integer
Dim FindString, ReplaceText As String
FindString = "."
ReplaceText = "-"
For Counter = 1 To Len(Text1.Text)
        StartPos = InStr(Text1.Text, FindString)
        If StartPos > 0 Then
                Text1.SelStart = StartPos - 1
                Text1.SelLength = Len(FindString)
                Text1.SelText = "" + ReplaceText
        End If
Next
End Sub

man too sube cmd gozashtam to mitooni too on change text bezari ya aslan dota text box bezari ta tasih shodaro bezare too texte jadid

mc dada qmars(pkq) hamino manzooram bood

مرسی داداش واقعا نمی دونم چجوری ازتون تشکر کنم اما اگه یک لطفی کنید کار هر کدوم از این پارامتراش توضیح بدید ممنون می شم

yeki j soalamo bede

da6 q javabeto dad ke
manzoret chize digeiye?