Re: Question about Class Interaction - Visual Basic Discussion Boards

First Prev Next

Re: VB.net - Index was out of range. Must be non-negative and less than the size of the collection Listview

Richard MacCutchan2-Dec-16 22:04

Richard MacCutchan

2-Dec-16 22:04

Where do you get the error?

Don't post your question in multiple forums

Dave Kreskowiak3-Dec-16 3:26

Dave Kreskowiak

3-Dec-16 3:26

You already posted it here[^].

We can't tell you why this error came up because we don't have the data that this code is working against. I've told you how to debug this yourself because you're the only one who's going to be able to do it.

And I've already told you about the pile of resource leaks you have in this code.

A guide to posting questions on CodeProject

Click this: Asking questions is a skill.
Seriously, do it.

Dave Kreskowiak

Re: VB.net - Index was out of range. Must be non-negative and less than the size of the collection Listview

Richard Deeming5-Dec-16 2:00

Richard Deeming

5-Dec-16 2:00

Your code is vulnerable to SQL Injection[^]. NEVER use string concatenation to build a SQL query. ALWAYS use a parameterized query.

Everything you wanted to know about SQL injection (but were afraid to ask) | Troy Hunt[^]
How can I explain SQL injection without technical jargon? | Information Security Stack Exchange[^]
Query Parameterization Cheat Sheet | OWASP[^]

"These people looked deep within my soul and assigned me a number based on the order in which I joined."
- Homer

Question about Class Interaction

hilli_micha1-Dec-16 10:32

hilli_micha

1-Dec-16 10:32

I'm having a small issue wrapping my head around why this isn't working.

I have a file in my project called CollectionClasses.vb - within the Solution Explorer it's located in ProjectBase\Utilities\CollectionClasses.vb. Within that file, I've got classes that do not have Namespaces attached to them , they look like this.

Public Class LinerTypesCollection
        Inherits System.Collections.ObjectModel.ObservableCollection(Of String)

        Public Sub New(ByVal IsMetric As Boolean)

           ' Do stuff
           
        End Sub
   End Class

Now, I've got a file within my project called StartPanel.vb, it is located ProjectBase\UI\Fitting Panels\Start\StartPanel.vb that has a Partial Class that uses the class defined above

Namespace Base.Controls.Panels
    Partial Public Class StartPanel
        Public Sub New (ByVal bool as Boolean, Optional ByVal bool2 as Boolean = false)

            ' This works.
            cmbBox.ItemsSource = New LinerTypesCollection(False)
        End Sub
    End Class
End Namespace

I am also trying to utilize this LinerTypesCollection class in another part of my software within a Public Class, like so, but unfortunately, I'm stuck in a rut, possibly over something simple, as to trying to figure out why. While trying to use LinerTypesCollection within my second class, it just won't show up. This class is located in the following location ProjectBase\UI\Primatives\ConnectionOptions.vb

Namespace Base.Utilities
    Public Class ConnectionOption
        Public Sub New (ByVal IsMetric as Boolean)

            ' This does not work. I cannot get IntelliSense to acknowledge that LinerTypesCollection exists.
            cmbBox.ItemsSource = New LinerTypesCollection(False)
        End Sub
    End Class
End Namespace

I have tried to change the "Base.Utilities" to "Base.Controls.Panels" to match and no avail, any ideas?

Thanks!

Re: Question about Class Interaction

Richard Deeming1-Dec-16 11:00

Richard Deeming

1-Dec-16 11:00

In VB.NET, classes with no namespace reside in the default namespace for the project.

Since your project is called ProjectBase, that's probably what the default namespace is set to. But you'll need to check the project properties to be sure.

How to: Change the Namespace for an Application (Visual Basic)[^]

"These people looked deep within my soul and assigned me a number based on the order in which I joined."
- Homer

Re: Question about Class Interaction

hilli_micha1-Dec-16 11:10

hilli_micha

1-Dec-16 11:10

Richard,

Thanks for replying!

That was my one of my initial assumptions as well, however; I have tried to do the following with my second class..

Namespace Base.Utilities
    Public Class ConnectionOption
        Public Sub New (ByVal IsMetric as Boolean)

            ' This does not work. I cannot get IntelliSense to acknowledge that LinerTypesCollection exists.
            cmbBox.ItemsSource = New ProjectBase.LinerTypesCollection(False)
        End Sub
    End Class
End Namespace

I have confirmed that the Root Namespace of the Project matches the what I'm trying to use, but alas, no avail. Intellisense won't pick it up as visible and I can't build it.

Re: Question about Class Interaction

Richard Deeming1-Dec-16 11:18

Richard Deeming

1-Dec-16 11:18

Try looking at your project in the Object Browser[^] to see if you can track down the class.

"These people looked deep within my soul and assigned me a number based on the order in which I joined."
- Homer

Re: Question about Class Interaction

hilli_micha2-Dec-16 18:38

hilli_micha

2-Dec-16 18:38

Richard,

I feel like a moron, but I knew it was something simple. Looking in the Object Browser as you recommended, it became clear that the files I was looking at were NOT in the same project.

They bled together pretty well in the Solution Explorer.

Regardless, thank you for taking the time to reply to my messages!

Convert VB to C#

Pavlex429-Nov-16 7:00

Pavlex4

29-Nov-16 7:00

How to convert this codes to C# from VB6:
Hide Copy Code
Call rs.Open("SELECT DISTINCT Reci FROM " & CStr(duzina), Conn, adOpenKeyset)
rs.Move getRandom(0, rs.RecordCount - 1)
rec = rs.Fields(0).Value

Set rs = Conn.Execute("SELECT DISTINCT Reci FROM " & CStr(Len(r)))