تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن مساعدة تتعلق بالمصفوفات
#1
السلام عليكم
ممكن مساعدة بالفيجوال بيسك
قراءة نص من ملف ثم تحويل الملف النصي إلى مصفوفة من الرموز ِASCII حيث يمثل كل حرف في النص بما يقابله
من ASCII Code وتكون المصفوفة الناتجة من هذه العملية ذات بعد واحد ، يتم تحويلها الى مصفوفة ذات بعدين

ارجو المساعده وشكررررررررررراً
الرد }}}}
تم الشكر بواسطة:
#2
كود :
حتي  تتمكن من إجراء حفظ لقيمة معينة موجودة بملف البيانات مثل برنامج Notepad الشهير يمكنك كما يلي :

Open "C:\Data.txt" For Output As #1
Print#1,Text1.Text
Close#1

وفي حالة الرغبة في قراءة ما هو موجود بملف البيانات إلي مربع النص كما يلي :

Open "C:\Data.txt" For Input As #1
Text1.Text = Input(LOF(1),1)
Close#1

و هذا مثال عن تقسيم كلمة الى رموز اسكي تحتاج ال 2 تكست و 1 كوماند

Private Sub Command1_Click()
d = 0
ReDim f(5)
charlen% = Len(Text1.Text)
For i% = 1 To charlen%
d = d + 1
Letters$ = Mid(Text1.Text, i%, 1)
Encrypt$ = Encrypt$ & Asc(Letters$) + 1
f(d)=Asc(Letters$) + 1
Next i
Text2.Text = Encrypt$
endsub
اما التحويل لبعدين لم افهمه لكن عليك اولا النقل الى لست
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تطبيق هذا الكود bidaya 0 34 06-12-16, 04:46 AM
آخر رد: bidaya
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 108 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [vb6.0] مساعدة عاجلة من الاخوة الكرام (ادارج صورة من فيجوال بيسك الى ملف وورد) sher 1 233 08-11-16, 02:32 AM
آخر رد: AL_BRNS
  [vb6.0] ممكن نسخة فيجوال بيسك 6 كاملة iisys 2 121 03-10-16, 08:30 PM
آخر رد: iisys
  مساعدة فى عمل برنامج بسيط hithemlion 23 623 27-09-16, 05:22 PM
آخر رد: Amir_alzubidy
  مساعدة في Active report haiderkh 4 188 31-08-16, 12:08 AM
آخر رد: Ahmed_Mansoor
  مساعدة في كود بحث Microsoft Visual Basic 6.0 2 154 24-07-16, 06:14 PM
آخر رد: Microsoft Visual Basic 6.0
  مساعدة text مربوطة بقاعدة بيانات mohfar 2 141 14-07-16, 09:46 PM
آخر رد: Amir_alzubidy
  مساعدة في كود الطباعة Mo_rb 5 276 07-07-16, 06:17 PM
آخر رد: Amir_alzubidy
  [ تمّ الحل ] مساعدة برسائل تنبيهيّة خاصّة عبد العزيز البسكري 5 187 19-06-16, 04:16 AM
آخر رد: Amir_alzubidy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم