I want some of my datagridview column just accept some characters only. For example I want the column(2) which is hold barcode will accept char
"0123456789-" I used productdatagridview keypress_event, but not working, here is my code:
If ProductDataGridView.Columns.IndexOf(ProductDataGridView.Columns("barcode"))
Then
[code].....
I am using VB.Net 2005. I have MS-Office 2000 installed in my PC. After exporting to CSV from the application, I am unable to see special characters like ú, çã í, etc. I have used the following Code :
Public Sub CreateCSVfile(ByVal dtable As DataTable, ByVal strFilePath As String)
Dim sw As New StreamWriter(strFilePath, False)
Dim icolcount As Integer = dtable.Columns.Count
For i As Integer = 0 To icolcount - 1
[code]....
Is their anyway to have the inputbox function reflect a password character while typing in a value instead of regular characters?
View 16 RepliesWhy does the cell text show up with �square� characters where they should be extra space?
How to remove that square characters in datagridview?
Is there a way to allow the user to only type in a certain number of characters in a datagridview column? Like a invoice number can only be 1-6 digits long and I want to stop them from typing more than 6 digits.
View 7 RepliesI have the following query:
SELECT Inventory.Inventory_Id, Inventory.Inventory_description, Inventory.Inventory_stock_count, nz((SELECT Sum(Order.item_qty) AS SumOfitem_qty
FROM [Order]
WHERE Order.From_date<=Date() AND (Order.To_date)>=Date()
AND Order.Item_ID='I' & Inventory.Inventory_Id),0) AS CurrentlyOut, [Inventory_stock_count]-Nz((SELECT Sum(Order.item_qty) AS SumOfitem_qty
[Code]...
I have built an addin for outlook that has a usercontrol shimmed into the interface. Everything works wonderfully EXCEPT for one textbox on one subpanel of the control. I have tried everything I can think of, but have not been able to resolve the issue:
The textbox *(A regular System.Windows.Forms.Textbox) functions as you would expect in any application with one exception. It will NOT accept the backspace key. So much so that the KeyDown, KeyPress, KeyUp events will not even fire when I press the backspace key. There does not seem to be any parameter suppressing it, and the control has focus. What is even stranger is that it works completely fine if you hold down the shift key while pressing the backspace key.
[code]...
In DGV, if the contents of the cell is truncated, the DGV shows ellipses (three dots) (...); but as the font is set to a Gujarati font, it displays a Gujarati alphabet "ઈઈઈ" instead of "..." because the Gujarati character "ઈ" is coded with the English "." (dot) character.In Gujarati font, "." can be generated with the English character "P".So, How can I change the ellipses to English "P" character? OR How can I remove the ellipses completely?I have found a similar solution by berc on Tuesday, August 31, 2010 1:33 PM :but I am not sure it is the perfect and/or the only way to do so, AND it will really work or not
View 2 RepliesIm currently diving into jquery autocomplete for the first time. To start off with, I had a .net handler calling out to a mssql db and pulling last names. That worked great.However when I try to add additional values it simply doesnt work. The code being used in the handler is as follows.
Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest
Dim prefixText As String = context.Request.QueryString("term")
Dim conn As SqlConnection = New SqlConnection
[code]....
I didnt include the IsReusable when posting, but that is there. why it doesnt like multiple values but will display one lone value?
** Edit ** I just looked in Firebug and it is getting a response but just not displaying it. My implementation of this is pretty simple so far, nothing to fancy.
$(function() {
$('#lastName').autocomplete
({
[code]....
I've placed this on a VB2008 project but it's telling me adNumeric,adVarChar & adBoolean are not declared, I'm assuming I need to "DIM" them, but what as? plus I need each field to accept NULL values, how do I do this? Also I'd like to add a field for accepting images.
Code:
Dim cat As New Catalog()
Dim col1 As New ADOX.Column
Dim col2 As New ADOX.Column
Dim col3 As New ADOX.Column
[code]....
I am creating an update program to go inside of another program I am designing, and I was curious as of how to download the new (updated file) from the internet. Here is the code I have so far.
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
[Code]....
How to prevent textbox to be not accepting numbers in first
5 digits
Only characters in first 5 digits and other digits accept
numbers and characters
Ok so I have been working on this code for awhile now and it is a huge mess. At the moment I have a problem that if the code is left for a time it will not accept any more connections on the server. I know that it is not accepting any as it is talking to a PLC and I can see that the TCP connection fails. If, however, the PLC transmits to it all the time it does not have a problem. The PLC connects -> Transmit -> Disconnect.I have tried the connection through a switch and via a direct connection. This time I am going to attach the entire code but the main part that you want to look at is the TCP on the main page. I am attaching it all in case there is something else in the code that could be causing the issues
View 2 RepliesI want to pass the address of a sub as a callback to another method. From what I can find, a function is passed using the format:
Public Sub test(ByRef callback as Func(ArgClass, ReturnClass))
The thing is, as mentioned, I don't want to pass it a function but a sub. There doesn't seem to be an equivalent class Sub which will stand in place of Func, and it won't allow me to set the return class as nothing, so I'm somewhat stumped. How should this problem be solved?
I can't get this to work..
vb.net
Private Sub UpdateLVItems(ByVal Index() As String)
lvDrives.Items.Add(Index(1))
lvDrives.Items.Item(Index(0)).SubItems.Add(Index(2))
lvDrives.Items.Item(Index(0)).Tag = Index(1)
End Sub
[Code]...
I'm having a problem implementing Scott G's Dynamic.vb extension at [URL] in my vb solution. I've searched StackOverflow (80+ Q&As) and numerous other sites without much luck. I'm using VS 2010.I've included Dynamic.vb in a problem with no root namespace, and then added a reference to that project in my main one. I'm getting intellisense for 4 overloads (rather than 2) so I'm pretty certain that the extension is in scope.I was having a tough time with clauses, especially the OrderBy as Scott demonstrated. If I simply pass a string as Scott's VB example did I get the error "Overload resolution failed because no accessible 'OrderBy' can be called with these arguments."
The line of code is:
Dim FilteredComponentList = From Component As MX.Component In ComponentList.AsQueryable _
.OrderBy("Name")
So I found other references that stated to pass a Lambda expression. So I tried this and at least I get no error, even if the sort function still doesn't seem to work. Here is the code that compiles and executes.
Private Sub SortByColumn()
If Not cmbComponentFilter.SelectedItem.ToString = "All" Then
Dim FilteredComponentList = From Component As MX.Component In ComponentList.AsQueryable _
[code]....
When I interrogate the dgvComponents.Columns(e.ColumnIndex).Name it gives the objects property I wish to sort by, but the sort still isn't working. I'm concerned why I can't get Scott's implementation to work, but I've heard his keynotes and read his blogs, so I'm guessing the problem lies with my implementation.
I'd like either to work but need to understand why as well. Why doesn't passing a string work? Isn't the PARAMARRAY declared in the function optional?
I've found plenty of examples of accepting numbers only in a text box, but the code won't allow decimal points. This is crucial because I'm dealing with US currency.
01.' Force numbers only in a text box
02.' place this in the 'Keypress' event of a text box
03.
[Code]....
How can I change the IF statement to accept the ascii code of decimal points? Then... how can I make sure the user doesn't enter 354.5.3535.5.0 as a number? Is there some sort of built in library in VB that has a pattern matching for US currency or do I have to write it myself?
there is an textbox, an label and an button on my form. In the click event of the button i wrote label1.focus().ow when i click on the button the focus is being set to the label instead of the textbox, even though the tabindex of the textbox is 1 than compared to 0 of the lablel.
View 6 RepliesHow come this is not a valid DirectCast:
Public Sub FB(OF T0 As IGH_Goo, T1 As IGH_Goo) _
(ByVal A As DataTree(Of T0), _
ByVal B As DataTree(Of T1))
Dim val_A As T1 = DirectCast(A.FirstItem, T1)
End Sub
[Code]...
I'm running Microsoft Visual Basic 2010 Express on Windows 7, using a Regional Setting set to New Zealand.
When I enter a date in a NZ format (d/mm/yyyy), the IDE highlights the date and tooltip reports date constant not valid. But it is valid for NZ! Meanwhile, the IDE happily accepts dates in the US format.
I would have expected VB to look at my PCs regional settings and set this as the default format. What is wrong here? I have reinstalled the application, but still have the same problem.
I have a form, with lables and textboxes added at runtime. The labels and textboxes are added properly on form load and display as expected. The form allows tabing into each of the textboxes, but the textbox does not allow user input.
Is this a problem with the way I show the form to the user? >> this particular form is called (frmname.show) from a different form -- If I test this form directly, without being called from a different form, it allows user input in the textboxes. Is it because of the properties I used to create the textbox? >> properties used were - .name, .size, .location, .tag
I have a storedproc accepts parameters in XMLtype as
CREATE OR REPLACE PROCEDURE GetDetails(
p_para IN XMLTYPE,
i have to pass 4 parameters to this proc how to do this?
i am passing param as db.Parameters("p1", Oracle.DataAccess.Client.OracleDbType.Varchar2, _
' LN.Length, CObj(LN), Data.ParameterDirection.Input)
[code]....
I'm new to VB and I'm trying to get this app to recognize that a "C" is the same as "c" but for some reason its not recognizing it. Its seeing the lower case letters as 10%.
Here is the code I currently have...
Private Sub btnCalculate_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnCalculate.Click
Dim subtotal As Decimal = CDec(txtSubtotal.Text)
Dim discountPercent As Decimal
[Code] .....
I'm trying to implement a Web API project that exposes some models. However, the way the model is retrieved isn't very RESTful. 1.Instead of having just one ID, it has a combination of 4 different ones to populate the model data by running a stored proc on the server.Dim balance as New BalanceSheet(uid, mid, eid, fid)The snippet above will use uid, mid, eid, fid to retrieve the correct record from the database.
View 1 RepliesI am having some issues with a parameterized SQL Lite query. I can't seem to get the SQL Lite Parameter to accept the String value
Using cmd As SQLiteCommand = pConn.CreateCommand()
If tblLang = "en" Then
cmd.CommandText = "UPDATE [AT_Strings] SET [Data] = @tblData + 1 WHERE [RecordID] = @ID AND [language] = @tblLang1"
Dim tblData As New SQLiteParameter("@tblData")
[code]....
The error is as follows....Unable to cast object of type 'System.String' to type 'System.Data.SQLite.SQLiteParameter'.Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.
Exception Details: System.InvalidCastException: Unable to cast object of type 'System.String' to type 'System.Data.SQLite.SQLiteParameter'.
Source Error:
Line 283: Dim ID As New SQLiteParameter("@ID")
Line 284: Dim tblLang1 As New SQLiteParameter("@tblLang1")
ERROR on Line 285...
Line 285: cmd.Parameters.Add(dataText)
Essentially I am trying to replicate the Windows 7 (In-Windows) activation key TextBox form. The Form where it will auto capitalize letters, remove or deny all non alphanumeric characters except dashes every 5 characters that will be auto-input.I assume this can be done with a fairly complicated replacement Regular Expression but I cannot seem to create one to fit the needs.
This is an Example of what I have right now, but it creates an infinite loop as it removes all characters including dashes, than adds a dash, which changes the text and removes the dash again.
[Code]...
i have been trying to remove special characters. i am not able to remove many crlf in middile of the string.
View 3 RepliesI need to create a console program that allows you to enter a string, of which is then outputted in reverse.
Sample:
Input: Diewas
Output: saweiD
Apparently I need to find out about strings and will also need to use a loop.
Not sure if too many people know this, but the following line will cause an error:
GroupName.Substring(0, 3) = "jt_"
....if the length of GroupName is less than 3 characters. I always thought it would simply return whatever characters in GroupName, but no, it errors. I must be thinking of the old VB6 days.So, I now have to change the code to:
If (GroupName.Length > 2) Then
If (GroupName.Substring(0, 3) = "jt_") Then
Note that the two comparisons need to be on separate lines. If they are on the same line, such as:
If (GroupName.Length > 2) and (GroupName.Substring(0, 3) = "jt_") Then then the code will still fail as the length command is executed at the same time as the substring command- which will cause the error when the GroupName length is less than 3.Just thought that those of us not aware of this should be!
dp.SyntaxHighlighter.ClipboardSwf = '/dp.SyntaxHighlighter/Scripts/clipboard.swf'
dp.SyntaxHighlighter.HighlightAll('9844f9bfb55449e6a786fa62aaadfa20')
dp.SyntaxHighlighter.HighlightAll('f6d554fd98464bdba9159b319e51b381')
dp.SyntaxHighlighter.HighlightAll('93bf4ca63ad8447abdf084d8a9991e15')
I have two textboxes. I type in one of them and the text gets copied in real time into another textbox. There is one catch. I need to replace specific character with something else.
If I enter a quote " in textbox1, it has to be replaced with " in textbox2.
I started with something like the below code, but obviously this does not work (tried different stuff - this is for demonstration only). In the example below 'a' represents " , and 'b' represents "
Private Sub TextBox1_KeyUp(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.KeyUp
TextBox2.Text = TextBox1.Text
[Code]....