从数据表中删除char

Hi, how can I remove char from datatable. I have a SQL request, where I have normal value eg. 100 but datatable write me 100,000000 hav can I remove char ,000000 ? thank youHere is problem: qer — imgbb.com[^]What I have tried:Public Shared Sub kusovnik(ByVal sender As Object, byval e As EventArgs) Handles MyBase.Load ' PRIPOJENI K DATABAZI Dim rs As New ADODB.Recordset Dim cnn As New ADODB.Connection Dim cmd As New ADODB.Command Dim rs2 As New ADODB.Recordset ' Otevreni spojeni cnn.ConnectionString = "driver={SQL Server};" & "server=000.000.000.000;uid=00;pwd=00000+;database=00000" Try cnn.Open() If cnn.State = 1 Then Assy_line_light.PripojenoPic.Show() Assy_line_light.PripojenoLab.Show() Assy_line_light.OdpojenoPic.Hide() Assy_line_light.OdpojenoLab.Hide() '' MsgBox("Spojení ověřeno ! ", , "Ověření spojení") ' Overeni zda pripojeni probehlo Ok Else MsgBox("Chyba v připojení k databázi.", , "Ověření připojení k databázi") Assy_line_light.PripojenoPic.Hide() Assy_line_light.PripojenoLab.Hide() Assy_line_light.OdpojenoPic.Show() Assy_line_light.OdpojenoLab.Show() End If Catch ex As Exception Assy_line_light.PripojenoPic.Hide() Assy_line_light.PripojenoLab.Hide() Assy_line_light.OdpojenoPic.Show() Assy_line_light.OdpojenoLab.Show() ''MsgBox("Chyba připojení k databázi!", , "Chyba") End Try ManipMat.barcodeMan = Assy_line_light.TextBox8.Text ' Cislo Dilu na zaklade Caroveho kodu rs2 = cnn.Execute("SELECT VVyrobniOperaceKmenZbozi.RegCis From TabPrPostup LEFT OUTER JOIN TabPrikaz VVyrobniOperacePrikaz ON TabPrPostup.IDPrikaz=VVyrobniOperacePrikaz.ID LEFT OUTER JOIN TabKmenZbozi VVyrobniOperaceKmenZbozi ON TabPrPostup.dilec=VVyrobniOperaceKmenZbozi.ID WHERE TabPrPostup.BarCode = '" & ManipMat.barcodeMan & "'") 'Cislo dilu 'Zadany barcode 'Podpurne tabulky pro propojeni s DB Dim custDA As OleDbDataAdapter = New OleDbDataAdapter() Dim custDS As DataSet = New DataSet Dim custTable As New DataTable custDS.Tables.Add(custTable.ToString) cmd.ActiveConnection = cnn 'SQL request cmd.CommandText = "SELECT VKVazbyNizsiKmenZbozi.SkupZbo, VKVazbyNizsiKmenZbozi.RegCis, VKVazbyNizsiKmenZbozi.Nazev1, TabKvazby.mnozstvi FROM TabKvazby LEFT JOIN TabCzmeny VKVazbyZmenaOdCZmeny ON TabKvazby.ZmenaOd=VKVazbyZmenaOdCZmeny.ID LEFT JOIN TabCzmeny VKVazbyZmenaDoCZmeny ON TabKvazby.ZmenaDo=VKVazbyZmenaDoCZmeny.ID LEFT JOIN TabKmenZbozi VKVazbyVyssiKmenZbozi ON VKVazbyVyssiKmenZbozi.ID=TabKvazby.vyssi LEFT JOIN TabKmenZbozi VKVazbyNizsiKmenZbozi ON TabKvazby.nizsi=VKVazbyNizsiKmenZbozi.ID WHERE(SELECT tabPostup.nazev FROM tabPostup WHERE TabPostup.dilec = VKVazbyVyssiKmenZbozi.IDKusovnik AND TabKvazby.Operace = TabPostup.Operace) = 'Balení' AND VKVazbyVyssiKmenZbozi.RegCis = (SELECT VVyrobniOperaceKmenZbozi.RegCis FROM TabPrPostup LEFT JOIN TabKmenZbozi VVyrobniOperaceKmenZbozi ON TabPrPostup.dilec = VVyrobniOperaceKmenZbozi.ID WHERE TabPrPostup.BarCode = '" & ManipMat.barcodeMan & "')" rs.Open(cmd) custDA.Fill(custTable, rs) 'Nazvy polozek v tabulce custTable.Columns(0).ColumnName = "Skupina zboží" custTable.Columns(1).ColumnName = "Registrační číslo" custTable.Columns(2).ColumnName = "Název materiálu" custTable.Columns(3).ColumnName = "Počet kusů" 'Naplneni nove tabulky ve formulari Assy_line_light.DataGridView1.DataSource = custTable 'Ukonceni spojeni s DB rs.Close() cnn.Close() Assy_line_light.DataGridView1.Columns("Počet kusů").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight End Sub 解决方案 这篇关于从数据表中删除char的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！