|
Dobrý den, mám problém s vyhledáváním prázdného pole, které je typu object.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim novypanel As New Panel
Dim pole(10) As Object
pole(1) = novypanel
pole(1).Name = "Panel1"
Dim k As Integer
Dim Obsazeno As Integer
For k = 1 To 10
If pole(k) = "" Then
Else : Obsazeno = 1
End If
Next
MsgBox(Obsazeno)
End Sub
dojde k teto chybe Rozlišení přetěžování se nezdařilo, protože žádné veřejné = nelze volat s těmito argumenty: 'Public Shared Operator =(a As String, b As String) As Boolean': Argument odpovídající parametru a nelze převést z Panel na String.. Uvedl jsem zkrácený příklad, ale v podstatě mi jde o to vytvořit panel za běhu programu. Na něho za běhu přidat Labely. Po stisknutí tlačítka by se měli prázdné hodnoty pole na pozici (k) nahradit novými hodnotami. Proto provádím kontrolu Pole(k) a u něho potřebuji zjistit, že když bude hodnota v poli nulová(neobsahuje data), tak se nahradí novým záznamem, ale když bude nenulová, tak se do jiné proměnné uloží číslo té pozice. Snad jsem to nenapsal moc nesrozumitelně :o) Předem děkuji za pomoc
|