استفسار عن اعضاء الخليه Directory

#12 أكتوبر 2009 في 19:06 صاحب الموضوع

السلام عليكم ورحمه الله.

اود معرفه ما الخطا فى هذا الكود ولماذا لا يظهر اعضاء الخليهdictionary بعد الدوت علما بان قمت باستيراد فضاء ,

system.io

Option Strict On
Imports System.IO
 Private Sub Form1_Load(ByVal sender As System.Object, _
						   ByVal e As System.EventArgs) _
						Handles MyBase.Load
		ShowAllDrives()
		DrivesList.SelectedIndex = 1
		Me.Text = directory.GetCurrentDirectory
	End Sub

ولكم جزيل الشكر

لا اله الا انت سبحانك انى كنت من الظالمين

#22 أكتوبر 2009 في 22:16

ما المشكلة بالتحديد؟

لا توجد أى مشكلة فى الكود

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

#33 أكتوبر 2009 في 01:05

pro2007 كتب:
السلام عليكم ورحمه الله.
اود معرفه ما الخطا فى هذا الكود ولماذا لا يظهر اعضاء الخليهdictionary بعد الدوت علما بان قمت باستيراد فضاء ,
system.io
Option Strict On
Imports System.IO
 Private Sub Form1_Load(ByVal sender As System.Object, _
						   ByVal e As System.EventArgs) _
						Handles MyBase.Load
		ShowAllDrives()
		DrivesList.SelectedIndex = 1
		Me.Text = directory.GetCurrentDirectory
	End Sub
ولكم جزيل الشكر

أخي الكريم الـ( Code ) الذي تستخدمه ليس فيه أي مشكلة بالنسبة للسطر المفهوم ( Me.Text = Directory.GetCurrentDirectory ) يمكنك أيضاً استخدام ( Me.Text = Application.StartupPath )

أعتقد أن المشكلة في العبارات السابقة أي :

		ShowAllDrives()
		DrivesList.SelectedIndex = 1

تأكد وأعلمنا :)

بالتوفيق

The important thing is not so much

that every child should be taught,

as that every child should be given the wish to learn.

#43 أكتوبر 2009 في 08:52

اقتباس
أعتقد أن المشكلة في العبارات السابقة

وحتى لو كانت المشكلة فى السطور الأخرى فهذا ليس له تأثير على ظهور الـIntellisense

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

#53 أكتوبر 2009 في 10:56

GHOST2010 كتب:
وحتى لو كانت المشكلة فى السطور الأخرى فهذا ليس له تأثير على ظهور الـIntellisense

Intellisense ؟ في وقت التشغيل عند حدوث خطأ ما يتم تجميد التطبيق وعرض ( Exception ) :

له تأثير في حال كان الإجراء ( ShowAllDrives ) تابع لمكتبة فرعية اي ( Dynamic Link Library ) وإذا كان الخطأ هنا فإما المكتبة المستخدمة غير متقنة وتحتاج لتدقيق في جميع خصائصها أو أن المبرمج الذي كتب الـ( Code ) الخاص بها لم ينتبه لإحدى المشاكل المتوقع حدوثها .

أو

يمكن أن يكون الخطأ في إعداد العنصر المحدد من الـ( DrivesList ) والسبب أن هذه الـ( ListBox ) لاتحوي عنصر واحد وبالمناسبة إذا كنت تحاول تحديد العنصر الأول من الـ( ListBox ) يجب عليّك إسناد القيمة ( 0 صفر ) التي تمثل العنصر الأول من مجموعة العناصر .

واعتذر لعدم ملاحظتي هذا العبارة ( dictionary ) :lol: قرأتها ( Directory ) هههههه :P

Imports System.Collections.Generic
Public Class Form1
	Private _MyDictionary As New Dictionary(Of String, String)

	Private Sub Form1_Load(ByVal Sender As System.Object, _
	ByVal E As System.EventArgs) Handles MyBase.Load
		_MyDictionary.Add("hello", "مرحباً")
		_MyDictionary.Add("programming language", "لغة برمجة")
		_MyDictionary.Add("algorthim", "خوارزمية")
		_MyDictionary.Add("arabic", "اللغة العربية")
	End Sub

	Private Sub Form1_Click(ByVal Sender As Object, _
	ByVal E As System.EventArgs) Handles Me.Click
		MsgBox(_MyDictionary("programming language"))
	End Sub

End Class

بالتوفيق :)

تم تعديل هذه المشاركة بواسطة Bashar Rabat في 3 أكتوبر 2009 في 14:11