|
Can Somebody help me here 
I have written an application for two different motion controllers
- The code for each controller is placed in it's own module with identical
subs
Depending on the controller selected it will execute the appropriate code
Here is the problem .. after setting the project to OPTION STRICT = ON
I get the late binding not allowed message and I just can not get it fixed
Below is a sample code that should help understand my issue easier (I l know it's an easy thing - I just can not figure it out)
It's important for me that the Variable [SelectedController] that holds the object to the selected module is accessible throughout the whole project !
PS the code below doesn’t work = The variable [SelectedController] is not accessible outside the subs !
Where I try to call the actual subroutine is where I get the late binding error
Example : SelectedController.test()
Thanks
Georg
Public Module DECLARE_VARAIBLES
Public SelectedController As Object ' selected controller
End Module
Public Class Form1
Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim SelectedController As New ControllerA
Display_Controller()
End Sub
Public Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim SelectedController As New ControllerB
Display_Controller()
End Sub
Private Sub Display_Controller()
'**************
' HERE IS WHERE I USUALLY RUN INTO MY LATE BINDING ISSUE
SelectedController.test()
End Sub
End Class
Public Class ControllerA
Public Sub test()
MsgBox("running Controller A")
End Sub
End class
Public Class ControllerB
Public Sub test()
MsgBox("running Controller B")
End Sub
End Class
|
|
|
|
|
This is the normal - and desired - result if you try to invoke a method "test" on an boxed object ( indeed you are calling object.test() ).
If you have some classes that each implements the same methods you should use Interfaces like this:
Somewhere outside a class define:
<br />
Public Interface ITest<br />
Sub test()<br />
End Interface<br />
and then in your classes (ControllerA and ControllerB):
<br />
Public Class ControllerA<br />
Implements ITest<br />
Public Sub test()<br />
MsgBox("running Controller A")<br />
End Sub<br />
End Class<br />
(ControllerB similar)
And finally in your Module:
<br />
Public Module DECLARE_VARAIBLES<br />
Public SelectedController As ITest ' selected controller<br />
End Module<br />
-> you will get IntelliSense help and the code will work 
|
|
|
|
|
I'm not sure if I'm getting this ...
Am i correct in that Interfaces are intended to be used for code that's exactly the same ?
Public Interface ITest
Sub test()
End Interface
Itest will be the same in both controllerA & controllerB
If this is how it works that that's NOT what I need
I have a user Interface that will call the subs inside to different classes, ControllerA or ControllerB (The SUB NAMES Inside the classes are identical but the code inside the subs will never be!)
I believe it would make my live a lot easier (and Cleaner to maintain ) if I could just call the "same" subs out of my user interface
Sub Jog_X()
SelectedController.jogging
' where SelectedControler.Jog_X will have to point to
'A) ControllerA.Jog_X
'or
'B) ControlerB.Jog_X
end sub
Georg
|
|
|
|
|
Can anyone give me any idea on how to monitor client on a LAN through vb.net
the features like key logging and screenshots are working only on my system
plz tell me how to implement this on multiple systems
|
|
|
|
|
How can i save the values which is addes to a listview control. It may have more that one rows of data in a listview.Please help me with a example
Thanku
yesu
|
|
|
|
|
ypki wrote: How can i save the values which is addes to a listview control.
What do you mean by 'save'? To a file? A database?
You should provide enough information in your question for someone to be able to assist you with a solution.
Paul Marfleet
"No, his mind is not for rent
To any God or government"
Tom Sawyer - Rush
|
|
|
|
|
sorry..i mean to save in database
Thanks
|
|
|
|
|
sorry...i mean to save in database
for eg.
i have some textbox controls, after entering some values in it and hit enter,the values move to listview,more than one rows may enter into listview.There is another button, hiting on that the values in the listview need to save in the database.
Thanks
Yesu
|
|
|
|
|
You need to provide more information as to how you want to save. You can save to a file or a database.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
|
|
|
|
|
sorry..i mean to save in database
for eg.
i have some textbox controls, after entering some values in it and hit enter,the values move to listview,more than one rows may enter into listview.There is another button, hiting on that the values in the listview need to save in the database.
Thanks
Yesu
|
|
|
|
|
You just do an insert query into your database, however it is set up. Then, when you run the app again, you query for those items in your listbox and populate it from the query results.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
|
|
|
|
|
but i am not getting the value to insert.
i use
Dim lstSel As ListViewItem
lstSel.SubItems(2).ToString and val(lstSel.SubItems(2).ToString)
to take value from the cells of the listview.
only string value is getting for insert.
thks
yesu
|
|
|
|
|
Sorry, I haven't got back to you in a while. Is this working now or are you still having trouble?
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
I am trying to do a game of pong. My problem is, i can't get the ball served to a patricular point or location. By changing a valriables value i can get the ball served either to the left or right, up or down. the ball is located in thr middle of the form. When i serve the ball it will either do up or down and then bounce off the top or bottom, so if i want to serve a ball directly to a point say in the top left hand corner. i can't.
here are the variables i am using and a bit of code trying to explain what i mean
i'm using a timer for the ball speed
Dim XChange As Integer = -5
Dim YChange As Integer = 5
Dim BallDirX As Integer 'for direction
Dim BallDirY As Integer 'for direction
Dim X, Y As Integer 'unused just in case
If picBall.Top < 0 Then
picBall.Top = 0
XChange = -5
YChange = 5
Here I want the ball to bounce off the wall and goto a YPoint say 50 and the xpoint as zero as the ball bounces in thay direction
End If
thnks from Zeldacat
Regards
Zeldacat
|
|
|
|
|
I'm assuming from the code you have given that the ball can only move by a cirtain amount each time (5pix up/down and 5pix left/right)... this might not be enough.
What you need to do is calculate both the horizontal and vertical distances to the wall and then divide them by the number of ticks you want the ball to move until it reaches the wall: this is the amount you need to move the ball each timer tick...
If the distance to the left wall is 100 pixels (for example) and the distance you want the ball to travel downwards is 40 pixels (giving the target position of (0, 40)) then the ball will need to move 100/N to the left and 40/N downwards each timer tick, where N is the number of ticks you want the ball to move until it reaches the wall.
I believe this would work: it requires the ball's vertical/horizontal speed to be something other than 5 pixels per tick though.
Essentially you need to use relative positioning rather than absolute positioning.
(Small edit at 3:45).
Hope this helps.
Matthew Butler
modified on Saturday, December 15, 2007 10:42:33 AM
|
|
|
|
|
I am playing a ppt file in a webbrowser on form1. When I navigate from form1 to form2, form1 keeps running in the background.
The problem - If the ppt has got an associated sound with it, the sound remains playing even after navigating to form2. Is there anyway to just stop the sound of the ppt while navigating? Webbrowser control does not have any suitable property using which I can only put off the sound. I am not disposing form1 after use because loading a ppt on every request takes substantial amount of time.
Any help would be appreciated.
|
|
|
|
|
I am playing a ppt file in a webbrowser on form1. When I navigate from form1 to form2, form1 keeps running in the background.
The problem - If the ppt has got an associated sound with it, the sound remains playing even after navigating to form2. Is there anyway to just stop the sound of the ppt while navigating? Webbrowser control does not have any suitable property using which I can only put off the sound. I am not disposing form1 after use because loading a ppt on every request takes substantial amount of time.
Any help would be appreciated.
|
|
|
|
|
sushma belur wrote: When I navigate from form1 to form2, form1 keeps running in the background.
Yeah, as it should. Are you saying that your webbrowser in on Form1, and when you do something on Form2, the webbrowser on Form1 should stop playing sound?? It won't do that unless you either tell the webbrowser to navigate to another page or if you destroy the instance of Form1 that is currently running. Your code doesn't have access to the PowerPoint plugin inside the webbrowser control to stop the sound from playing.
|
|
|
|
|
My goal is to offer a way for the user to choose a database from the open file dialog and then display all the tables in the database for him to choose one. then my code will take that table he choose and be put into a variable. How do you get the table names using sql statement. And how can I display into a combobx. I could not find anything on google or Code Project that has all I want. I need vb.net code to get table names for Access and Sql server databases. Any help would be appreciated. thank you.
|
|
|
|
|
How do you hope to connect to a SQL Server database via an open file dialog ? I found heaps of google hits for finding the tables and databases in a SQL Server instance.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
Cory Kimble wrote: I could not find anything on google or Code Project that has all I want.
I also did a quick search on Google and quickly found the following articles:
Get table names for MS Access database[^]
Get table names for SQL Server database[^]
They should get you started.
Cory Kimble wrote: I need vb.net code to get table names for Access and Sql server databases.
Generally speaking, it isn't considered polite to ask for code without having made a serious attempt to solve the problem yourself. I suggest that you look at the above article, try and solve the problem yourself and post again in you encounter any further difficulties.
Paul Marfleet
"No, his mind is not for rent
To any God or government"
Tom Sawyer - Rush
|
|
|
|
|
The article you suggested is for C# I need for VB.net
|
|
|
|
|
Cory Kimble wrote: The article you suggested is for C# I need for VB.net
So convert it. There are plenty of tools available online to do this. Alternatively, learn C#.
Paul Marfleet
"No, his mind is not for rent
To any God or government"
Tom Sawyer - Rush
|
|
|
|
|
How do I add args to System.Timers.ElapsedEventArgs? For example, I have a process running and after an elapsed time I want to pass its process.id to my TimerElapsed handler. I'm a bit of a newbie, but don't be gentle with me
Many thanks to any who take the time to answer...
R
|
|
|
|
|
You can't change an existing class, you can derive a class from this one, but you can't make the event use it. You need to find another way of passing this value, probably using your own delegate.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
