|
SYSTEM/Hardware/USB -HUD devices reveals the identity. Use this ID to communicate via USB.
Interesting Velleman project K8055_VB communicates with an experimenting board, has VB source. Uses C-DLL, however which does not reveal code.
VB-source to locate, open-close, read write USB devices in VB is out there too.
|
|
|
|
|
Is there any method to insert a combo box in to list box. I want to allow users to choose items in a list box. It just like check boxes in a list box. But i want to use combo boxes instead of check boxes.
|
|
|
|
|
No, there isn't. You'd have to create your own custom control to do this. But, I've never seen or heard of anything like this being done. I have heard of nested listbox controls, but only in WPF, not Windows Forms.
|
|
|
|
|
|
|
hello:
I am trying to copy one two-dimensional array to another. The elements of the arrays are list of integers.
I want to copy by value. I mean, I need to change the second array without changing the first one.
I have tried with both array.copy and array.clone
Dim myarray1(3, 4) As List(Of Integer)
Dim myarray2(3, 4) As List(Of Integer)
Dim mylist As New List(Of Integer)
For i = 1 To 3
mylist.Add(i)
Next
For i = 0 To 3
For ii = 0 To 4
myarray1(i, ii) = New List(Of Integer)
myarray2(i, ii) = New List(Of Integer)
myarray1(i, ii).AddRange(mylist)
Next
Next
'Array.Copy(myarray1, myarray2, myarray1.Length)
myarray2 = CType(myarray1.Clone, Global.System.Collections.Generic.List(Of Integer)(,))
myarray2(2, 2).Clear()
In both cases, the original array (myarray1(2,2)) is changed too.
I want the first array (myarra1) stay unchanged.
Any sugestion appreciated.
Greetings,
Alex
|
|
|
|
|
Array.Copy and Array.Clone create a shallow copy, i.e. for each array element they copy the value (for value types) or the reference (for reference types); they do not create a whole lot of new elements.
As you want a deep copy, you have to program that with explicit loops, copying each element, one by one.
|
|
|
|
|
Your code won't work because you're not making copies of the List(Of Integer) objects. Your code holds references to 12 seperate List(Of) objects, and when you use Array.Copy or Array.Clone, you are copying the references to those Lists, not the values in them. So, you now have two arrays with references to the same 12 Lists. Any changes you make in one array will be seen in the seconds array because they both point to the exact same objects.
' Setup source array of Lists.
Dim originalLists(3, 4) As List(Of Integer)
For i = 0 To 3
For j = 0 To 4
originalLists(i, j) = New List(Of Integer) From {1, 2, 3}
Next
Next
' Now make copies of the original Lists.
Dim copyLists(3, 4) As List(Of Integer)
For i = 0 To 3
For j = 0 To 4
copyLists(i, j) = New List(Of Integer)
copyLists(i, j).AddRange(originalLists(i, j))
Next
Next
|
|
|
|
|
I was doing that way, looping each element, but it is slow and unefficient. I wondered if there exist a better approach.
|
|
|
|
|
Because you're using Lists for what is essentially the 3rd dimension of your array, no, there isn't.
|
|
|
|
|
Am i wrong?
I'm using DevExpress TreeList and I want to use it as button.
I disabled the AllowEdit and adding some nodes.
But there's no Node.Click or else, did DevExpress TreeList support that? 
Real Programmers code in Binary?? 
|
|
|
|
|
Since we didn't develop the DevExpress TreeView, we're not the ones you should be asking about this.
Ask this in DevExpress support forums. Since they wrote the control, they are FAR better equiped to answer questions about it, wouldn't you think?
|
|
|
|
|
Alpherattz wrote: I'm using DevExpress TreeList and I want to use it as button.
Their documentation can be found here[^], and they have an active forum.
No, can't help, my knowledge on DevExpress-stuff is limited to "need-to-know".
Bastard Programmer from Hell 
|
|
|
|
|
You can use the CalcHitInfo method of TreeList control in the MouseUp event to catch the required click event as shown below
Private Sub treeList1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) _
Handles treeList1.MouseUp
ShowHitInfo(treeList1.CalcHitInfo(New Point(e.X, e.Y)))
End Sub
Private Sub ShowHitInfo(ByVal hi As DevExpress.XtraTreeList.TreeListHitInfo)
Dim msg As String = hi.HitInfoType.ToString() & vbCrLf
If (hi.Column Is Nothing) Then
msg &= "No column" & vbCrLf
Else
msg &= "Column: " & hi.Column.GetCaption() & vbCrLf
End If
If hi.Node Is Nothing Then
msg &= "No Node" & vbCrLf
Else
msg &= "Node: " & hi.Node.Id.ToString() & vbCrLf
End If
If hi.Column IsNot Nothing AndAlso hi.Node IsNot Nothing Then
msg &= "CellValue: " & hi.Node.GetDisplayText(hi.Column.AbsoluteIndex) & vbCrLf
End If
MessageBox.Show(msg)
End Sub
|
|
|
|
|
thankyou very much, problem solved..  
modified 20-Feb-12 2:33am.
|
|
|
|
|
The double click event of Treelist control does not have the hitinfo. Hence, the node cannot be detected.
Further the Double click has the default behaviour of collapsing and expanding the nodes. Hence, it is better to use the right click. In which case you can use the following code to handle the right click
Private Sub treeList1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles treeList1.MouseUp
If e.Button <> Windows.Forms.MouseButtons.Right Then
Exit Sub
End If
ShowHitInfo(treeList1.CalcHitInfo(New Point(e.X, e.Y)))
End Sub
I think this may meet your requirement.
|
|
|
|
|
yes DoubleClick event didn't work, just now i tried MouseDoubleClick event and it worked perfectly, but still don't understand the difference between TreeList1_DoubleClick and TreeList1_MouseDoubleClick.
thankyou again..
|
|
|
|
|
Double click event is for the whole control.
Whereas the MouseDoubleClick event gives the hitinfo, so that parts of control like node, cell etc. can be detected using X, Y coordinates of the clicked location.
|
|
|
|
|
nice info, thankyou very much.
|
|
|
|
|
|
how to make slide puzzle game with VB 6.0??
may i can view the source code..
|
|
|
|
|
I would suggest that Google is your first port of call! Google : vb6 how to make a game[^]
You might think the response is harsh but VB6 even though runs on operating systems upto Windows 7 and through rumours "will work as" from Microsoft work on Windows 8. It is not a supported language anymore. Have a look at the Express editions on the microsoft website as they are free
Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch
|
|
|
|
|
Unless you dig up some old grave you're not going to get VB6 source code for this.
|
|
|
|
|
Recently I had to go back though some old VB6 code and make some fixes. It was odd, we changed our Database server to something newer but kept with SQL 2000  (yeah we're current in some things ) When we did that for some reason our one application query that uses temp tables went from running in under 1 second to 30+. For what ever reason using the same connection for temps and the "regular" tables no longer worked after 12 years (go figure).
Not knowing what the problem could be I started to throw together a test program and what a pain in the butt that was. I wanted to check the one table and then remembered that I couldn't do a ExecuteScalar and I can't count the times I did something like conn.close() and then found out that oh yeah you don't use the (). Heck even For Each loops work a bit different, oh and then there is the starting at 1 and not 0 for arrays.
I started my programming career using VB around half way through the life of VB5, then moved to 6 and then jumped to 2005 and haven't looked back. The best way I can describe VB6 now is it's like running 15 miles. It basically sucks while your doing it, but you look back and think "hmm, that wasn't too bad and somewhat enjoyable... I think I'll do that again". Don't get me wrong I still enjoy VB and it's usually my goto language, but I think I'll stick with .Net
|
|
|
|
|
yes you should stick with .Net,
better in design and got a lot of languages..
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
