How do I set delay between code?

Visual Basic Language

‹ Visual Basic
- Archive
  - VB
  - SQL Server
  - Windows Forms
  - IE
  - VS 2008
  - Dotnet
  - VS Express
  - Windows Live
  - Smart Device
  - Visual C#
  - Architecture
  - Game
  - Windows Vista
  - Visual Studio
  - Office
  - ISV
  - VC++
  - SharePoint
  - VFP

- Previous
  - 1
    - Com Object Failing on server.createobject You want to create the object the second way, as you thought. Everything looks good. You probably have a security problem, this webpage might help. Tag: How do I set delay between code?
  - 2
    - MouseWheel event not occuring on Panel or Label I believe the reason it doesn't fire the event is because the controls you mention never actually get focus, which is a requirement to fire that event. There are probably a few ways you can resolve this. One of the easier ones would be to track the mouse using the MouseEnter, MouseLeave, MouseMove events to hold a boolean variable as to whether or not you are moused over the given container. Something like this: Code Snippet Public Class Form1 Private _OverPanel As Boolean = False Private Sub Form1_MouseWheel( ByVal sender As Object , ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me .MouseWheel If _OverPanel Then Me .Text = "Panel Mouse Wheel" Else Me .Text = "Form Mouse Wheel" End If End Sub Private Sub Panel1_MouseLeave( ByVal sender As Object , ByVal e As System.EventArgs) Handles Panel1.MouseLeave _OverPanel = False End Sub Private Sub Panel1_MouseMove( ByVal sender As Object , ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseMove _OverPanel = True End Sub 'THIS IS JUST TO BE SAFE. SOMETIMES A FAST MOUSE MOVE WILL CAUSE THE MOUSELEAVE EVENT OF THE PANEL TO NOT FIRE Private Sub Form1_MouseMove( ByVal sender As Object , ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me .MouseMove _OverPanel = False End Sub End Class Tag: How do I set delay between code?
  - 3
    - how: capture colour at cursor point? Is the clicking within your own .Net app, or clicking anywhere on the desktop. If within your own app, is it clicking on just the one control Anywhere on the desktop would involve a mousehook and a screengrap. Your own app involves handling the click event (use PointToClient with the event args, to work out where the click happened). Use DrawToBitmap to get an image of the control (unless there is a background image or something you are using as the palette). Use bitmap.getPixel to get the color. Tag: How do I set delay between code?
  - 4
    - Printing a File PrintDocument will use the default printer unless you tell it otherwise so there is no need to do anything on that. What type of file are you working with What does it contain How is it structured Richard Tag: How do I set delay between code?
  - 5
    - Save image from PicutreBox to database Reading and writing BLOB's ...... http://msdn2.microsoft.com/en-us/library/87z0hy49(VS.80).aspx http://msdn2.microsoft.com/en-us/library/4f5s1we0(VS.71).aspx The image would be Picturebox1.Image Tag: How do I set delay between code?
  - 6
    - textbox in date format in a form.... If you want a textbox that shows the current date + time when designing it, then you'll have to create a customized textbox - add this to your form1's code Tag: How do I set delay between code?
  - 7
    - What is the correct way to assign a default value to a cell in a datgridview upon addition? I think you're looking for the DefaultValuesNeeded event. From the online books: Private Sub dataGridView1_DefaultValuesNeeded( ByVal sender As Object , _ ByVal e As System.Windows.Forms.DataGridViewRowEventArgs) _ Handles dataGridView1.DefaultValuesNeeded With e.Row .Cells( "Region" ).Value = "WA" .Cells( "City" ).Value = "Redmond" .Cells( "PostalCode" ).Value = "98052-6399" .Cells( "Region" ).Value = "NA" .Cells( "Country" ).Value = "USA" .Cells( "CustomerID" ).Value = NewCustomerId() End With End Sub Tag: How do I set delay between code?
  - 8
    - prevent null exception from occurring Hi, Have you declared s AS a String or something Regards, S_DS Tag: How do I set delay between code?
  - 9
    - VS2005 without .NET Framework Hi, The definate answer is NO you can't sorry. The Frameworks are a FREE download anyway. See also>> http://forums.microsoft.com/MSDN/ShowPost.aspx PostID=1398161&SiteID=1 Regards, S_DS Tag: How do I set delay between code?
  - 10
    - not able to open vb6 app after installing sp2 This forum is for VB.NET (aka VB7 and up) Please read this to find where you can ask VB6 questions http://forums.microsoft.com/MSDN/ShowPost.aspx PostID=478161&SiteID=1 Tag: How do I set delay between code?
  - 11
    - Need Help with a System.Windows.Forms.BindingNavigator If you are using a binding navigator the you must be using a binding source class. If you click on your binding navigator control in design view, in properties window you can see the binding source which your binding navigator is connected to. What you want to do is: When binding navigators navigation buttons clicked (the current record of the underlying IList is chaged ), you want to check if the record is newly added or it is already saved. You can use the bindingSource.CurrentChanged event. Private Sub mBindingSource_CurrentChanged( ByVal sender As Object , ByVal e As System.EventArgs) Handles mBindingSource.CurrentChanged 'the current record is changed, End Sub In your case you use a datatable as the datasource. So the records which you want to navigate are actually datarows. Datarow class has RowState property which will be very usefull for you The Rowstate values and the meanings: Member name Description Added The row has been added to a DataRowCollection , and AcceptChanges has not been called. Deleted The row was deleted using the Delete method of the DataRow . Detached The row has been created but is not part of any DataRowCollection . A DataRow is in this state immediately after it has been created and before it is added to a collection, or if it has been removed from a collection. Modified The row has been modified and AcceptChanges has not been called. Unchanged The row has not changed since AcceptChanges was last called. So far, so good but how can you get the underlying dataRow and its rowstate it is simple Private Sub mBindingSource_CurrentChanged( ByVal sender As Object , ByVal e As System.EventArgs) Handles mBindingSource.CurrentChanged Dim mRowState As DataRowState = CType ( Me .mBindingSource.Current, DataRowView).Row.RowState 'Because your datasource is a datatable,you need to convert BindingSource.Current to DatarowView, 'then you can get the DatarowView.Row property and eventually the RowState of the datarow. If mRowState = DataRowState.Added Then 'Some codes ElseIf mRowState = DataRowState.Modified Then 'Some codes Else 'So onn End If End Sub I strongly advise you to read following articles Binding Source : http://msdn2.microsoft.com/en-us/library/system.windows.forms.bindingsource.aspx RowState : http://msdn2.microsoft.com/en-us/library/system.data.datarow.rowstate.aspx I hope it helps. Tag: How do I set delay between code?
  - 12
    - Polymorphism? How can you avoid "switch" statements? Hey man, Had a look and the Control base type that all windows controls inherit from and it does support the CreateGraphics methods. Instead of passing a type of object pass a type of System.Windows.Forms.Control instead and thats all the GUI controls covered. With the case statement, if you draw differently on different controls then I can't see how you can avoid the case statement. You need some way to say if it's a picture box draw this and if it's a panel then draw this instead. There are maybe techniques to make it smarter but no matter what way you do it there has to be a case statement. You could pass another object into the method that helps the program decide, for example, for a panel you create your graphics object from the panel itself from an picture box you create your graphics from the image. You could pass additional information like the picture boxes image to an overloaded version of your method. Still think case statement is needed though. I wouldn't use a try block. If you do that then your making a decision on an exception and that can be quite expensive. When an exception is created the runtime has to walk the call stack. Hope that proves useful Tag: How do I set delay between code?
  - 13
    - Writing a plug-inable application in .net 2 I don't think you need to do anything particularly difficult. Just add a project to your solution which exposes some public classes with the required function calls... Tag: How do I set delay between code?
  - 14
    - Now() returns value that is not the same in VB.Net as it was in VB6? What type of data was mLastUpdate. A String or DateTime or whatever I also hope your DAO works on non-development systems. I had all sorts of problems getting it to work and ended up rewriting code to use ADO Classic (relatively easy) and ADO.NET instead. Tag: How do I set delay between code?
  - 15
    - Storing values from a file permanently so that the file is not necessary once compiled RJBriscoe wrote: I need to read through a file and assign values from the file into an array that stores the values permanently once the program is compiled. I am creating a program that will have multiple users and I don't want to send an accessory file each time I send the program out. I could hardcode the values into an array, but that would be a lot of time and lots of lines of code. Below is a shortened version of the file format: A B C 1 1 0 1 2 0 1 3 0 1 4 0 1 5 0 1 6 1 2 1 0 2 2 0 2 3 0 2 4 1 2 5 0 2 6 0 The array would be categorically dimensioned as Array(A,B,C), true dimensions of Array(0 to 1, 0 to 5, 0 to 1). If the value of column C is 1 then 1 is stored in the array at the corresponding location , otherwise 0 is stored . Once I have read through the file, I need to store this data permanently so that the next user doesn't need this file. Anyone have any ideas on how to do this If I can't do this with an array, are there any other options Thanks for any suggestions Hi, With 0 to 1 , 0 to 5 , 0 to 1 you have 2 * 6 * 2 = 24 distinct variations; 0,0,0 0,0,1 1,0,0 1,0,1 0,1,0 0,2,0 0,3,0 0,4,0 0,5,0 0,1,1 0,2,1 0,3,1 0,4,1 0,5,1 1,1,0 1,2,0 1,3,0 1,4,0 1,5,0 1,1,1 1,2,1 1,3,1 1,4,1 1,5,1 I wouldn't say 24 separate variations is a lot myself. If you had a 100 or more then yes i'd say you have a lot. The only two methods of "permanent storage", as you put it, are writing and reading the values from a file or " hard-coding " these 24 variations into your application - program - solution - project, as far as i know . It would not take lots of lines of code to put these values into an array. >> Code Snippet Dim a, b, c As Integer Dim myArray(1, 5, 1) As Integer Private Sub Form1_Load( ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase .Load For a = 0 To 1 For b = 0 To 5 For c = 0 To 1 If c = 1 Then myArray(a, b, c) = 1 Else myArray(a, b, c) = 0 End If Next c Next b Next a End Sub 'Done, easy eh ' I've done it as above so you can use the ' values in other Functions or Subs ( subroutines ). Regards, S_DS Tag: How do I set delay between code?
  - 16
    - how to execute form ? There are several ways to do this, depending on what you want to do. Here are 3 simple ones. If you just want to change your start up form, change the "Startup Form" setting in your application settings. The form you select will be the one used. If you want to offer a choice using a command line parameter, use the Application Events. Click on "View Application Events" button on your My Project|Applications tab to create the Partial class. Then add code to MyApplication_Startup to parse the command line and show the desired form. You probably should also set the Shutdown mode to "When Last Form closes" in this scenario. You could also create a switchboard form that would load your "application" forms and, when the selected form was closed, cycle back to the switchboard form. This requires a little more coding but isn't anything that difficult to do. Tag: How do I set delay between code?
- Next
  - 1
    - XP/Vista ADOX References You can do it in the ODBC way. Use SQLConfigDataSource to create your databases , and execute Create Table statements Tag: How do I set delay between code?
  - 2
    - Unexpected results from PrintDocument1 PrintPage event Public Class Form1 Dim CurrentPage As Integer = 1 Private Sub Button1_Click( ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click PrintDocument1.DefaultPageSettings.Landscape = False 'portrait mode ' PrintDocument1.Print() 'begin print ' Use a print preview while debugging, to save time and paper ' Next line can be set in the IDE PrintPreviewDialog1.Document = PrintDocument1 PrintPreviewDialog1.ShowDialog() End Sub Private Sub PrintDocument1_PrintPage( ByVal sender As Object , _ ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage Dim nFont As New System.Drawing.Font( "Arial" , 12, FontStyle.Regular) If CurrentPage = 1 Then e.Graphics.DrawString( "Printed on page 1" , nFont, Brushes.Black, 250, 400) CurrentPage += 1 e.HasMorePages = True Exit Sub Else e.Graphics.DrawString( "Printed on page 2" , nFont, Brushes.Black, 250, 600) e.HasMorePages = False ' Reset any and all logic values that your PrintPage will use here!!!! ' If the print button in print preview is pressed, the printpage ' code is run again from the beginning. (The print controller changes ' from 'preview' to 'print' behind the scenes. CurrentPage = 1 End If ' e.HasMorePages is used to call the sub again or not ' and is only used when 'end sub' is reached. End Sub End Class Tag: How do I set delay between code?
  - 3
    - Array Help What error are you getting Is the value of 'counter' between 0 and 10000 Your code snipit should work in principle... Instead of an array though, you should at least use an ArrayList if you want it to by dynamic and if you're working in .NET 2.0 you should use a System.Collections.Generic.List(Of T) to create a List(Of Class1) collection. Tag: How do I set delay between code?
  - 4
    - Trapping Mouse Clicks Sorry, but why reinvent the wheel Windows includes an onscreen keyboard... I'm no API guru, but can't you subscribe to the click event through the API, similar to how you hooked the window and textboxes Tag: How do I set delay between code?
  - 5
    - Delete row from datagridview view Hi, Try ending the Edit mode.>> Code Snippet 'You may have to begin and end edit mode DataGridView1.BeginEdit( True ) DataGridView1.EndEdit( True ) To delete a row use the Remove or RemoveAt method, you may have to use BeginEdit, as above, if the DataGridView is tied to a database. >>> Code Snippet Public Class Form1 'This highlighted line should be one line of code in your code window.>>>> Private Sub Form1_Load( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase .Load DataGridView1.Columns.Add( "Column1" , "Column1" ) DataGridView1.Columns.Add( "Column2" , "Column2" ) 'To add 3 rows. DataGridView1.Rows.Add(3) 'Remove the 2nd row down as 'row counting starts at zero. DataGridView1.Rows.RemoveAt(1) End Sub End Class Regards, S_DS Tag: How do I set delay between code?
  - 6
    - How to set the WMI Privilege on VB 2005? Hi, i wonder if you already solved it. I'm currently running in the same problem. Tag: How do I set delay between code?
  - 7
    - Run-time error 339: Component 'MSCOMM32.OCX' or one of its dependencies not correctly registerd: a file is missing or invalid. Hi, The file is normally in the C:\Windows\System32 folder. If you have a virus this may have affected that file or for some other reason the file is corrupt, turning off your PC incorrectly can do this. If you supply your email address i can email you a copy of the file or why don't you get it from a neighbours PC Alternatively if anyone at Microsoft reads this, then can you say which windows cd CAB file it is in and how to restore that file for this user please Regards, S_DS Tag: How do I set delay between code?
  - 8
    - Splitting Images One other thing I need to add is I need to split the TIF file from 1 multipage to many single page files. Tag: How do I set delay between code?
  - 9
    - TXT File to MS Access i think u can try by importing the text file into access or try the tools available to convert txt to access Tag: How do I set delay between code?
  - 10
    - Can I Create an enum on Runtime, or change Enum values or member Names ? Hi Dear, Runtime enum creation is not possible in .NET (According to my little bit knowledge about .NET)....... but this link can help you for alternative ways of dynamically enum genration. http://www.thescripts.com/forum/thread514597.html Regards Muhammad Akhtar Shiekh Tag: How do I set delay between code?
  - 11
    - Creating a view meter. You could align progress bars vertically in VB6, but it seems they've taken that out in the .NET version. The other option is to create a control that would do this. However, since it's probably been done a few times, I would check out www.planetsourcecode.com or something similar to see if someone has already done this. More then likely it has been done, and you don't have to re-invent the wheel. Dustin Tag: How do I set delay between code?
  - 12
    - Where is the Fill() method? hemo, The Fill() method of OLEDBDataAdapter can load data from the data ource into he DataSet. However, I can't find where you use the fill method. Otherwise, please try the InsertCommand of the OleDbDataAdapter. Tag: How do I set delay between code?
  - 13
    - populating an Access database using visual basic 2005 there are a few ways of doing this but the easiest way probably would be to use a datagridview and dataAdapters. the datagridview is a control which allows you to databind values to it, and you can view/delete/edit/add records to the control (similar type of layout as when you view a Table in MS Access) using a DataAdapter allows you to easily "fill" a dataset with the query given and being able to allow you to also update the datasource (database). There are many topics about this on these forums, if you do a forum search you will find some hits and a good few examples :-) Typical example: we have an MS Access database/file. We want to get all the records from a specific table and show it to the user. import the System.Data.OleDb namespace at the top of your class file: imports System.Data.OleDb drag and drop a datagridview on the form in designer view. Change the properties of it if you like to whatever you need it to be changed to. next up, say if we have a button which goes and "fetches" the records, we need to code on how to do this. So, there are a couple of things that need to be done. Create an OleDbCommand and OleDbDataAdapter as well as the dataset (which contains our records) globally so you can access these from any where within the current class: Dim theOleDbCommand as new OleDbCommand() Dim theOleDbDataAdapter as new OleDbDataAdapter(theOleDbCommand) Dim theDataSet as new DataSet() Now, double click on the button to create a button click event so on this we would code on retrieving the records. The code would look something like this: Me .theOleDbCommand = new OleDbCommand(" SELECT * FROM table ", new OleDbConnection( ConnectionString )) Me .theOleDbDataAdapter = new OleDbDataAdapter( Me .theOleDbCommand) Me .theDataSet = new DataSet() Me .theOleDbCommand.Connection.Open() Me .theOleDbDataAdapter.Fill( Me .theDataSet) Me .theOleDbCommand.Connection.Close() Me .theDataGridView.DataSource = Me .theDataSet.Tables(0).DefaultView the connection string looks like this, but you need to modify it appropriately (Changing the path to the file for example) "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\somepath\mydb.mdb;User Id=;Password=;" So whats happening above is, we create a query (SELECT * FROM table) to be executed, we then create a dataAdapter (which does all the hard work for us) and "fill" the dataset with records returned from that query. Next we then "bind" the dataset (which has the records) to the datagridview control so the users can see the results. That's all there is to it for this part! The user can update the records if they like from the datagridview, the changes then are committed to the dataset so when we do an Update() on the data adapter, the changes are then committed to the database itself. The code would go something like this, but not guarenteed to work as I am writing from mind. Place an "Update" button (drag and drop button on form and double click it) and then do this: Me.theOleDbCommand.Connection.Open() Me.theOleDbDataAdapter.Update(Me.theDataSet) Me.theOleDbCommand.Connection.Close() this should then update the database. Of course be sure to catch errors etc... but for now, lets just think there are no errors just to make it simple. As for inserting the data from the textboxes to the database, the above solution would be best simply because you don't need to worry about what fields exist in the database so you can generate the INSERT command (as you need to know the fields to insert the data to) However if you need to then the above still applies but with a couple of changes. No need for the data adapter or the dataset. 'Insert record Me.theOleDbCommand = new OleDbCommand("INSERT INTO [ tableName ] ( field1, field2 ) VALUES ( , )") Me.theOleDbCommand.Parameters.Add(new OleDbParameter("@p1", OleDbType. fieldType ).Value = Me.theTextBox1.Text)) Me.theOleDbCommand.Parameters.Add(new OleDbParameter("@p2", OleDbType. fieldType ).Value = Me.theTextBox2.Text)) Me.theOleDbCommand.Connection.Open() Me.theOleDbCommand.ExecuteNonQuery() Me.theOleDbCommand.Connection.Close() Now, we create an insert command to insert the data/record. We need to know the field names and then supply it the "parameters" or values to insert into those fields. We then create a parameter and add it into the OleDbCommand object, so when it executes the command it can take those parameters and insert them correctly. You also generally need to know about the data field type of that fields (if its an Integer, NvarChar, Binary etc...) as otherwise the insertion may fail. The values are then given for that parameter with the values entered from the textbox. The code above is generally how it works but not guarenteed to work 100% does this help/shed some light Tag: How do I set delay between code?
  - 14
    - Messagebox Results as variables Dim result As DialogResult = MessageBox.Show("Hello World") Tag: How do I set delay between code?
  - 15
    - OracleConnection Scope ChristianBG wrote: I have a class that creates an oracle connection to a database that is compiled code and works fine. i pass an oracleconnection object back to the calling program and it uses it perfectly, until the code fully runs and it is time fo ruser imput and a form shows. the user does what ever he does then a query is launched that uses the conneciton object again and all of a sudden it is closed. I am not sure i under stand how that happens. when i put a watch on it you can see that the string stays in place until the user clicks on the combobox. right when the program enters the code the connectionstring is gone Hi, Try a GLOBAL declaration so that the connection string is 'seen' by all the Subs. E.G. Code Snippet 'This is a GLOBAL variable declaration at the top or above all the Subs ( subroutines ). Dim myConnectionString As String = "Whatever it is!! :-)" Private Sub ComboBox1_SelectedIndexChanged( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged End Sub Regards, S_DS Tag: How do I set delay between code?
  - 16
    - Adding data in one column together You can use a simple querry with an aggregate function Like this SELECT Sum(AmountsToBeToataled) as Total FROM AmountsTable This will return a single amount equal to the sum of all values in the AmountsToBeTotaled column. Hope this helps. Tag: How do I set delay between code?

shizuka.a

Hello all. I would like to enquire how I can set a delay in between chunks of code.

For example, after some code which interacts with a server, I am supposed to get a corresponding information from the server before it is appropriate to proceed on to the next part of the code. As the server response is not immediate, therefore an arbitrary delay is needed.

What is the proper code format that I need to add I can't seem to find the documentation in the help file. Thanks in advance.

Re: How do I set delay between code?

Brendan Grant

The easiest way is often to simply do a sleep:

System.Threading.Thread.Sleep(1000)

Re: How do I set delay between code?

spotty

Only use this for very small delays as it suspends the entire thread from doing anything.

Otherwise if its a longer delay then consider using timers.

Re: How do I set delay between code?

Mitch Wardrop

I use a loop with a application.doevents in it, pauses the code but leaves the gui active. I do it in milliseconds generally... 1000 milliseconds = 1 second.

Dim Timer As DateTime = Now.AddMilliseconds(2000)
do
application.doevents()
until now > timer

Re: How do I set delay between code?

spotty

Use sparingly - as application.dovents has a potential to slow down a machine dramatically when placed in a fast running loop.

Re: How do I set delay between code?

DMan1

shizuka.a wrote:
...after some code which interacts with a server,
What is the proper code format that I need to add

The correct answer to your question is dependent upon how you are interacting with the server (ie what communications protocol are you using)...both tcp/ip and serial communications can be setup with events that respond to data recieved