use condition on your select statment.

on datagrid double click event, get data on selected then show it on main form.

write this on the top of codes
Imports System.Data.Odbc

Actually i didn't agree with your if statement :
If you want to know check box is checked or not then use Checked function :
Try this :
Private Sub chkboxLadiesShoes_CheckedChanged(ByVal sender As...

Try This code :

Dim path as String
path = "D:\Test\Music.wav"
My.Computer.Audio.Play(path)

Try this

Microsoft.VisualBasic.Right("Daniweb",3)

Use timer to make delay and progress bar.
so, draw a timer and progress bar then add this following code :

Private Sub WelcomeScreen_Load(ByVal sender As System.Object, ByVal e As...

Then post your code, it more help.
and which line of error...

Post your code.

you can add reputation on Dnx, just click on Add to Dnx's Reputation and fill the message.

Dim temp, quantity As Double
Console.Write("How many liters (only whole liters please ) ? ")
temp = Console.ReadLine()
quantity = Double.Parse(temp)

Try This :

Public Sub GenerateNotaId()
Dim myReader As SqlDataReader
conn = GetConnect()
conn.Open()
Dim temp As String
Try
Dim sql As...

yes i know it for c#...but you can get a logic from that.
That's i why still post it.
Good luck :)

See this (http://www.dotnetspider.com/resources/4859-Check-if-port-open-or-closed.aspx)

1. you can hide close, minimize and maximize in form properties.
2. Just Call About form in menu strip click event.
3. Set splash form as Startup object.
Project -> ProjectName Properties ...

>> ListBox1.Items.Add(Prc(x).ProcessName)

thanks iamthwee for the correction.

First, you need the following declarations:

Private Const EM_GETLINECOUNT As Integer = &HBA
Private Const EM_GETLINE As Integer = &HC4
Private Const EM_LINELENGTH As Integer = &HC1
...

Try This :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Name, Id, ye, Gen As String

Name = txtName.Text
...

Try this :

Private Sub ProcessView()
Dim Prc As Process()
Dim x As Integer

Prc = Process.GetProcesses

For x = 0 To UBound(Prc)
...

dim string1 as string

string1 = gridview1.rows(row#).cells(cell#).text.tostring

Private Sub ListView_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim i As Integer
Dim lvitem As ListViewItem
For i = 1 To...

if successfully then give a message.

see this code, this my code to get data into combobox :
Private Sub BacaData()
Dim i, k As Integer
Dim cmdStudent As New SqlCommand
Dim daStudent As New SqlDataAdapter
...

using timer.
in timer event you can change text color.

Well, great..
Don't forget to mark this thread solved.

>> filelength = filelength + file.Length
it should be objfile.length

>> filelength = filelength + file.Length
why you add filelength with file.Length?
just filelength = file.length

i suggest...

Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
Form1.ActiveForm.Opacity = TrackBar1.Value / TrackBar1.Maximum
End Sub

try this following code :
Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged
If Val(TextBox3.Text) > 32 Then
...

To call form2 you must to make an object of form2 :

Dim MainMenu as New Form2
MainMenu.show

To close form1 after called form2 :
- Don't use Me.Close cause it will close application.
- Use...

try this following code :
First Textboxt to input words = textbox2
Second to input certain char = textbox1
Button to execute and label to show result.
Private Sub btnSearch_Click(ByVal sender As...

see this code :
Dim cn As OleDbConnection
Dim cmd As OleDbCommand
Dim dr As OleDbDataReader
cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\MyDB.mdb;")
cn.Open()
cmd...

Hi...
You want to add it and run with vb.net.
.Net doesn't have a special Script Control.
Download the Script Control (ActiveX) from Microsoft
See this link...

I hope that will solved your problem.

First add reference Microsoft SQLDMO Object Library.
then add this code :
Dim i As Integer
Dim oNames As SQLDMO.NameList
Dim oSQLApp As SQLDMO.Application
oSQLApp = New...

try this :
Public Function Factorial(ByVal Number As Integer) As String
Try
If Number = 0 Then
Return 1
Else
Return Number *...

this will detect if mouse button clicked :

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
If e.Button =...

Well, try this code :
add this code in datagrid click event.

Dim i As Integer
i = dgAuthor.CurrentRowIndex()
MsgBox(Trim(dgAuthor.Item(i, 0)) & " - " & Trim(dgAuthor.Item(i, 1)) & " - " &...

you mean get data on each row?

the easiest way is copying current access database to backup folder.
Use FileCopy to copying file.
this following code is an example :

Private Sub Button1_Click(ByVal sender As System.Object,...

just copying a .mdb file to backup folder.