BOTAO INICIO DO ARQUIVO
Olá pessoal,
Como sou novato no sistema VB2010 Express, necessito mt a ajuda dos amigos do FORUM, estou ás voltas com os botões INÃCIO DE ARQUIVO, FINAL DE ARQUIVO, REGISTRO ANTERIOR, REGISTRO POSTERIOR. Estou trabalhando com o MYSQL, só que fiz o botão INÃCIO DE ARQUIVO, mas ao rodar o programa me dá a seguinte mensagem de erro:
ARGUMENTNULLEXCEPTION não foi manipulada
Value cannot be null
Parameter name: dataSource
Bem abaixo tem o código que estou utilizando>
Provate Sub But_Inicio_Click(Byval sendere As System.Obect, Byval e As System EventArg) Handles But_Inicio.Click
Dim contador As Integer
contador = Me.BindingContext(Conn, [Ô]associado[Ô]).Count
If contador >= 0 Then
Me.BindingContext(Me.Conn, [Ô]associados[Ô]).Position += 1 [ô]avança um registro
Exibe_Dados_Associados()
Else
[ô]lblcontador.Text = [Ô]Não há registros[Ô]
End If
End Sub
O que está de errado neste código???
Obrigado,
Amigo,
o que você precisa esta aqui.
http://www.macoratti.net/vbna_cp1.htm
Espero ter ajudado!
o que você precisa esta aqui.
http://www.macoratti.net/vbna_cp1.htm
Espero ter ajudado!
Isso acontece quando você tenta buscar do BD um valor em um determinado campo mas este campo está vazio ou seja nulo.
use por exemplo:
[txt-color=#0000f0]If[/txt-color] IsDBNull(Seu_Registro_do_BD.value) [txt-color=#0000f0]Then[/txt-color] MsgBox([txt-color=#e80000][Ô]Está vazio[Ô][/txt-color]) [txt-color=#0000f0]Else[/txt-color] MsgBox(Seu_Registro_do_BD.Value.ToString)
Ou seja caso o campo rtornado esteja vazio o programa não pára, mostra uma caixa de mensagens e continua sem erros.
abraços
use por exemplo:
[txt-color=#0000f0]If[/txt-color] IsDBNull(Seu_Registro_do_BD.value) [txt-color=#0000f0]Then[/txt-color] MsgBox([txt-color=#e80000][Ô]Está vazio[Ô][/txt-color]) [txt-color=#0000f0]Else[/txt-color] MsgBox(Seu_Registro_do_BD.Value.ToString)
Ou seja caso o campo rtornado esteja vazio o programa não pára, mostra uma caixa de mensagens e continua sem erros.
abraços
Tópico encerrado , respostas não são mais permitidas