ورود

نسخه کامل مشاهده نسخه کامل : چرا پس از لود فايل txt همه متن در يك سطر نمايش داده ميشن؟ multiline فعال هست!


farzad_sx1
25-03-2006, 00:26
دوستان همگي خسته نباشيد...
من چند روزي هستش كه شروع به كار با VB كردم ... به همين خاطر مشكلات زيادي در سر راه من سبز شده كه البته خيلي از اونا پيش پا افتاده هستن...لطفا اگه اجازه بدين من اشكالاتم رو اينجا مطرح كنم و شما دوستان هم لطف كنيد خيلي ساده براي من توضيح بدين...
ممنون
اولين سوال : يك فايل با نام مثلا data.txt ايجاد كرده ام... در فايل data.txt من با اينكه چند خط چيز نوشتم وقتي كه اونو ميخوام تويه يدونه Text بيارم ...همه سطرها پشت سر هم و در يك سطر نمايش داده ميشن...اين از چيه؟؟
البته multiline رو هم فعال كردم.... :sad:
Payman_62
25-03-2006, 03:15
شما چه طور فايل رو ميخوني اگه خط به خط اطلاعات فايل رو ميخوني و هر دفعه تو تكس باكس ميريزي بينشون بنويس
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
sherwood
25-03-2006, 14:30
اگه فايل رو بصورت random بايت به بايت بخوني مشكلت حله.
farzad_sx1
27-03-2006, 17:08
از پاسخ شما دوستان ممنون....
يك سوال ديگه هم داشتم...
من چه طور ميتونم جاي دوتا form رو عوض كنم...
مثلا فرض كنيد form اول رو كه ايجاد كردم اسمشو گذاشتم 1 و form دوم رو اسمشو گذاشتم 2...اصولا اينطوريه كه form 2 هميشه رويه form1 هستش... حالا من ميخوام جاي اين دوت رو برعكس كنم... يعني form2 بره زير form1 ....
يعني Bring to Forward....البته با دوتا فرم نه دوتا Object....
sherwood
27-03-2006, 18:41
منظورت از اينكه بياد روش اينه كه با فرم دوومت برنامه اجرا بشه ؟
اگه منظورت اينه بايد روي project 1 در سمت راست وبالا كليك كني اونجا نوشته startup form اونجا درست كن اگه منظورتت چيز ديگه هست يه كم دقيق تر بگو
farzad_sx1
27-03-2006, 22:04
Sherwood جان از پاسخت ممنون ولي من با روشي كه گفتي به هدفم نرسيدم....اولا اينكه من دوتا Project ندارم..دوتا Form دارم ...

[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]

در ضمن منظور من دقيقا اون نبود ... تويه شكل زير مثلا ما دوتا Form داريم...اگه فرض كنيم كه هر دو تا Form موقع Load شدن ظاهر بشن...مشكل اينكه كه من ميخوام اون قسمت از Form2 كه روي Form1 اومده موقع نمايش بره زير... و دقيقا شكل بر عكس باشه....يعني Form1 رويه Form2 قرار بگيره....

[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]

نمي دونم تونستم منظورم رو دقيقا برسونم يا نه...!!! :sad:
يعني چون Form2 بعد از Form1 ايجاد شده ..ميآد رويه Form1......
sherwood
28-03-2006, 10:51
اهان فهميدم ولي منم كه نگفتم تو دو تا project داري من منظورم چيز ديگه بود ولي اونو ول كن
تو يه جايي يه كدي نوشتي كه اينجوري ميشه چون ربطي به اينكه تو اونو بعد از اون ايجاد كردي نداره به submain شما ربط داره حالا
توي form1 load خودت بنويس form2.show حالا اگه كارت راه نيفتاد يه جاي ديگه كارت مشكل داره كدتو upload كن برات درست كنم.
farzad_sx1
28-03-2006, 20:34
آقا واقعا از راهنماييت ممنون ...مشكلم همونطوريكه گفتي حل شد....
يه سوال ديگه ....
من يدونه ListBox دارم كه يجوريش كردم كه اطلاعات مياد توش ولي اين اطلاعات بترتيب نام مرتب نميشه.... و بر اساس آخرين اطلاعات ورودي مياد..يعني اگه من چندتا اطلاعات وارد كنم...به ترتيب زير ميشه...
Farzad
Ehsan
Farshid
من ميخوام اين اطلاعات بترتيب حروف مرتب بشن ... يعني به شكل زير باشه...
Farzad
Farshid
Ehsan

در ضمن ميخواستم بدونم كه اگه حرف اول يكي كوچيك باشه و يكي بزرگ باز هم بترتيب زير هم مي افتن؟؟؟
Sherwood جان واقعا آقایی
sherwood
02-04-2006, 19:46
شما بايد براي اين كار هر دفعه بعد از اضافه كردن يك اسم به list box اون رو دوباره با يك كد به ترتيب اسم كني
البته من راه اسون تر بلد نيستم شايد اسون تر هم باشه اگه كسي ميدونه بگه
TAMIZI
04-04-2006, 19:42
سلام
میشه بگید چه جوری میشه مشخص کرد که text یه تکس باکس از یک فایل .txt خوانده بشه
یهنی مثلا text1.text جمله ای باشه که در یک فایل متنی در یک درایو و در یک پوشه مشخص قرار گرفته باشه
خیلی خیلی ممنون میشم
چون دیدم سوالم به این موضوع ربط داره مطرح کردم
sherwood
04-04-2006, 21:15
سلام
بستگي داره اگه اون فايل رو خودت باز كردي و با دستور write يا print داخل اش نوشتي ميتوني با دستور input بخوني
ولي اگه غير از اين باشه بهتره فايل رو random باز كني و بخوني
اگه كارت راه نيفتاد بگو برات يه كد بزارم يا خودت هر جاش مشكل داشتي سوال كن
TAMIZI
06-04-2006, 13:25
سلام sherwood عزیز
از توضیح و کمک شما بسیار ممنونم ولی من تازه به این برنامه روی آوردم به همین خاطر زیاد وارد نیستم ...
اگه بتونید یه نمونه بزارید خیلی خیلی من رو شرمنده کردید
البته من خودم اون فایل رو ننوشتم پس نمیشه از input استفاده کرد ... همون راندوم رو یه مثال بزارید که کار کنه خیلی ممنون میشم
البته اگه زحمتی نیست و وقت دارید
باز هم ممنون
sherwood
08-04-2006, 17:25
سلام

dim i as integer
dim b as byte

open "file address" for random as #1

do while (lof(1)=true)

i=i+1
get#1,i,b
text1.text=text1.text & chr(b)

loop
sherwood
08-04-2006, 17:28
در ضمن دير و زود داره ولي سوخت و سوز نداره حالا چرا تاپيك زدي :biggrin: :biggrin:
TAMIZI
08-04-2006, 22:49
سلام sherwood جان
از پاسخ شما ممنونم
میرم که ببینم نتیجه چی میشه...
حقیقتش فکر کردم دیگه جواب نمی دید یا طول میکشه من هم چون نیاز داشتم تاپیک زدم ... ببخشید
واقعا که بچه های این پی سی ورد خیلی آقان البته به جز خانمهاش !!
ولی در کل اینجا بیشتر مفید بود تا اون تاپیک
باز هم ممنون دوست من
موفق باشید
sherwood
12-04-2006, 19:01
خواهش ميكنم اگه كمكت كرد بگو كه ما هم خيالمون راحت بشه