|
Hi, I need find the handle of button "OK" of Application, and later to push it. I've used this method, but it's very difficult for me, can anyone help me, please?:
Dim handleRefresh As IntPtr
Dim pdwSize As Long
pdwSize = FindWindow(vbNullString, "OK")
handleRefresh = Marshal.AllocHGlobal(Marshal.SizeOf(pdwSize))
SendMessage(handleRefresh, WM_LBUTTONDOWN, 0, 0)
SendMessage(handleRefresh, WM_LBUTTONUP, 0, 0)
RDG, thanks!
|
|
|
|
|
Hi
I am developing an application which requires me to parse HTML pages and gathervarious information such as title, author etc. i figured out that the best way to do this is to use regular expressions. while using regular expressions, i faced a lot of problems, one was of proper expression and then the other one was how to extract the complete strings . actually first to check whether there is author, then get its contents.
Can anyone help me with this, sample code would be of great help.
thanks in advance.
|
|
|
|
|
How can I change a main menu's bar colour?
I can change menuitem color. But i want to change color of whole bar (complete menu bar from 0 to 100%).
Is it possible to change it?
Thanks
Sumit Domyan
|
|
|
|
|
The the menu bar color is determined by the system (Display properties, Appearance tab), coloring is not supported. You'll either have to write your own MainMenu class, inheriting from MainMenu, and ownerdraw the menu bar yourself, search the articles on CP for an example, or use a third party component that exposes this kind of functionality.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi there,
Is there anyone know how to make a windows form listview control always automatically scroll to the last item when loading lots of items into the list? Thanks a lot.
Frank
|
|
|
|
|
Try this, right after populating the list view:
lvMyListOfItems.ListItems(lvMyListOfItems.ListItems.Count).Selected = True
that's it!
Cheers,
Pablo.ar
|
|
|
|
|
Thanks, Pablo.ar. But it does not work, because what I need it is to always show the last item while the items are loading.
Frank
|
|
|
|
|
Just put that line right at the end (still, inside!) of the loop block:
Do
...your block of code
...your block of code
...your block of code
lvMyListOfItems.ListItems(lvMyListOfItems.ListItems.Count).Selected = True
Loop
So, right before the loop loops, it will select (and scroll to) the last item.
Pablo.ar
|
|
|
|
|
Hi Pablo
Thanks for your reply. But I think you might be talking about some list control other than MS ListView, since ListView does not have ListItems property (while it does have Items property). And your statement can be:
lvMyListOfItems.Items(lvMyListOfItems.Items.Count - 1).Selected = True
This statement will select all the items after the loop completes. However, it can not auto-scroll the listview while loading items. It is another stupid MS control, since many other third-party controls can do it without any code. Meanwhile, kostasV provides a solution that meets my need. Thanks again for your time.
Frank
|
|
|
|
|
If you still want to give a try to the way I showed you, make sure you set the listview property 'Multiselect' to false.
I think that's why the code I gave you didn't work, anyhow, you did get the solution in a better way.
1st class code there, kostasV!
Pablo.ar
|
|
|
|
|
Thank you, Pablo.ar.
Frank
|
|
|
|
|
Me.ListView1.EnsureVisible(Me.ListView1.Items.Count - 1)
|
|
|
|
|
Thanks a lot, kostasV. That is really what I need.
Frank
|
|
|
|
|
For a public function for batting averages would this be right?
Dim outcome(10) As String
'declaring an array
outcome(0) = "single"
outcome(1) = "double"
outcome(2) = "triple"
outcome(3) = "home run"
outcome(4) = "strike"
outcome(5) = "ground out"
outcome(6) = "fly out"
outcome(7) = "walk"
outcome(8) = "sacrifice bunt"
outcome(9) = "sacrifice fly"
outcome(10) = "hit by pitch"
'Step through the array and add the values
For i = 0 To strPlateAppearance.Length - 1
total += strPlateAppearance(i)
Next
'Divide by the number of elements in the array
'Assing the result of the Function Name and it will become the 'returned' value
CalculateBattingAverage = total / strPlateAppearance.Length
|
|
|
|
|
hey,
So you want to figure out a batting average of a player?
i am not good with baseball averaging i just watch it ......
Wat does a single,a double etc.... equal? (how many points?)
and are u doing a window Form or a console form???
|
|
|
|
|
yeah i'm not too good at averaging either just watching....but im trying
I set it up like this
single = hit
double = hit
triple = hit
home run = hit
stike = miss
ground out = miss
fly out = miss
walk = n/a
sacrifice bunt = n/a
sacrifice fly = n/a
hit by pitch = n/a
Then I put it If "hit" then inthits +1 intatbats +1 n/a the same and miss the same
all toogether its inthits/intatbats while intNA = 0 then no offical atbats with an average of 0 still
|
|
|
|
|
okay
I think i got what you are saying.
You can start a Window Form...New->Project->vb->WindowApplication
i can show you how to make this program with a window form
care to see?
|
|
|
|
|
absolutely...I'm so stuck it's ridiculous. I started with the window form having the user enter the data into a textbox but after that I was stuck
|
|
|
|
|
okay i will make it....and send you the code for it.
|
|
|
|
|
is this a game? or a caulation....because i am coding the caculation program
|
|
|
|
|
its a calculation program...
actually do you think a select case statement would be better or the array?
|
|
|
|
|
array all the way
well i was thinking u have a textbox then when u click the button it will add the integer(number) to a listbox and to a arrayLIST (list is important)..the we will have a caculating button....and it will take all in the array list and average it out.
do u have aol aim or msn address? it will be easier to explain then back and forth on a form.
|
|
|
|
|
ok
owenguy22 on aol or aim
|
|
|
|
|
|