Yh = Decimal.Parse(r("Printing unit price")) Lm = Decimal.Parse(r("Pulling unit price")) Lf = Decimal.Parse(r("Stretch unit price")) 'r("processing fee") = (Double.Parse(r("total amount")) / Integer.Parse(r("total quality")))-Double.Parse(r("stretch unit price")) -Double.Parse(r("Pulling unit price"))-Double.Parse(r("Printing unit price")) Private Sub corectData(ByVal dt As DataTable) Private Function getClients() As List(Of DataTable)ĭim names As List(Of String) = getClientNames()ĭim sql As String = "select * from where customer "
''' Get all customer raw data Datatable array
Private Function getClientNames() As List(Of String)ĭim sql As String = "select distinct customer name from where customer name'' order by customer name"ĭim reader As OleDbDataReader = cmd.ExecuteReader Process.Start("explorer.exe", savePath + "\Finish export\") MsgBox("Export is complete, click OK to open the exported folder.", MsgBoxStyle.OkCancel, "Prompt") Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Clickĭim dts As List(Of DataTable) = getClients()ĭirectory.CreateDirectory(savePath + "\Organize Export")Ĭom.dt2excel(dt, savePath + "\Finish export\" + dt.TableName + ".xls") MsgBox("Please open the original file exported by the program with Excel or WPS and save it as an xls format file and then use this program to open the new file saved as.") SavePath = Path.GetDirectoryName(fileName)Ĭonn = New OleDbConnection("Provider=.12.0 Data Source=" & fileName & " Extended Properties=""Excel 12.0 Xml HDR=Yes IMEX=1""")ĭim sql As String = "select * from "'Chinese workbook name needs to add a $ sign at the end of the Chinese language and enclose it in single quotation marks, and then enclose it with. Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
#GEMBOX DOCUMENT EXAMPLE SELECT NTH SECTION INSTALL#
''' Use OleDb combined with SQL statements to load the file and display it in the Datagridview, the client needs to download and install AccessDatabaseEngine (07 is enough) Private savePath As String'The directory path of the loaded file path Private fileName As String'Full path of the loaded file And the more cruel thing is that you can directly import the DataTable object into the xls file with one command In the workbook object, a variety of simple and rude and effective operations, record the operations used: It can't be more useful, just a dll After importing, regardless of whether Excel or WPS is installed on the target machine, you can directly access and process the xls or xlsx file in the program you wrote. I accidentally discovered this control of GemBox. I need to open the xls to edit and process and save a new xls file with a custom style. Recently, I am helping cc to make a small tool for customer bill processing.
0 kommentar(er)
