ايران ويج

سلام به همه ی برو بچه های گل و باحال ایرانویج Laugh

یه سوال دارم

من دارم یه برنامه مینویسم که به علتی نمی تونم بگم چی کار میکنه. Whistle

من یه متنی رو دارم و توی این متن اطلاعاتی هست که من میخوامشون .
اول اطلاعاتی که من میخوام با $#$ و آخرشون با #$# هست.

من با Instr سعی کردم اما فقط اولی رو پیدا میکنه و بعدی ها رو چک نمیکنه.
اومدم اینجا تا از استادان این کار بپرسم. Smile

یا حق

سلام.
شما میتونی از instr داخل instr استفاده کنی. یا یه کار دیگه.
First = InStr(1, string1, "$#$")
Second = InStr(First + 3, string1, "$#$")

کد: 
First = InStr(1, string1, "$#$")

Second = InStr(First + 3, string1, "$#$")

آقا پیمان من اینا رو باید داخل یه For بزارم ؟ Whistle

اخه فقط اولی رو پیدا میکنه.(همئن کاری که خودم کرده بودم) Cool

من میتونم اولی رو بکشم بیرون.مشکل من بعدی هاست که با Instr فقط اولی رو میگیره.
من بازم سعی خودمو میکنم.
خدا کنه به نتیجه برسه Happy

اگه میشه بیشتر توضیح بدید یا یه مثال بزارید Rolleyes

سلام.
بستگی به کاری که میخوای بکنی داره. از حلقه for هم میشه استفاده کرد. اگه میخوای بلافاصله رو رشته تغییرات بدی میتونی از حلقه do استفاده کنی.

کد: 
Dim strTemp As String

Dim i As Integer

    strTemp = "ded$#$44kj$#$r34r4r$#$f44ff$#$f4ff4f4f$#$3ed3d3dd$#$"

    i = 0

    Do

        i = InStr(i + 1, strTemp, "$#$")

        'Type your code here

    Loop While (i <> 0)

البته فرض بر اینه که حداقل 1 بار $#$ تو رشته باشه.

آقا قربونت Heart

mahdivbNET

Payman62

mahdivbNET

Payman62

mahdivbNET