Re: Removing selected text - Visual Basic Discussion Boards

Re: Removing selected text

skrtbh29-Dec-03 9:11

skrtbh

29-Dec-03 9:11

One important thing that I forgot in the message above:
Make sure the form's KeyPreview property is
set to true!

Re: Removing selected text

compukeith29-Dec-03 12:01

compukeith

29-Dec-03 12:01

I forgot it and changed it and it doesn't seem to matter either way. Odd thing, it won't do the Google: feature the very first time i press enter. I have to close the IE windows that comes up and press enter in my app again for it to correctly search Google.

The program works perfectly for all features when just pressing the cmdGo button manually.

Re: Removing selected text

skrtbh30-Dec-03 7:28

skrtbh

30-Dec-03 7:28

I don't really know why , but I finally got it to work the first time I press enter. This is what I changed:

Dim GoogleCheck<br />
GoogleCheck = Left(go, 7)<br />
If GoogleCheck = "Google:" Then <br />
[...].

I don't know how to get the name of the program files directory. This would be MUCH easier when using VB.NET!

Re: Removing selected text

compukeith30-Dec-03 7:57

compukeith

30-Dec-03 7:57

Holy crap! It works! Big Grin | :-D

Thanks a ton M_M_G.

I'll have to start coding in VB.NET so I can actually get this to work right. If you want, send me the directory that's equivalent to "Program Files" in the german version of windows and I'll write in a if then statement to determine which version the user's using.

Re: Removing selected text

skrtbh30-Dec-03 8:46

skrtbh

30-Dec-03 8:46

Cool...

The German name of the directory is:
C:\Programme\Internet Explorer .

Will it be possible to download the final version from your website?

Re: Removing selected text

compukeith30-Dec-03 9:45

compukeith

30-Dec-03 9:45

Cool.

Yeah - I'll post a final version later tonight. What sites do you want in there? The ones that are in there now are just for work purposes, so if you give me a list of some popular sites, I'll enter them in place of what I currently have in there.

Thanks again.
Keith

Re: Removing selected text

compukeith30-Dec-03 11:01

compukeith

30-Dec-03 11:01

OK - I added in an error handler so it will catch your directory.

Here's the newest version - complete with a "working" Google: search tool, direct website access via combo box, and by typing in the address.

I personally will modify mine to be my most used sites and will take it with me on a flash drive.

Again, thanks a ton for your work on this. I'm going to clean up the code and post a zip file soon with complete source available.

If you post it though, I can recompile it with a list with whatever you want. Just tell me how you want it to look in the combo box and what sites you want listed. (ex: in my combo box, i have every categorized).

-Keith

Re: Removing selected text

skrtbh31-Dec-03 7:18

skrtbh

31-Dec-03 7:18

Thanks for this offer, but I don't know which sites to include at the
moment. Please post a link to the source code .zip file, so I can modify the program on my own.

Re: Removing selected text

compukeith31-Dec-03 11:50

compukeith

31-Dec-03 11:50

No problem.

Here's a link to the source and program. I've added a "about" form that describes how to use the app and it also gives you credit for the Google stuff.

If you just alter the "goasp" variable to point to just IE instead of also referencing a specific site, it can get to your list correctly.

-Keith

Re: Removing selected text

skrtbh1-Jan-04 2:03

skrtbh

1-Jan-04 2:03

The about form looks really good! Big Grin | :-D

Well, I've still got another question:
May I translate this app into German and offer the executable (or a setup program) on my web site? Possibly I'll also make a .NET version.

This would be really cool! Cool | :cool:

Re: Removing selected text

compukeith1-Jan-04 15:27

compukeith

1-Jan-04 15:27

Sure! All I ask is that you mention me somewhere - even if it's just in the source.

Post a link once you're done. I'd like to see it in .NET!

.NET version now available!

skrtbh3-Jan-04 1:50

skrtbh

3-Jan-04 1:50

I've just finished work at Quick Access.NET version 1.0!

I added some new features:
- a 'notify icon' that is displayed in the systray. Double-click it and Quick Access will open. You can also right-click the icon to bring up a context menu.
- AutoComplete function for the ComboBox
- Support for WinXP look-and-feel

You can download the MSI package here:
www.madcode.net/download/quickaccess/quickaccess_setup.msi[^]

If you want something changed or if I shall send you the source code via email, please contact me: webmaster@madcode.net

Re: .NET version now available!

compukeith3-Jan-04 2:01

compukeith

3-Jan-04 2:01

Cool! I really like it. That makes me really want to start learning .NET.

Cool and thanks for the really good update!

Re: .NET version now available!

skrtbh3-Jan-04 8:31

skrtbh

3-Jan-04 8:31

I'm pleased that you like it.
I'll provide some updates in future, just check:
www.madcode.net/download/quickaccess
from time to time.
[This site isn't available at the moment, but it will
be soon!]

Help Me pleas (i want to draw a sphere )

EmanAli27-Dec-03 11:37

EmanAli

27-Dec-03 11:37

i want to draw a sphere on a form in visual basic.NET
that looks like three D.

What is the way.

Help with DataAdapter.UpdateRowSource

mikasa27-Dec-03 5:37

mikasa

27-Dec-03 5:37

Hello, does anyone know how exactly this Property works for DataAdapters in .NET? Please do not give me MSDN Definitions...I've read all that.

Basically, what I need to know is...if I have set the UpdateCommand of a SQLDataAdapter to a StoredProc that has "Output Parameters", and I want those Output Parameters to then update the DataSet's Values after using the SqlDataAdapter.Update Method...Do I set the UpdateRowSource Property to "Both"?

Also, if the Adapter DOES happen to update the DataSet's values, will it tell me that the RowState has changed? Because I would need to know if the Output Paramters did modify the DataSet!

Comprende? WTF | :WTF:

To generate reusable code

Softtips200426-Dec-03 18:28

Softtips2004

26-Dec-03 18:28

I am retrieving a field from the database into a combobox.I have to retrieve the same data into the combobox in 3 different forms.How can i simplify this.Do i write a common procedure?

Re: To generate reusable code

mikasa27-Dec-03 5:07

mikasa

27-Dec-03 5:07

This all depends on how your Forms are related. Sometimes, if one Form is an Extension of another, simply use "Visual" Inheritance.

Typically, I write individual Sub Routines for each ComboBox (as opposed to one Massive Routine that Refreshes all Data in every control...blech!). If this is your case, and it seems you are using this in more than one Form, place your Routine in a Module and Pass the ComboBox as a Parameter so it can fill the correct one.

'In Module...

Public Sub RefreshCityList(ByRef CboList As ComboBox)
     'Place Logic Here...
End Sub

To display in a label

Softtips200426-Dec-03 18:11

Softtips2004

26-Dec-03 18:11

I have used the following code to display # in a label.But it is getting displayed only once.Why?
Private Sub Command1_Click()
Dim n, i As Integer
n = Val(Text1.Text)
Label2.Caption = ""
For i = 1 To n
Label2.Caption = "#"
Next
End Sub

Re: To display in a label

Dave Kreskowiak26-Dec-03 18:58

Dave Kreskowiak

26-Dec-03 18:58

Softtips2004 wrote:
I have used the following code to display # in a label.But it is getting displayed only once.Why?
Private Sub Command1_Click()
Dim n, i As Integer
n = Val(Text1.Text)
Label2.Caption = ""
For i = 1 To n
Label2.Caption = "#"
Next
End Sub

Your only getting one '#' because your overwritting the value in Label2.Caption 'n' times, your not appending to it. If you want to append to it then you have to do something like this:

Label2.Caption = ""
For i = 1 To n
    Label2.Caption = Label2.Caption & "#"
Next

Or you could simplify it even further and do it this way:

Private Sub Command1_Click()
Dim n as Integer = Val(Text1.Text)
Label2.Caption = new String("#", n)
End Sub

RageInTheMachine9532

Re: To display in a label

27-Dec-03 2:47

hey it is so simple
the code is given here

Private Sub Command1_Click()
Dim n, i As Integer
n = Val(Text1.Text)
Label2.Caption = ""
For i = 1 To n
Label2.Caption = Label2.Caption + "#"
Next
End Sub

Any Problem Contact me
Cool | :cool:

VickyMD a Specialist in Message Digest Security
i think so i m posting it 2 seconds late
sorry for that

Re: To display in a label

mikasa27-Dec-03 5:08

mikasa

27-Dec-03 5:08

You can simplify the "Concatenation" like this...

For i = 1 To n
     Label2.Caption &= "#"
Next

How to Unload a DLL from and Aplication in VB.NET

elRaptor26-Dec-03 10:30

elRaptor

26-Dec-03 10:30

Hello All:
I hope you can helpme whit this, I am not sure if it can be done, but someone knows how to unload a DLL from an aplication in VB.NET, this because I need to update the file or deleted, but when I try to delete the file I get and error, this is because the file is been use by the aplication so I need to remove the reference in runtime, any ideas?.

ElRaptor

Re: How to Unload a DLL from and Aplication in VB.NET

Colin Angus Mackay26-Dec-03 13:35

Colin Angus Mackay

26-Dec-03 13:35

There is a nice article on MSDN that might help. It's at http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dncscol/html/csharp03122002.asp[^]

The examples on the page are written in C#, but that's okay because it's all .NET Big Grin | :-D

so will work also in VB.NET.

I hope this helps... Smile | :)

--Colin Mackay--

"In the confrontation between the stream and the rock, the stream always wins - not through strength but perseverance." (H. Jackson Brown)

Enumerators in .NET: See how to customise foreach loops with C#

Re: How to Unload a DLL from and Aplication in VB.NET

elRaptor30-Dec-03 7:35

elRaptor

30-Dec-03 7:35

Thanks Colin: I am going to try this option, and I will let you know.

Thanks again

Javier Ayala

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