oussama_1

webBrowser1.Document.All("Button ID").InvokeMember("click")

Step1 TextBox1.Text = sender.text & "," Step2 TextBox1.Text = TextBox1.Text & sender.text Step3 Dim qty As String = TextBox1.Text.Substring(0, TextBox1.Text.ToString.LastIndexOf(",")) Dim itemName As String = TextBox1.Text.Replace(qty & ",", "") DataGrid.Rows.Add(itemName, "", "", qty) Step4 Label.Text = DataGrid.Rows(index).Cells(index).Value

You should use a timer instead of Date/time picker when the user starts Timer1.start() when the user finishes Timer1.stop() but first you can set the time to seconds, minutes or hours for seconds use Timer1.Interval = 1000 now each timer Tick is a second, when the timer start log your …

DataGrid.Rows(index).Cells(index / ColumnName).Value = TextBox1.Text

check for internet connectivity first: Try If My.Computer.Network.Ping("daniweb.com") Then dataopen() If conn.State = ConnectionState.Open Then rlabel1.text = "Connected" Else rlabel1.text = "Not connected" End If End If Catch ex As Exception rlabel1.text = "No Internet Connectivity" End Try

is there any error ? if yes what is it ? what are you trying to do, just focus on name textbox or get the name value.

[Click Here](http://www.homeandlearn.co.uk/NET/vbNet.html) go to VB .NET and Databases tutorials

it's already in your code, just change/assign values to all types of MarginBounds

is it required to add a microsoft excel object library reference here ?

dAdapter.Fill(ds); dataGridView1.DataSource = ds.tables(0);

If Q1.Visible = True Then Dim numb As Integer = 5 For i = 111 To 155 Dim q As RadioButton = CType(Me.Controls("q" & i), RadioButton) If i.ToString.EndsWith("1") Then numb = 5 End If If q.Created = True Then If q.Checked = True Then sm = sm + numb numb …

try this Dim Connection As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source='" & "your path" & "';" & "Persist Security Info=False;" & "Jet OLEDB:Database Password=" & "your pass" & ";") Connection.Open()

the easy and fast way for me is to load the access database into a datagrid and search through it.

since your db is safe, take this code :  and store it in your databade, on your login button event, download this code and execute it. how to do so ? check "CodeDom" and here's a Link [Click Here](http://www.aboutmydot.net/desktop-applications/compile-and-execute-code-at-runtime.html)

Welcome Spencer :D

Yes its possible. [Click Here](http://www.codeproject.com/Articles/161871/Fast-Colored-TextBox-for-syntax-highlighting)

buddy your question is vague along with your other questions, i can't figure out what you want. Please Read this [Link](http://www.daniweb.com/software-development/vbnet/threads/424836/please-read-this-before-posting)

start osk.exe process Dim OSKProces As System.Diagnostics.Process OSKProces = System.Diagnostics.Process.Start("osk.exe") Kill osk.exe Process Dim proc = Process.GetProcessesByName("osk") For i As Integer = 0 To proc.Count - 1 proc(i).Kill() Next i

Search through datagridview from combobox data : For i As Integer = 0 To DataGridView1.Rows.Count - 2 For j As Integer = 0 To Me.DataGridView1.Rows(i).Cells.Count - 2 If DataGridView1.Item(j, i).Value.ToString().Contains(ComboBox1.Text) Then DataGridView1.Rows(i).Cells(j).Selected = True DataGridView1.CurrentCell = DataGridView1.Rows(i).Cells(j) End If Next Next i

Yes, it's possible. read about how WINRAR works [Data Compression](http://en.wikipedia.org/wiki/Data_compression) [File Archiver](http://en.wikipedia.org/wiki/7-Zip) [deflate algorithm](http://en.wikipedia.org/wiki/DEFLATE_(algorithm))

[Click Here](http://techbrij.com/install-sql-server-database-with-visual-studio-setup)

Dim NewLabel As Label = New Label Me.Controls.Add(NewLabel) AddHandler NewLabel.Click, AddressOf MyLabelClick Private Sub MyLabelClick(ByVal sender As Object, ByVal e As EventArgs) 'code End Sub

Dim StringFromWeb As String = New System.Net.WebClient().DownloadString("example.com") RichTextBox1.Text = StringFromWeb then find your Span ID

For indx = 0 To DataGridView2.Rows.Count - 1 If DataGridView1.CurrentRow.Cells("ID").Value = DataGridView2.Rows(indx).Cells(1).Value Then Dim ask = MessageBox.Show("Record Already Exist, Replace existing record ?", "Records", _ MessageBoxButtons.YesNoCancel) If ask = DialogResult.Yes Then ''copy code End If Else ''copy code End If Next

Dim i As Integer For i = 0 To DataGridView1.Rows.Count - 1 With DataGridView1.Rows(i) Dim insertCommand As New _ OleDb.OleDbCommand("insert into students_grade (student_no, student_name, grade) values ('" & _ .Cells(0).Value & "','" & .Cells(1).Value & "','" & .Cells(2).Value & "')", Con) Try Con.Open() insertCommand.ExecuteNonQuery() Catch ex As Exception End Try …

DataGridView1.Rows(0).Cells(0).Value = form1.name.Text DataGridView1.Rows(0).Cells(1).Value = form1.age.Text

when there's a perfect program, there's a perfect hacker. deal with it! sorry :D

in the destination, you need to put the file directory not the folder that contains it. My.Computer.FileSystem.FileCopy(your file,new file directory) ' ex: i want to copy this file(C:\sound.wav) to (c:\music) My.Computer.FileSystem.FileCopy(C:\sound.wav,c:\music\sound.wav)

let me get this straight, your are asking for 2 things 1.you want on datagridview1_mouseclick to copy selected raw to datagridview2 2.you want on datagridview2_RowsAdded to update your database with the new added raw am i right ?

For i = 0 To 2 Dim RadioButton As RadioButton = CType(Me.Controls("RadioButton" & i + 1), RadioButton) If RadioButton.Checked = True Then MsgBox("Food :" & RadioButton.Text & ", Quantity :" & txtCountFood) 'msgbox is example End If Next

ListView1.SelectedItems(ListView1.SelectedItems.Count - 1).Index

when exception(problem) occurs in a program, we handle it by Try, Catch and Finally. You can also define your own exception and your code is a perfect example for it. the above code is a "User-Defined Exceptions" class ex: Public Class NoInternetConnection : Inherits ApplicationException and the rest of the …

sadly, there isn't any free sapi with arabic language!

Dim ofd As New OpenFileDialog Dim strFile As String With ofd .Title = "Select a List" .Filter = "Text Files|*.txt|All Files|*.*" .ShowDialog() strFile = .FileName End With RichTextBox1.LoadFile(strFile, RichTextBoxStreamType.PlainText) For Each line In RichTextBox1.Lines If line.StartsWith("A") Then If line.EndsWith("0") Then RichTextBox1.Text = RichTextBox1.Text.Replace(line, line.Replace("0", "Replace with this")) End If End …

go to your form properties go to misc and set keypreview to true and set your acceptbutton

place this script on your camera transform.position = new Vector3(player.transform.x,y,z)

i work with unity..amazing game engine..we are team of two..my buddy is a 3d artist he deals with 3dmax and maya for modeling and creating enviroments and lightning..backing etc... and i deal with scripting (javascript, but u can choose between c# and python) and audio (i use reason for soundFX) …

if you got a lot of controls try to put them in panels so that instead of rescaling each control u can just move the panels around according to the resolution

yes like what minimalist said and try to add mouse control to your form so you can move it around Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Integer, ByVal wMsg As Integer, _ ByVal wParam As Integer, ByVal lParam As String) As Integer Private Declare …

Exactly! your code will create an empty word file. you need to add your data to the MS word file programmatically

does both machine have the same platform ? (if not check this [Click Here](http://www.daniweb.com/software-development/vbnet/threads/463693/application-will-not-run-on-64-bit#post2018387)) check .NET Framework version try to include all your application files in your software (go to publish then application files)

change the reading of your modem SerialPort1.Encoding = Encoding.ASCII

add a serialport to your form select your handpuch port ComboBox1.Items.AddRange(IO.Ports.SerialPort.GetPortNames) SerialPort1.PortName = ComboBox1.SelectedItem.ToString open it SerialPort1.Open() Receive data and convert Private Sub DataReceived(ByVal sender As Object, _ ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) _ Handles SerialPort1.DataReceived If SerialPort1.BytesToRead > 0 Then SerialPort1.Read(your data) end if 'convert bytes to plain text System.Text.Encoding.ASCII.GetString(your …

try this Dim forms As Form() = {Form2, Form3, Form4} For Each form In forms If (form.Location.X <= Label1.Location.X + Me.Location.X) _ And (form.Location.Y <= Label1.Location.Y + Me.Location.Y) Then If (form.Location.X + form.Size.Width >= Label1.Location.X + Me.Location.X + Label1.Size.Width) _ And (form.Location.Y + form.Size.Height >= Label1.Location.Y + Me.Location.Y + Label1.Size.Height) …

Manually : Toolbox drag drop a listview into your form design set listview view to details Edit Columns Programmatically : Me.Size = New Size(700, 300) Dim list As New ListView list.Size = New Size(684, 262) list.View = View.Details list.Columns.Add("File Directory") list.Columns.Add("name") list.Columns.Add("email") list.Columns.Add(" ip address") Me.Controls.Add(list)

@begginnerdev its Delphi

dgv.DataSource = listaBindingSource dgv.Columns(0).HeaderText = "Value" dgv.Columns(1).HeaderText = "Date" For i = 0 To dgv.Rows.Count - 1 Dim num As Integer = i + 1 dgv.Rows.Item(i).HeaderCell.Value = "Vendas" & num Next

your code is working fine, its a driver issue you should reinstall MDAC check this link [Click Here](social.msdn.microsoft.com/Forums/vstudio/en-US/8775ee9c-f48a-4f2e-89dd-92e5f5c59799/the-net-framework-data-providers-require-microsoft-data-access-componentsmdac)

use http://freetexthost.com/ first app : upload text "close" get url second app : on each timer tick Dim closeIt As String = New System.Net.WebClient().DownloadString(yourURL) if it contains text "colse" then me.close good luck

Means Cell 9 does not exist here's a code i wrote it'll simplify your work (less codes :D) For i = 1 To DataGridView1.Columns.Count - 1 Dim label As Label = CType(Me.Controls("label" & i + 1), Label) If Not DataGridView1.CurrentRow.Cells(i).ToString = "" Or Nothing Then label.Text = DataGridView1.CurrentRow.Cells(i).Value End If …