|
You could try using DoEvents in the loop.
This might be simpler than using BackGroundWorker but not as resposive.
See 'My.Application.DoEvents Method' in VB help.
Regards
David R
|
|
|
|
|
that is bad practice, a waste of CPU cycles and potentially dangerous.
Any work that takes or may take more than say 30 msec should be handled by another thread, which could be from a ThreadPool, a BackgroundWorker, whatever.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
DoEvents is the kiddie-size method of handling this problem. It also introduces adult-size problems if not handled correctly.
|
|
|
|
|
Hello Everyone
i have made a project of stock control. This is the coding for my save records command button. this is a presence check for the four text boxes which have different range
If Text3 = "" Or Text4 = "" Or Text5 = "" Or Text6 = "" Then
MsgBox "Please Fill in the required fields", vbInformation, "Presence Error"
Else
Adodc1.Recordset.Save
MsgBox "Record has been saved"
End If
the problem is that i want a different msg box message for each text box. how can i do that? 
please help me!
ST
|
|
|
|
|
Multiple If statements, one for each TextBox maybe??
|
|
|
|
|
Something like this...
If text3="" Then
MsgBox "Enter value for textbox3"
Else If text4="" Then
MsgBox "Enter value for textbox4"
Else If text5="" Then
MsgBox "Enter value for textbox5"
Else If text6="" Then
MsgBox "Enter value for textbox6"
Else
Adodc1.Recordset.Save
MsgBox "Record has been saved"
End If
|
|
|
|
|
This is giving a compile error
Thanks for the help!
regards
ST
|
|
|
|
|
Its not that hard to figure it out!
Where it says text3="" you just need to type text3.text=""!
Lloyd J. Atkinson
I used Vista the other day. It was also the last time I will ever voluntarily use the damn thing. I would rather use Windows 1.0 just because it dosent literally chew the RAM just to draw pretty colours.
|
|
|
|
|
You can use the System.Windows.Forms.ErrorProvider to do this.
Or you could deal with them one at a time by having:
If Text3 = "" Then
MsgBox "Please Fill in the Text3 field", vbInformation, "Presence Error"
ElseIf Text4 = "" Then
MsgBox "Please Fill in the Text4 field", vbInformation, "Presence Error"
ElseIf Text5 = "" Then
MsgBox "Please Fill in the Text5 field", vbInformation, "Presence Error"
ElseIf Text6 = "" Then
MsgBox "Please Fill in the Text6 field", vbInformation, "Presence Error"
Else
Adodc1.Recordset.Save
MsgBox "Record has been saved"
End If
If you do the latter, then the user could be faced with four message boxes.
By the way, I think you should use MessageBox.Show() rather tham MsgBox - see the How to: Display Message Boxes topic in VB help.
Regards
David R
|
|
|
|
|
Thanks for the help.
It works fine
Regards
ST
|
|
|
|
|
You're welcome.
I assume you used the nested Ifs - I think it's worth looking at the ErrorProvider when you get a chance. It's really very flexible and makes it simple to do multi-field validations that would need complex code.
Regards
David R
|
|
|
|
|
Postscript to my previous reply.
Look up 'ErrorProvider Component' in VB help to see how it can be used.
Regards
David R
|
|
|
|
|
Why wont the following code give me any results, is 'said' a preserved word?
SELECT id FROM [table] where Contains ([fulltextcolumn], 'FORMSOF(INFLECTIONAL,aa) and FORMSOF(INFLECTIONAL,Said ) and FORMSOF(INFLECTIONAL,advocate)’;
while
SELECT id FROM [table] where Contains ([fulltextcolumn], 'FORMSOF(INFLECTIONAL,aa) and FORMSOF(INFLECTIONAL,bldg ) and FORMSOF(INFLECTIONAL,advocate)’;
Gives me the desired Results
Any thing am ready
|
|
|
|
|
You'll have to ask in the General Database forum. What you asked has nothing to do with VB.NET, so the level of expertise doesn't center around SQL in here.
|
|
|
|
|
SQL books is your friend. If it is, wrap said in [] like [Said]
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
Hello all, I have a problem here need someone to help here.
I'm doing a searching function from the database which is using MySQL5.0. A textbox(textbox2) is used for the user to search data by clicking the search button(Button1). The search return result will be display using a DataGridView1.
Well,when I search for the 1st time,it runs well with the result expected show at DataGridView1. But when I search for the second time,the result display is out of alliengment. It grows at a new row but shown on column2 and column3.It should be at column1 and column2.And beside that,the previous data is shown at the datagridview as well.
After test the above scenarios,I also found that after I search a data which is not inside the datatable.And try to search for something that available with result,the datagridview only display me the header of the column1 and column2 but no result.
I have try about 2hrs to find this solution,but I can't figure out how to solve this. I paste the search button code below,anyone can give me some solution? Sorry,please feel free to ask. I know its difficult to understand my poor english.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As String
Try
If Trim(TextBox2.Text) <> "" Then
x = TextBox2.Text.ToUpper
SQL = "SELECT Comp_Code,Comp_Name FROM company_detail WHERE Comp_Name LIKE '" & x & "%'"
ObjComm = New MySqlCommand(SQL, ObjMyConn)
ObjMyConn.Open()
ObjRead = ObjComm.ExecuteReader
If ObjRead.Read Then
ObjRead.Close()
DataGridView1.DataSource = Nothing
ObjAdapter = New MySqlDataAdapter(SQL, ObjMyConn)
ObjAdapter.Fill(ds, "Client_Comp")
dt = ds.Tables("Client_Comp")
dt.Columns(0).ColumnName = "Company Code"
dt.Columns(1).ColumnName = "Company Name"
DataGridView1.DataSource = dt.DataSet.Tables("Client_Comp")
DataGridView1.Refresh()
TextBox2.Clear()
Else
dt.DataSet.Tables("Client_Comp").Reset()
DataGridView1.DataSource = Nothing
MessageBox.Show("No such company stored.")
TextBox2.Clear()
End If
Else
MessageBox.Show("Please insert a search text into company column")
dt.DataSet.Tables("Client_Comp").Reset()
DataGridView1.DataSource = Nothing
DataGridView1.Refresh()
End If
ObjMyConn.Close()
Catch ex As Exception
MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OkOnly)
Finally
ObjMyConn.Close()
End Try
End Sub
|
|
|
|
|
Your code makes no sense in certain sections.
SQL = "SELECT Comp_Code,Comp_Name FROM company_detail WHERE Comp_Name LIKE '" & x & "%'"
ObjComm = New MySqlCommand(SQL, ObjMyConn)
ObjMyConn.Open()
ObjRead = ObjComm.ExecuteReader
If ObjRead.Read Then
ObjRead.Close()
DataGridView1.DataSource = Nothing
You open a reader on a returned set, but if there is a result, you close the read immediately?? Then execute the same SQL to fill a dataset?? That's completely unnecessary. Just execute a fill on the DataSet, then bind the DataGridView to it. There's no need to check if something came back first.
|
|
|
|
|
Hello Mr Dave Kreskowiak, so happy someone help me to check about this.
Actually the reason why I did that is just to check the search data is available or not on the database. If its not available,I would not fill anything into the dataset and go into dataable anymore. Do you have any idea about what happen to the datagridview1? The result display at the datagridview1 is weird.
|
|
|
|
|
drexler_kk wrote: Actually the reason why I did that is just to check the search data is available or not on the database
This puts twice the load on the database. Just do it once and fill your DataTable. If the record Count in that table is greater than 0, you've got results.
Your setting up columns in the DGV on each pass of this search. You should only do it once, then forget about it since the columns in the DGV will not change.
|
|
|
|
|
You're doing multiple calls to the database which slays performance and is unnecessary (like the bank bailouts - zing!). Do the fill on the dataset and bind it. If there's any data, it'll be displayed.
If you want to check for the existence of data, check the dataset after the fill like so:
if dataset.tables(0).rows.count > 0 then
'we have data - hurray for us.
else
'wtf happened, there's nothing here.
end if
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
Thanks Jon_Boy and Mr. Dave for the help. I have solve the problem here by changing what you recommend to me. It work well now.
|
|
|
|
|
When i resize tablelayoutpanel dynamically i want set rows and columns according to the resizing..
|
|
|
|
|
Use the Anchor property of the TableLayout panel to anchor the control to the sides of the form it's on, then set the column and row properties to either a percentage of the available space or specific valkues in pixels.
|
|
|
|
|
Hi friends,
Is there any way to reset or repower USB port,so that there is no need for repluging of device frequently to reset it.THanks in advance.
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
