Click here to Skip to main content
15,884,986 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: Run Windows service in ring 0 Pin
Dave Kreskowiak15-Feb-12 6:08
mveDave Kreskowiak15-Feb-12 6:08 
QuestionHow do I open multiple tabs on an existing I.E. from vb.net Pin
dcorning14-Feb-12 9:29
dcorning14-Feb-12 9:29 
AnswerRe: How do I open multiple tabs on an existing I.E. from vb.net Pin
Bernhard Hiller14-Feb-12 21:18
Bernhard Hiller14-Feb-12 21:18 
QuestionNeed Code of VB to fetch report from QC 10 Pin
shrikant73113-Feb-12 6:53
shrikant73113-Feb-12 6:53 
AnswerRe: Need Code of VB to fetch report from QC 10 Pin
Dave Kreskowiak13-Feb-12 9:35
mveDave Kreskowiak13-Feb-12 9:35 
AnswerRe: Need Code of VB to fetch report from QC 10 Pin
Nagy Vilmos14-Feb-12 22:41
professionalNagy Vilmos14-Feb-12 22:41 
AnswerRe: Need Code of VB to fetch report from QC 10 Pin
Reiss15-Feb-12 2:39
professionalReiss15-Feb-12 2:39 
QuestionBindingSource Position Pin
Framework .l.12-Feb-12 21:08
Framework .l.12-Feb-12 21:08 
VB
Private Sub btnDelete_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnDelete.ItemClick
	If Me.NoteSetBindingSource.Current Is Nothing Then
		Return
	End If

	Dim Id As Guid = DirectCast(DirectCast(NoteSetBindingSource.Current, DataRowView)("IdNoteSet"), Guid)

	If MessageBox.Show("Delete selected data?", "Message", MessageBoxButtons.OKCancel, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then
		Me.NoteSetAdapter.Delete(DirectCast(DirectCast(Me.NoteSetBindingSource.Current, DataRowView)("IdNoteSet"), Guid))
	End If

	Me.LoadData(Id)
End Sub

Private Sub btnRefresh_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnRefresh.ItemClick
	Me.LoadData()
End Sub

Public Sub LoadData()
	Me.LoadData(Nothing)
End Sub

Public Sub LoadData(ByVal Id As System.Nullable(Of Guid))
	Me.Dataset.NoteSet.Rows.Clear()
	Me.NoteSetAdapter.Fill(Me.Dataset.NoteSet)

	If Id.HasValue Then
		Me.NoteSetBindingSource.Position = Me.NoteSetBindingSource.Find("IdNoteSet", Id.Value)
	End If
End Sub

hi guys, i need help above..

loaddata is used to fill my Grid, but everytime i call it, the bindingsource.position move to first..
nah, if i delete row 3 then my position will stay at row 3.
if 3 is the last row, then the position will move to row 2.
this code doesn't work, can somebody correct it? Laugh | :laugh:
AnswerRe: BindingSource Position Pin
Eddy Vluggen13-Feb-12 5:01
professionalEddy Vluggen13-Feb-12 5:01 
QuestionProblems with default DataGridView Pin
Member 860517711-Feb-12 4:36
Member 860517711-Feb-12 4:36 
AnswerRe: Problems with default DataGridView Pin
Luc Pattyn11-Feb-12 4:54
sitebuilderLuc Pattyn11-Feb-12 4:54 
GeneralRe: Problems with default DataGridView Pin
Member 860517711-Feb-12 5:00
Member 860517711-Feb-12 5:00 
AnswerRe: Problems with default DataGridView Pin
Luc Pattyn11-Feb-12 5:10
sitebuilderLuc Pattyn11-Feb-12 5:10 
AnswerRe: Problems with default DataGridView Pin
Sonhospa13-Feb-12 2:13
Sonhospa13-Feb-12 2:13 
QuestionSpareRoom(VBPmanan15) Pin
manan112211-Feb-12 3:00
manan112211-Feb-12 3:00 
AnswerRe: SpareRoom(VBPmanan15) Pin
Eddy Vluggen11-Feb-12 3:33
professionalEddy Vluggen11-Feb-12 3:33 
QuestionSynchronized controls logic Pin
Sonhospa11-Feb-12 0:41
Sonhospa11-Feb-12 0:41 
AnswerRe: Synchronized controls logic Pin
Luc Pattyn11-Feb-12 2:17
sitebuilderLuc Pattyn11-Feb-12 2:17 
QuestionRe: Synchronized controls logic Pin
Sonhospa11-Feb-12 15:18
Sonhospa11-Feb-12 15:18 
AnswerRe: Synchronized controls logic Pin
Luc Pattyn11-Feb-12 15:47
sitebuilderLuc Pattyn11-Feb-12 15:47 
QuestionRe: Synchronized controls logic Pin
Sonhospa11-Feb-12 23:36
Sonhospa11-Feb-12 23:36 
AnswerRe: Synchronized controls logic Pin
Luc Pattyn12-Feb-12 0:04
sitebuilderLuc Pattyn12-Feb-12 0:04 
GeneralRe: Synchronized controls logic Pin
Sonhospa12-Feb-12 1:35
Sonhospa12-Feb-12 1:35 
QuestionOLE Automation error 438 when registering a XLL using custom action Pin
tagad10-Feb-12 6:17
tagad10-Feb-12 6:17 
QuestionHow do I check programmatically if installed version of ACE OleDb is 64 or 32 bit version? Pin
Jörgen Andersson9-Feb-12 22:33
professionalJörgen Andersson9-Feb-12 22:33 

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.