I found away to read a fixed position text file, but I encounter a problem, I know which field I want to go and check, how can I jump directly to the field I need. Readfields does not helps.for instance I need to check on field 3 and 7 of the row before the next row is read.[code]is this my best approach to read a fixed position text file?
View 1 RepliesI am aware that this is a visual basic dot net post. However It was extremely simple for me to write out a file in VB6 using lines such as the following snippet
[Code]...
I want basically to export an array A (I used zero based array here) with three columns and a particular value B in fixed widths, hence the @@@@@ which means 5 spaces in to a text file defined by the FreeFNum (FreeFileNumber).
I would like to use CSV and all the other formats but some scientific programs written in FORTRAN may not support them. Anyway my file output here needs to be in this fixed width format because it will be used by proprietary software that I have no access to the source code.
[Code]...
I have files that are one long line of text but are made up of individual segments. I have managed to parse the segments into a string array but now need to parse each segment into its individual fields, based upon a field structure defined by the first 2 characters of the segment.For example:
CA12345ABC999999XXPPPPPPPP55
CA segment (CA is first 2 characters of segment) has fields defined as:
Field Name,Start,Length
[code]....
I'm using vb6 to read lines of txt files, using the code posted in ream.In.Code "Reading a Text file Line by Line". My question is how can I real a line with fixed column width, for example:
qwerty 12345 asdfg
asd 455 hfgdf
qhjkrty 1235 asdfg
The objective is to read each part of the row. In Visual Studio 2010 Beta version the code I present below that is actually working but it doesn't work in VB6.
Using Reader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\teste.txt")Reader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.FixedWidthReader.SetFieldWidths(8, 30, 25, 45, 57)
[code].....
I want to set header column width for grid view. I tried HeaderStyle-Width="30px". But it is depending on Item columns. The column width is setting based on item value. But I want fixed width even if it has value or empty.
View 2 RepliesI need to write some fixed-width font (i.e Courier New or Consolas) text to a .net Winforms window in the Paint event - not using a label or any other winforms control - rather using a graphics object method to render the text onto the form's client area. I am having difficulty aligning text on different lines under headings even though it is fixed width font. How can I get a precise measurement of the width of a single character in the fixed-width font? How can I get 2 lines to print out aligned horizontally in successive text out calls?
For example:
Heading 1 Heading 2
Short Other text
A bit longer Still aligned?
I need a separate call to render each cell of text under Heading 2. For argument's sake - let's say column 1 items are printed in black and column 2 are printed in blue - we can't use the same text out call for the entire line.
I am trying to format a string of arbitrary length into a fixed width field for display.
Let's use a width of 20 as an example, and call the string to be formatted s. I'm adding the formatted string to a StringBuilder named b.
Dim b As New System.Text.StringBuilder()
Dim s as New String
If the string I want to display is shorter than 20 characters, I can do this:
b.Append(s.PadRight(20))
or
b.AppendFormat("{0,-20}", s)
So far, so good. But, if the string is longer than 20 characters, I want the string to be truncated to 20 characters as it is appended. The code above appends the entire string.
I tried this:
b.Append(s.Substring(0,20).PadRight(20))
But, this fires an exception if the string was shorter than 20 characters.
So, I ended up with:
b.Append(s.PadRight(20).Substring(0,20))
This seems to do the job. The PadRight prevents the exception by making sure thet string has 20 characters before the Substring is performed.
I was wondering if there is an alternate method that would look more elegant and avoid padding the string just so prevent the substring from causing an exception. Have I missed a feature of String.Format that can accomplish this in one step?
Edited to add solution:
I ended up with the following code:
Module Extensions
<Extension()> _
Function AppendFixed(ByVal b As StringBuilder, ByVal s As String, ByVal width As Integer) As StringBuilder
[Code]....
This uses an extension method to clean up the syntax, as suggested by Joel and Merlyn, and uses the StringBulider Append overloads to avoid creating new strings that will have to be garbage collected, as suggested by supercat.
Is there a simple way (without measuring characters using a Graphics object) to check if a font is fixed-width?
View 7 RepliesI'm developing a Point Of Sale (POS) app in VB.NET and .NET Framework 3.5 where multiple items can bought at a time. I need to print all items: their code, name quantity, price in a row-column manner.
SHOP NAME date
========== =====
SL CODE NAME QTY PRICE
== ===== ===== === =====
[code]....
The width of page is fixed but the height will be dynamic.The printout will be printed on rolled paper normally used in a POS system.How can this be done?
How to delete a record or field from a fixed-width file in visual basic code?
View 1 RepliesIn Excel under Data Tab-Text to Columns-Fixed Width- and when next is pressed we get preview of Selected Data.
There a Scale is being designed(10, 20, ...). Is there any way in VB.net to do that scale or any other form of Implementation.
just say I have a string as follows:
This is a long long lojngoi sudofi usdfh ksjdhfjk sdhfgkj shgh sdfhg sdfg sdfgdsfg ... I want to specify a maximum width (eg 180) for my string and get the height returned... the picture below explains in more detail:
I need to import a big fixed width text data file into SQL server. Before importing, how to determine how many fields and records in the file?
View 11 RepliesI am using ms-access 2002. I have to export the data of a ms-access table in Fixed Width format. To accomplish this I am using DoCmd.TransferText method.
DoCmd.TransferText acExportFixed, "schema.ini", "table_ABC", "C: estingTestData.txt"
But I am getting error message: "Run time error-3625 The text file specification 'schema.ini' does not exist.You cannot import, export, or link using the specification."
Here schema.ini is at same location as of text file. i.e. "C: esting"
I tried with
DoCmd.TransferText acExportFixed, "C: estingschema.ini", "table_ABC", C: estingTestData.txt"
but no success.
For delimited format it is working fine
DoCmd.TransferText acExportDelim, "", "VDMMEMBS", "C: estingTestData.txt"
I have gone through the link [URL]
Error message is same as of me but example shown is related to import of txt file.
I am trying to load a text file into an Access 2007 table. I know you can read the file line by line and then create a record out of each line. i was trying to see if this could be done with an INSERT INTO rather than cyclying through all lines of text. My text file is not character delimited but rather by fixed column width. For example:[code]The data in the example has spaces for readability but in reality the data are clumped together like so [code]I cant figure out how to tell the command how the data is structured. I know you can use a schema file but there's got to be a way to do this all through code.
View 1 RepliesI am learning to use TextFieldParser to read a fixed width text data file. It works great. I copied code below. Question: How to stop at the end of each line because I need to add some code?
Using tf As New TextFieldParser(fileName)
tf.TextFieldType = FileIO.FieldType.FixedWidth
tf.SetFieldWidths(60, 30, 20) //three columns
[Code].....
I am trying to write a program that will use a Structure with <VBFixedString(4), VBFixedArray(10)> Public Test1() As String. Back in vb6 it was in the Type statement as Test1(10) as string *4 When I hit the line ".Test1(X) = TB1" i get the following error:
Object reference not set to an instance of an object.
[Code]...
I need to write a code that reads off a value from a another system's screen and compares with fixed value in .net 2005. The code should read all 24 lines of data from the screen and match to see if it is equal to the fixed value. What I have so far is:
Code:
Dim ObjScreen(6) As Object
Private ObjOIA_Area(6) As Object
Private OIA_Area As Object
[code].....
However the code is not working. and get an error. How can you select all or read line by line to get your desired result....
I have a Textfile "C:Holiday.txt" where the data is stored line by line.
[Code]...
I would like to read this data into a datagrid , (2 Columns), edit it, and save it again.
i can anyone tell me how do i save the below codes into textfile and make my program read from it? i'm trying to make a chinese calendar and below are the months of it. i'm gonna need to save up to about 3 years of months.
[Code]...
I need to set some of the columns in a DGV to specific widths. What I am looking for is to line the columns up with the labels above them. I am trying to do it like this(the numbers are just for testing):
Me.DataGridView1.DataSource = dsForm.Tables(0)
' column 6
Me.DataGridView1.Columns(6).Width = 100
[Code].....
what I might have to change in the properties of the DGV for the code to set the widths, I've changed so many that I am not sure what the default settings are any more. Also the look of the form is not open to suggestion as this is what the customer wants.
I am using this code which I am checking with the form width size that if they are greater than 672, then do something....
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Me.Size.Width >= 672 Then
MessageBox.Show("the form size is greater than 672")
Else
[code]...
When the width size is no greater than 672, the messagebox will display that it says "the form size is greater than 672" which it sound didn't looks right for me. What I am trying to do is to check the width size that if they are greater than 672 then display the messagebox that says "the form size is greater than 672", otherwise if the width size is no greater than 672 which is equal, then display the messagebox that says "the form size is no greater than 672".
I have an integer array which contains the different col widths for an range of excel worksheet.when i use Range.ColumnWidth= ColWidths (Colwidths is the int array), it takes lot of time to do all the process (i.e opening excel , formatting range, setting values)But when i use Range.ColumnWidth = 15 then all the process is done in a flash.Why using an integer array takes time? I did even try replacing int array with string array, but same time taking result?
View 1 RepliesI want to get the width & height of the image file..Mine code is currently getting the file size, I also want to get the width & height.How to get width & height.
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
[code]....
I am trying to use a cross cursor and make it the width and height of the form without any luck. I read in a thread i may have to use a custom cursor, is this true? I have tried to re size the Cursors.Cross
[Code]...
I'm using the next class to fill my listview
Imports System.Data.SqlClient
Public Class ListViewData
Public Sub FillListView(ByRef MyListView As ListView, _
[code]....
I want all the listview columns to be in auto width. I tried adding the next line of code but then only my first column fills my entering listview width. All other columns are not affected!
lvwColumn.Width = -2
What I am trying to do is fill the contents of the datagridview with the cell contents. There are two ways to do this.
1) Either set the DGV width to the cell contents width, or
2) Autoadjust the width of the cells to the width of the DGV.
how to implement either of these two approaches?
This Winforms app has a toolStripComboBox within a MenuStrip container that displays Culture Info languages.The toolStripComboBox's width is not expanding to accommodate the size of the string. The strings are dynamically added to the combobox from underlying code. How do I get the comboboxe's width to expand? Below is an image of the'too narrow' combobox and below that the Properties for the combobox.
View 1 RepliesI am trying to create a textfile and write some lines into the textfile. However, the code that i am using can only write when the textfile is already created in the directory.
For this case, can i actually allow my script to search if a textfile is being created, if not create a textfile ???
Dim pathdir As String = "C:workingdir est.txt"
If System.IO.File.Exists(pathdir) = True Then
Dim objWriter As New StreamWriter(pathdir)
[code].....
In VB.NET for the combo box, I have set the autocomplete mode to "SuggestAppend" and autocomplete source to "ListItems". Its working as expected. But the width of the autosuggest dropdown box is not same as that of combo box and so it looks weird.I tried changing the value dropdown width property but it changes the value of normal dropdown box (seen after clicking down arrow on combobox), and not the autosuggest dropdown box.So what code or property needs to be set to make autosuggest dropdown box the same width as that of combobox width?
View 1 Replies