title: What am I doing wrong: Structure cannot be indexed because it has no default property (WITH CLAUSE)
body: <p>Am getting: "Structure cannot be indexed because it has no default property". What am I doing wrong?  </p>
  
  <pre><code>With grid.Rows(10).Cells
      Dim note As New Note With {.ID = "Blah", _
                                 .Date = "1/1/2011", _
                                 .Message = "AAA", _
                                 .Type = "ABC", _
                                 .SubType = "DEF", _
                                 .ReferenceKey = !SetRefNum.Value}
  End With
  </code></pre>
  
  <p>And Note looks like:</p>
  
  <pre><code>Public Structure Note
      Public Property ID As String
      Public Property [Date] As Date
      Public Property Message As String
  
      Public Property Type As String
      Public Property SubType As String
      Public Property ReferenceKey As String
   End Structure
  </code></pre>