فيجوال بيسك، فتح ملف، ما هو الخطأ في قانون بلدي؟

StackOverflow https://stackoverflow.com/questions/1049828

  •  20-08-2019
  •  | 
  •  

سؤال

وو"القارئ" في بيان إذا يظهر "التعبير ليست وسيلة"، ما أفعل الخطأ؟

والشكر

 Dim reader As New CSVReader

        OpenFileDialog2.Filter = "CSV File (*.csv)|*.csv"
        OpenFileDialog2.RestoreDirectory = True
        If OpenFileDialog2.ShowDialog() = DialogResult.OK Then

            reader(OpenFileDialog2.FileName)
            reader.DisplayResults(DataGridView1)
            'Return OpenFileDialog2.FileName
        Else
        End If

وأنا ببساطة انتقل خافت وأنه يعمل.

OpenFileDialog2.InitialDirectory = "a:"
OpenFileDialog2.Filter = "CSV File (*.csv)|*.csv"
OpenFileDialog2.RestoreDirectory = True
If OpenFileDialog2.ShowDialog() = DialogResult.OK Then
    Dim reader As New CSVReader(OpenFileDialog2.FileName)
    reader.DisplayResults(DataGridView1)
    'Return OpenFileDialog2.FileName
Else
End If

والشكر

هل كانت مفيدة؟

المحلول

في هذا السطر:

reader(OpenFileDialog2.FileName)

وأنت تحاول استدعاء منشئ على كائن التي يتم بناؤها بالفعل. هذا غير ممكن، وبالتالي فإن المترجم VB يتم تفسير هذا كما كنت في محاولة لاستدعاء كائن القارئ كما لو كانت وظيفة.

وفقط لا تعلن للقارئ حتى يكون لديك اسم الملف، بحيث يمكنك تمرير اسم منشئ عندما كنت في الواقع بناء عليه، مثل ذلك

    OpenFileDialog2.Filter = "CSV File (*.csv)|*.csv"
    OpenFileDialog2.RestoreDirectory = True
    If OpenFileDialog2.ShowDialog() = DialogResult.OK Then

        Dim reader As New CSVReader(OpenFileDialog2.FileName)
        reader.DisplayResults(DataGridView1)
        'Return OpenFileDialog2.FileName
    Else
    End If

نصائح أخرى

وأنت غاب اسم الأسلوب في reader(OpenFileDialog2.FileName).

مرخصة بموجب: CC-BY-SA مع الإسناد
لا تنتمي إلى StackOverflow
scroll top