CUPOM NÃO FISCAL COM VB.NET
Alguém tem algum modelo de cupom não fiscal feito entre vb.net
Eu tenho na versão vba e não estou conseguindo migrar para o vb.net
Eu tenho na versão vba e não estou conseguindo migrar para o vb.net
Bom dia Amorim,
Primeiramente queria te pedir para encerrar os seguintes tópicos ou postar algo nos mesmos que justifique a continuidade, mas não os deixá-los abandonados.
6 meses
MUDAR NOME DAS COLUNA DATAGRIDVIEW
http://vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=451043&pagina=1
4 semanas
CENTALIZAR TEXTO NO LISTBOX
http://vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=457052&pagina=1
Com relação ao modelo que você precisa, refere-se ao código fonte ou ao layout da impressão?
Primeiramente queria te pedir para encerrar os seguintes tópicos ou postar algo nos mesmos que justifique a continuidade, mas não os deixá-los abandonados.
6 meses
MUDAR NOME DAS COLUNA DATAGRIDVIEW
http://vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=451043&pagina=1
4 semanas
CENTALIZAR TEXTO NO LISTBOX
http://vbmania.com.br/index.php?modulo=forum&metodo=abrir&id=457052&pagina=1
Com relação ao modelo que você precisa, refere-se ao código fonte ou ao layout da impressão?
Layout e código fonte se puder
Amorim,
Em uma pesquisa rápida no google, acha-se vários layouts. Seque um dos links, com vários modelos:
https://www.google.com.br/search?q=layout+de+cupom+fiscal&tbm=isch&tbo=u&source=univ&sa=X&ved=0ahUKEwj8wPOsyKnLAhVBIJAKHebyA4QQsAQIIw&biw=1920&bih=941
Quanto ao código fonte, você mesmo deve desenvolver. Se tiver problemas com seu código e que não consiga resolver, então poste aqui seu código fonte que o grupo auxiliará com dicas para fazê-lo funcionar.
Em uma pesquisa rápida no google, acha-se vários layouts. Seque um dos links, com vários modelos:
https://www.google.com.br/search?q=layout+de+cupom+fiscal&tbm=isch&tbo=u&source=univ&sa=X&ved=0ahUKEwj8wPOsyKnLAhVBIJAKHebyA4QQsAQIIw&biw=1920&bih=941
Quanto ao código fonte, você mesmo deve desenvolver. Se tiver problemas com seu código e que não consiga resolver, então poste aqui seu código fonte que o grupo auxiliará com dicas para fazê-lo funcionar.
Tem o picturebox, Listview, Listbox, Datagridview.
Eu não estou conseguindo formatar
o listbox no formato de cupom e
o picturebox e Listview não estou conseguindo lista os dados.
Qual do quero acima e melho para
se usar como cupom não fiscal
Eu não estou conseguindo formatar
o listbox no formato de cupom e
o picturebox e Listview não estou conseguindo lista os dados.
Qual do quero acima e melho para
se usar como cupom não fiscal
Amorim,
Se pesquisar aqui no fórum, verá que código fonte pronto ninguém vai te dar.
Quanto à sua colocação:
Você não especifica a formatação que está querendo fazer. Pode ser de cores, pode ser de alinhamento de texto/coluna, pode ser redimensionamento. Pode ser qualquer coisa. Não há como adivinharmos. Você precisa especificar o que deseja. E, preferencialmente, já colocando seu código fonte para análise.
Esta parte, do seu texto:
Está ininteligÃvel. Não há como saber se com a expressão Qual do quero acima e melho (sic) você escolheu um modelo ou se você deseja um palpite em qual usar. Cupom não fiscal tem tÃtulo com nome do emitente, endereço, telefone e CNPJ (no mÃnimo da identificação). Linha em branco e identificação do consumidor. A seguir número do cupom, data de emissão e valor total (no mÃnimo isto). Depois código do produto, descrição, quantidade, valor unitário e subtotal, no mÃnimo.
Gentileza não esquecer de encerrar os tópicos abertos e sem movimentação, citados na minha primeira mensagem.
Se pesquisar aqui no fórum, verá que código fonte pronto ninguém vai te dar.
Quanto à sua colocação:
Citação:Eu não estou conseguindo formatar
o listbox no formato de cupom e
o picturebox e Listview não estou conseguindo lista os dados.
Você não especifica a formatação que está querendo fazer. Pode ser de cores, pode ser de alinhamento de texto/coluna, pode ser redimensionamento. Pode ser qualquer coisa. Não há como adivinharmos. Você precisa especificar o que deseja. E, preferencialmente, já colocando seu código fonte para análise.
Esta parte, do seu texto:
Citação:Qual do quero acima e melho para
se usar como cupom não fiscal
Está ininteligÃvel. Não há como saber se com a expressão Qual do quero acima e melho (sic) você escolheu um modelo ou se você deseja um palpite em qual usar. Cupom não fiscal tem tÃtulo com nome do emitente, endereço, telefone e CNPJ (no mÃnimo da identificação). Linha em branco e identificação do consumidor. A seguir número do cupom, data de emissão e valor total (no mÃnimo isto). Depois código do produto, descrição, quantidade, valor unitário e subtotal, no mÃnimo.
Gentileza não esquecer de encerrar os tópicos abertos e sem movimentação, citados na minha primeira mensagem.
Não estou conseguindo montar o layout para ficar no formato de cupom fiscal
Amorim,
Coloque o código que você está usando para formatar e também para popular o listview.
Coloque o código que você está usando para formatar e também para popular o listview.
O codigo e este
Private Sub PBusca_dados()
Using con As OleDbConnection = GetConnection()
con.Open() [ô]abre a conexao com o banco
[ô]query de busca
Dim sql As String = [Ô][Ô]
sql = [Ô]SELECT Quantidade, CodParcela, NomeProduto, ValorParc, CodBarra FROM tblVendas ORDER BY CodParcela[Ô] [ô] WHERE ControleVenda=[Ô] & txtCodigo.Text & [Ô] ORDER BY CodParcela [Ô]
[ô] sql = [Ô]SELECT Quantidade,ControleVenda,Produto,Valor, CodBarra FROM tblVendas ORDER BY ControleVenda[Ô]
Dim comam As OleDbCommand
comam = New OleDbCommand(sql, con)
Dim adapter As OleDbDataAdapter = New OleDbDataAdapter(comam)
Dim ds As DataSet = New DataSet()
Try
List1.Items.Add([Ô] AV. NÃO SEI DAS QUANTAS , 09[Ô])
List1.Items.Add([Ô] FONE (063) 92320607[Ô])
List1.Items.Add([Ô] PALMAS - TO[Ô])
List1.Items.Add([Ô] CGC 01385352000198[Ô])
List1.Items.Add([Ô] INSC. ESTADUAL 01385352000198[Ô])
List1.Items.Add([Ô] CUPOM NÃO FISCAL[Ô])
List1.Items.Add([Ô] DATA/HORAS: [Ô] & Date.Now)
adapter.Fill(ds, [Ô]tblVendas[Ô])
Dim pRow As DataRow
List1.Items.Add(([Ô]Codigo[Ô]).ToString() & [Ô] [Ô] & ([Ô]Produto[Ô]).ToString() & [Ô] [Ô] & (([Ô]Valor[Ô])))
For Each pRow In ds.Tables([Ô]tblVendas[Ô]).Rows
[ô]o listbox recebe o campo nome
List1.Items.Add(pRow([Ô]Quantidade[Ô]).ToString() & [Ô] [Ô] & pRow([Ô]NomeProduto[Ô]).ToString() & [Ô] [Ô] & Format(pRow([Ô]ValorParc[Ô]), [Ô]##,##0.00[Ô]))
[ô] List1.Items.Add([Ô]---------------------------------------------------------------------------------------------[Ô])
Next
con.Close()
Catch ex As Exception
MsgBox([Ô]Erro: [Ô] & ex.Message)
End Try
End Using
End Sub
Private Sub PBusca_dados()
Using con As OleDbConnection = GetConnection()
con.Open() [ô]abre a conexao com o banco
[ô]query de busca
Dim sql As String = [Ô][Ô]
sql = [Ô]SELECT Quantidade, CodParcela, NomeProduto, ValorParc, CodBarra FROM tblVendas ORDER BY CodParcela[Ô] [ô] WHERE ControleVenda=[Ô] & txtCodigo.Text & [Ô] ORDER BY CodParcela [Ô]
[ô] sql = [Ô]SELECT Quantidade,ControleVenda,Produto,Valor, CodBarra FROM tblVendas ORDER BY ControleVenda[Ô]
Dim comam As OleDbCommand
comam = New OleDbCommand(sql, con)
Dim adapter As OleDbDataAdapter = New OleDbDataAdapter(comam)
Dim ds As DataSet = New DataSet()
Try
List1.Items.Add([Ô] AV. NÃO SEI DAS QUANTAS , 09[Ô])
List1.Items.Add([Ô] FONE (063) 92320607[Ô])
List1.Items.Add([Ô] PALMAS - TO[Ô])
List1.Items.Add([Ô] CGC 01385352000198[Ô])
List1.Items.Add([Ô] INSC. ESTADUAL 01385352000198[Ô])
List1.Items.Add([Ô] CUPOM NÃO FISCAL[Ô])
List1.Items.Add([Ô] DATA/HORAS: [Ô] & Date.Now)
adapter.Fill(ds, [Ô]tblVendas[Ô])
Dim pRow As DataRow
List1.Items.Add(([Ô]Codigo[Ô]).ToString() & [Ô] [Ô] & ([Ô]Produto[Ô]).ToString() & [Ô] [Ô] & (([Ô]Valor[Ô])))
For Each pRow In ds.Tables([Ô]tblVendas[Ô]).Rows
[ô]o listbox recebe o campo nome
List1.Items.Add(pRow([Ô]Quantidade[Ô]).ToString() & [Ô] [Ô] & pRow([Ô]NomeProduto[Ô]).ToString() & [Ô] [Ô] & Format(pRow([Ô]ValorParc[Ô]), [Ô]##,##0.00[Ô]))
[ô] List1.Items.Add([Ô]---------------------------------------------------------------------------------------------[Ô])
Next
con.Close()
Catch ex As Exception
MsgBox([Ô]Erro: [Ô] & ex.Message)
End Try
End Using
End Sub
Aqui um Layout que uso...tenho um classe que imprimi direto...
Não sei o que você esta tentando montar mais da forma que você esta fazendo só acho que não ta certo...
Tópico encerrado , respostas não são mais permitidas