如何在没有db的情况下生成条形码5文本域数据 [英] How to generate barcode 5 textfield data without db

问题描述

如何在不使用DB的情况下生成条形码5文本框数据以及如何读取条形码并显示5个没有DB的文本框



任何一个知道答案，请给我一个代码

邮件：[e-mail]

解决方案

首先下载字体 - IDAutomationHC39M并安装它。



这是条形码字体。





现在使用此代码

  Imports  CrystalDecisions。共享 
  Imports  CrystalDecisions.CrystalReports.Engine 
 
 公共 类 Form6 
 
  Dim  Rpt  As  新 ReportDocument 
 
 私有 子 Button1_Click（ ByVal  sender  As  System。 Object ， ByVal  e  As  System.EventArgs）句柄 Button1.Click 
  Me  .Label1.Text =  Me  .TextBox1。文字&  & 我 .TextBox2.Text&  & 我 .TextBox3.Text&  & 我 .TextBox4.Text&  & 我 .TextBox5.Text&   
  Dim  frmView 作为 新 Form3 '  Crystal Report查看器表单 
 Rpt = 新 CrystalReport1 ' 您的Crystal报表名称 
 Rpt.SummaryInfo.ReportTitle = 我 .Label1.Text 
 frmView.CrystalReportViewer1.ReportSource = Rpt 
 frmView.CrystalReportViewer1.RefreshReport（）
 frmView.Show（）
 结束  Sub  
 结束 类 

水晶报告



创建此公式命名条形码



*& ReportTitle& *



现在在报告中插入上面的公式。



享受您的条形码已经准备好没有数据库

how to generate barcode 5 textbox data without using DB and how to read barcode and display 5 textbox without DB

any one know answer,Pls give me a code
mail:[e-mail]

解决方案

First Download the Font - IDAutomationHC39M and install it.

This is a barcode font.


Now in form use this code

Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports.Engine

Public Class Form6

    Dim Rpt As New ReportDocument

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Label1.Text = Me.TextBox1.Text & " " & Me.TextBox2.Text & " " & Me.TextBox3.Text & " " & Me.TextBox4.Text & " " & Me.TextBox5.Text & " "
        Dim frmView As New Form3 'Crystal Report viewer form
        Rpt = New CrystalReport1 'Your Crystal Report Name
        Rpt.SummaryInfo.ReportTitle = Me.Label1.Text
        frmView.CrystalReportViewer1.ReportSource = Rpt
        frmView.CrystalReportViewer1.RefreshReport()
        frmView.Show()
    End Sub
End Class

In Crystal Report

Create this formula Named barcode

"*" & ReportTitle & "*"

Now insert the above formula in report.

Enjoy your barcode is ready without database.

这篇关于如何在没有db的情况下生成条形码5文本域数据的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！