Click here to Skip to main content
14,303,648 members

Visual Basic

 
PinnedHOW TO ANSWER A QUESTION PinPopular
Chris Maunder12-Jul-09 22:40
adminChris Maunder12-Jul-09 22:40 
PinnedHow to get an answer to your question PinPopular
Chris Maunder10-Nov-05 16:30
adminChris Maunder10-Nov-05 16:30 
GeneralFind a File on the Desktop per Location Pin
tooli13hrs 19mins ago
membertooli13hrs 19mins ago 
QuestionOutputDebugString Pin
Member 1368314914-Sep-19 10:37
memberMember 1368314914-Sep-19 10:37 
AnswerRe: OutputDebugString Pin
Mycroft Holmes14-Sep-19 12:49
memberMycroft Holmes14-Sep-19 12:49 
AnswerRe: OutputDebugString Pin
Eddy Vluggen15-Sep-19 12:45
mveEddy Vluggen15-Sep-19 12:45 
GeneralRe: OutputDebugString Pin
Member 1368314916-Sep-19 5:53
memberMember 1368314916-Sep-19 5:53 
Questionvb.net in sql data fetching on dataGridView problem Pin
Member 1227528514-Sep-19 3:49
memberMember 1227528514-Sep-19 3:49 
AnswerRe: vb.net in sql data fetching on dataGridView problem Pin
Dave Kreskowiak14-Sep-19 5:31
mveDave Kreskowiak14-Sep-19 5:31 
AnswerRe: vb.net in sql data fetching on dataGridView problem Pin
Mycroft Holmes14-Sep-19 12:44
memberMycroft Holmes14-Sep-19 12:44 
Questioni want to erase two datatables with a single button please help Pin
Augusto1008-Sep-19 7:35
memberAugusto1008-Sep-19 7:35 
Public Sub llenaCombo()
Me.cmbCodigoInternoEDC.Items.Clear()
sql = "Select CodigoInterno from [Equipos de Computacion]"
cmd.CommandType = CommandType.Text
cmd.Connection = conn
cmd.CommandText = sql
dr = cmd.ExecuteReader

If dr.HasRows = True Then
While dr.Read()
Me.cmbCodigoInternoEDC.Items.Add(dr.GetValue(0))
End While
End If
dr.Close()

End Sub
Public Sub llenaCombo1()
Me.cmbCodigoInternoVH.Items.Clear()
sql = "Select CodigoInterno from Vehiculos"
cmd.CommandType = CommandType.Text
cmd.Connection = conn
cmd.CommandText = sql
dr = cmd.ExecuteReader

If dr.HasRows = True Then
While dr.Read()
Me.cmbCodigoInternoVH.Items.Add(dr.GetValue(0))
End While
End If
dr.Close()

End Sub

Private Sub BtnBorrar_Click(sender As Object, e As EventArgs) Handles btnBorrar.Click
Dim CodigoInterno As Integer
Dim CodigoInterno1 As Integer
CodigoInterno = Me.cmbCodigoInternoEDC.Text
CodigoInterno1 = Me.cmbCodigoInternoVH.Text
cmd.CommandType = CommandType.Text
cmd.Connection = conn

If sql = "Select * from [Equipos de Computacion]" Then
sql = "delete [Equipos de Computacion] where CodigoInterno= " & CodigoInterno & ""
cmd.CommandText = sql
ElseIf sql = "Select * from Vehiculos" Then
sql = "delete Vehiculos where CodigoInterno= " & CodigoInterno1 & ""
cmd.CommandText = sql
End If

Try
cmd.ExecuteNonQuery()
Me.cmbCodigoInternoEDC.Text = ""
Me.cmbCodigoInternoVH.Text = ""

llenaCombo()
llenaCombo1()
MsgBox("Registro eliminado correctamente")

Catch ex As Exception

MsgBox(ex.ToString)

End Try

End Sub>
AnswerRe: i want to erase two datatables with a single button please help Pin
Dave Kreskowiak8-Sep-19 16:59
mveDave Kreskowiak8-Sep-19 16:59 
GeneralRe: i want to erase two datatables with a single button please help Pin
Augusto10010-Sep-19 7:44
memberAugusto10010-Sep-19 7:44 
GeneralRe: i want to erase two datatables with a single button please help Pin
Dave Kreskowiak10-Sep-19 8:51
mveDave Kreskowiak10-Sep-19 8:51 
GeneralRe: i want to erase two datatables with a single button please help Pin
Augusto10011-Sep-19 4:14
memberAugusto10011-Sep-19 4:14 
GeneralRe: i want to erase two datatables with a single button please help Pin
Richard MacCutchan11-Sep-19 5:39
protectorRichard MacCutchan11-Sep-19 5:39 
GeneralRe: i want to erase two datatables with a single button please help Pin
Richard Deeming11-Sep-19 23:33
mveRichard Deeming11-Sep-19 23:33 
GeneralRe: i want to erase two datatables with a single button please help Pin
Augusto10011-Sep-19 4:16
memberAugusto10011-Sep-19 4:16 
GeneralRe: i want to erase two datatables with a single button please help Pin
Richard MacCutchan11-Sep-19 6:38
protectorRichard MacCutchan11-Sep-19 6:38 
GeneralRe: i want to erase two datatables with a single button please help Pin
Augusto10013-Sep-19 6:58
memberAugusto10013-Sep-19 6:58 
GeneralRe: i want to erase two datatables with a single button please help Pin
Richard Deeming13-Sep-19 7:21
mveRichard Deeming13-Sep-19 7:21 
AnswerRe: i want to erase two datatables with a single button please help Pin
Richard Deeming10-Sep-19 1:33
mveRichard Deeming10-Sep-19 1:33 
QuestionHow to perform non-case search in DataGridViewComboBoxColumn Pin
speedbump993-Sep-19 8:09
memberspeedbump993-Sep-19 8:09 
SuggestionRe: How to perform non-case search in DataGridViewComboBoxColumn Pin
CHill603-Sep-19 23:38
protectorCHill603-Sep-19 23:38 
GeneralRe: How to perform non-case search in DataGridViewComboBoxColumn Pin
speedbump994-Sep-19 4:58
memberspeedbump994-Sep-19 4:58 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.