یه سوال از ویژال کارایه حرفه ای

[محمد حسینی]

سلام.شرمنده! من بخاطر امتحانات یه ماهی میشد که نمیومدم.
این سورس ماله آقای rReza. اگه با این هم نفهمیدین بگین تا توضیح بدم.
http://www.spiderman.persiangig.com/VB/P...%20Bag.zip

[vorojax]

اقا بیبین درست نوشتم
من می خام تکست یکو که توش نوشته a بکنم x ولی جواب نمیده
replace text1.text , "a","x

[محمد حسینی]

این replace
Text1.Text = Replace(Text1.Text, "a", "x")
اینم property bag
http://www.iranvig.com/3608.html

[vorojax]

اقا دمت گرم پس با این حصاب اگه بخام داخل یه فیلو عوض کنم باید نویسم:
Open "c:ali.exe" For Binary As #1
Get #1, , ReadData
ReadData = Replace("c:ali.exe", "a", "x")
Close #1
درسته

[محمد حسینی]

nafahmidam mikhai chikar koni
fonte farsim nemiad!

[محمد حسینی]

مگه توضیحات اون سورس رو نخوندی؟!

[vorojax]

اسپايدر من عزيز مي خام همون برنامه اي که پيمان نوشت بسازم که باهاش يه فايل اگزه رو باز کنم و توش يسري فايلهايه باينري رو عوض کنم مثلا اگه تو يه برنامه تکس يک مساوي با 44 بکنمش 55

[محمد حسینی]

منو مسخره کردی؟!

[vorojax]

چرا نارحت اسپایدرمن من کی مسخرت کردم
من یه خورده مبتدی ام و خیلی دیر میگیرم باور نداری از پیمان بپرس

[محمد حسینی]

ببخشید. من از راه رسیده بودم حوصله نداشتم.
منم لو لولم!