ERRO : CARREGAR LISTVIEW

 Tópico anterior Próximo tópico Novo tópico

ERRO : CARREGAR LISTVIEW

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#439528 - 14/07/2014 16:36:52

PROGRAMADORVB6
LISBOA
Cadast. em:Janeiro/2004


 Anexos estao visíveis somente para usuários registrados

Olá Galera, boa noite.
Tenho uma rotina que carrega de uma base de dados para uma ListView, mas quando coloco a instrução no inicio : Option Strict On me devolve erro, quando desativada o programa trabalha normalmente.
Como posso resolver este erro? Será que alguma coisa não foi especificada?
Deixo aqui parte do código e também código fonte na integra para que possam me ajudar.
Agradeço no entanto a todos vós pela vossa atenção.
Atenciosamente
ProgramadorVB6


  Option Strict On

Imports System.Text


Public Class Form1
    Private SQL As StringBuilder

    Sub PreencherLista()
        Dim DR As DataRow
        Me.Grelhax.Items.Clear()
        SQL = New StringBuilder
        SQL.Append("SELECT * FROM ListaCodigos ORDER BY Nome desc")
        CarregarDataSet(SQL.ToString)
        Dim ListItem As ListViewItem
        For Each DR In DT.Rows
            If Not DR Is DBNull.Value Then

                ListItem = Grelhax.Items.Add(DR("Nome"))
                ListItem.SubItems.Add(DR("Linguagem").ToString())
            End If
        Next
    End Sub
End Class


______________________________________________________________________________

Que minha coragem seja maior que meu medo e que minha força seja tão grande quanto minha fé.


Resposta escolhida #439533 - 14/07/2014 17:43:43

OMAR2011
MONTES CLAROS
Cadast. em:Setembro/2011


Tente assim.
   ListItem = Grelhax.Items.Add(DR("Nome").ToString)
    ListItem.SubItems.Add(DR("Linguagem").ToString)
Acredito que vai acabar o erro.



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por PROGRAMADORVB6 em 14/07/2014 18:19:01