I am working with Vb.net 2005. I have used Crystal reports in some forms. The Crystal Report on the other hand use parameter field, therefore when you run the application an "enter parameter dialogue box" is loaded.
View 5 RepliesI have a function that allows a user to enter numeric vallues and also a period for the decimal points but I also want to allow for users to enter the minus sign to allow users to enter negative values . How would I go about it.
Public Function SingleDecimal(ByVal sender As System.Object, ByVal eChar As Char) As Boolean
Dim chkstr As String = "0123456789."
If chkstr.IndexOf(eChar) > -1 OrElse eChar = vbBack Then
If eChar = "." Then
[Code]...
Is it possible to make a procedure have a single parameter but the values for that parameter are more than one? I have this procedure:
Public Sub autoComplete(ByVal cboCombo As ComboBox)
With cboCombo
.AutoCompleteMode = AutoCompleteMode.Append[code]....
Now I was wondering if there is a way to use it like this:
autoComplete(myCombobox1, myCombobox2, myCombobox3)
Or can I use a procedure like this with 'With...End With'?
I'm trying to assign some parameters for a stored procedure with some values that are stored in a data table. in the code, I can set the parameter values to the data table, and give a column header or index without issue, but when it tries to execute at runtime it bombs out.the error I get is a variation on "Failed to Convert Parameter Value from a DataColumn to a String" depending on exactly how I try to assign the value.the data types are all correct elsewhere in the code.
my code for this bit is
Try
ConnectionAttempt.Open()
Try
With NewYearCommand_Dates
[code]....
other things I've tried to get this to work are all variations on the .Value=dates bit, such as
.Value=dates(0) (so using column index)
.Value=dates.columns(0) (again using column index)
I've also tried declaring variables, and setting their values to the values in the columns, but the code returns an error saying that "Value of type 'System.Data.DataColumn' cannot be converted to string".I should point out that i'm doing this for 3 tables at once in this sub, 2 of them will only have a single row of data, but the third has an indeterminate number of rows.I'm afraid I don't know what else to do. I'm lead to believe by my mate and my lecturer that this should work, and of course it will work, but the evidence says otherwise.
I'm connection to a sql server 2005 database. I have a field called MapName which contains the following name for example:
SAMWON TEXTILE CO LTD
NO NOT USE
Notice the field contains an enter character.Now in my vb code I have the following
Dim SupplierCommand As New SqlCommand("SELECT OurID FROM [Mapping] WHERE (MapName=@SupplierName) AND (OrgId=" & CustomerId & ") AND (Active=1);", con)
SupplierCommand.Parameters.AddWithValue("@SupplierName", f_supplier)
'con.Open()
[code]....
where the @SupplierName parameter would be:
SAMWON TEXTILE CO LTD
NO NOT USE
exactly the same as my database field.But for some reason this query fails because of the enter characters.
I'm connection to a sql server 2005 database. I have a field called MapName which contains the following name for example:SAMWON TEXTILE CO LTDNO NOT USENotice the field contains an enter character.Now in my vb code I have the following
Dim SupplierCommand As New SqlCommand("SELECT OurID FROM [Mapping] WHERE (MapName=@SupplierName) AND (OrgId=" & CustomerId & ") AND (Active=1);", con)
SupplierCommand.Parameters.AddWithValue("@SupplierName", f_supplier)
[code].....
My text file lines look like this
------------------------------------------------------------------------------
AGILENT 3070 FIXTURE WIRING REPORT Sat Mar 07, 2009 06:43:05 PM
/var/hp3070/boards/Celestica/wbf303/fixture/wires
------------------------------------------------------------------------------
Fixture Type : Agilent SimPlate Express
[code]....
but this line Dim Iend As Integer = line.IndexOf(")", Istart) give me error
"Index was out of range. Must be non-negative and less than the size of the collection. Parameter name: startIndex"
I am writing a program that basically "encrypts" any text file you put into it. All of my code works perfectly, but I need to know how to replace Enter and Tab values..How do you do this?I tried doing:
s2 = s2.Replace("(Chr(10), "{123}")
But that doesn't work.
I have a datagridview with 2 columns.What i want is to enter numeric values into 2-nd column and to have the sum of this value in the last row (no matter how many values aka rows i will have). And also how can i have the last row fixed considering further actions.
View 10 RepliesI have a datagridview with 2 columns.What i want is to enter numeric values into 2-nd column and to have the sum of this value in the last row (no matter how many values aka rows i will have). And also how can i have the last row fixed considering further actions.
View 3 RepliesI'm using the combo box control in VB.It is not bound to a data source.Visual Studio gave me a text box to enter the values for the combo box.When I run the program, there is a blank value?How do I eliminate this blank (or null) combo value? My combo box is a required field.
For example I entered
Option 1
Option 2
Option 3
When the program is ran, the combo box has <blank> (which is selected) Option 1
[Code]...
accessing values using ODS. i have no idea how to make this work.
im using ASP.NET VB code.
Imports Microsoft.VisualBasic.FileIO
Imports IP2V2.DataAccess
Public Class LotIDParameterDAL
[Code]....
I am making a program that uses the datagridview control for making the sales invoice and I want to add direct values from textbox control to datagridview. But the problem is I am not getting the row, col index properly and if I use:
dgv.item(0,dgv.rowcount -1).value=textbox1.text
Then the value goes to the 1st col and 1st row. When I use dgv.rows.add() then value goes down to last row of the dgv control.
Dim number = TextBox1.Text
If number < 1 Or number > 100 Then
MessageBox.Show("You must enter a value between 1 and 100", "Name Entry Error", _
MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Exit Sub
End If
Whenever I enter anything other than a numeric value; the form crashes.
I've almost accomplished getting method parameter name and values. [code] I'm using using vb.net 2005 /Vista/Microsoft Script Control 1.0
View 1 RepliesI am sending values from Combobox and Textbox to Access Database in VB.NET.I am phasing the problem when i enter the Duplicate values.In the database one of the column is Indexed.(Yes Duplicates not allow)That column i bind to Textbox("txtperson1").I used the TRY and Catche method to solve the Indexed Problem.when i run the application the value which i enter is not a duplicate that value save on the db. Once i enter the Duplicate value , the message box is showing "The Record alread saved".But After i enter the new value the same message is displaying, it is not saving on the db.
[Code]...
I am new in programming. And I am coding with VB.Net (VB2008). On my form I have 9 checkboxes. And each of this checkbox when checked is meant to submit a value to a dynamic array. Initially the array was a constant that was declared like these:
Dim Notes() AS integer = {1, 2, 5, 10, 20, 50, 100, 200, 500, 1000}
But I want the array to be dynamic. That is the user of the program is to enter the element of the array. So I decided to use checkboxes. So that if the user of the program checks any of the checkboxes, a particular value or element should be submitted into the array. And the user should be able to check as many checkboxes and have values representing those checkboxes submitted in to the array.
For example: if the user check checkbox1, checkbox2 and checkbox50.
The array should look like these. { 1, 2, 50 }
or if the user check checkbox1000, checkbox200, checkbox10 and checkbox500
Then the array should hold or contain the following integers in this order; {20, 200, 500, 1000}.
That is the array is dynamic and the content/elements of the array and the bound of the array should depend on the checkboxes that is checked. What other means can I used to enter values/elements into a dynamic array during run time.
I have a RDCL Report called Report1.RDCL.In this report I put an image box named logo the select image Source is set to EXTERNAL and in the use this image I have Parameters!LogoPath.Value.
View 2 RepliesI have a question on a datagrid object in vb.net 2008, that I what to be populated with certain values of a parameter from mssql database. The connection is made, the column header are loaded, but I what, when the form is loaded, to populate the datagrid only with certain values, doing a select commnad where id has a value given by me.What is the command to have this select done and display the values in the datagrid?
View 3 RepliesI would like to pass to values to a stored procedure. I am using a sqlreader to populate a excel sheet. I need the user to be able to select a range, rather that the whole table.
Dim strSQL As String = "sp_im_select_customerdtl"
Dim data As String = ""
sqlCon.Open()
[Code].....
i'm trying to do a filename compare, sort of fuzzy match.Here's what code i have.First of all i load 2 directory's into 2 listbox's as strings and remove the filepath. Directory1
Code:
TextBox1.Text = FolderBrowserDialog1.SelectedPath
If TextBox1.Text = "" Then
Else
Then when i click the compare button i am trying to pass listbox1 and listbox2 through Distance and return the resulting fuzzy file matches.
Code:
Dim MyObject As New StringSift2
Dim ReturnVal As Single
ReturnVal = MyObject.Distance(ListBox1.SelectedItem, ListBox2.SelectedItem)
[code]....
But i get this error.
Code:
TreeView1.Nodes(lb1).Nodes.Add(ReturnVal.ToString())Specified argument was out of the range of valid values. Parameter name: index
In this report I put an image box named logo the select image Source is set to EXTERNAL and in the use this image I have Parameters!LogoPath.Value.I would like the users to be able to pick their own logo.
View 1 Repliespassing multiple values in a parameter field in crystal report viewer, I already set it to allow multiple values. When the code below executed it only displays the last record and not all of the records that appeared. here's my codereally need this one! Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
dt = New DataTable
sda = New SqlDataAdapter("SELECT * FROM KEMPMASTER", sqlcon)
[code].....
My code below will save records to my database as long as all the parameter have values. One of the parameter is @MI (middle initial), however, there are times that student have no middle initial so when I click my button I get error. I want to still save the record even if one of the parameter value is missing.
[code]...
Getting error filling grid view from reading through data table:
Dim myDataTable As DataTable = myDataSet.Tables("SunTrust")
Dim myRow As DataRow
Dim i As Integer = 1
Try
[code]....
Error:Index was out of range. Must be non-negative and less than the size of the collection.Parameter name: index
I am using Sub to format datagridview but during Form_Load this error occur. There are rows in datasource and dg.row.count is > 0.
.Columns(0).Width = 50 <==== ERROR HERE
.Columns(1).Width = 150
.Columns(2).Width = 80
.Columns(0).HeaderText = "ID"
[code].....
What im trying to do is send vars to a flash file.The following is my code:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim oTitle As New ArrayList
Dim oSub As New ArrayList
Dim oRate As New ArrayList
[code]....
What I'm expecting the output to display is something like "t1=value&s1=value&r1=rate&t2=value&s2=value&r2=rat&t3=value&s3=value&r3=rat" But... i keep getting this exception: index was out of range. must be non negative and less than the size of the collection. Parameter name: INDEX.
I have a datagridview, with 3 columns, each containing dropdown filters (in the column header). Of the 3 columns, 2 are working perfectly fine, but whenever I try to filter the 3rd column, it gives me this error: (Also all of the column's have the ColumnType property set to: DataGridViewAutoFilterTextBoxColumn) "Index was out of range. Must be non-negative and less than size of the collection. Parameter name: index." The error points to the part that begins with "If dgv1.Rows(e.RowIndex)..."
Private Sub dgvWPS_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles dgv1.CellFormatting
If e.ColumnIndex = 1 Then
[code]....
i am trying to get the value into the cur_stock where item_id = datagrdiview.curentcell.value.I am lookin out for the solution since couple of days, but couldnt figure it out.Well, m trying to make this work on CellMouse click event
Below is my vb.net code:
Private Sub DataGridView_stockout_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView_stockout.CellMouseClick
Dim i As Integer = Stock_checkDataSet1.Tables(0).Rows.Count - 1
[code]....
I am currently working on a program, that you enter certain values/text in and it organises it into a word document automatically,
I found a code online, which has worked a treat, However I'm wondering what lines of code I would need to:
1. Add Bullets or Numbers
2. Add a new line of text (I can add a new paragraph but I don't want a huge space between the two lines)
3. I have around 20 check box's is there a quicker way to check which are selected then write the text in word or do I have to write alot of If Checkbox1.Checked = True then, etc)