Visual Basic

Paul Conrad26-Jul-08 7:48

Paul Conrad

26-Jul-08 7:48

Thanks for the excessively long post Hmmm | :|

"The clue train passed his station without stopping." - John Simmons / outlaw programmer

"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon

Dirk Higbee26-Jul-08 15:23

Dirk Higbee

26-Jul-08 15:23

Waoula wrote:
can anyone teach me

sure

go to Google and type 'VB.net index changed user control function' in the search box

Don't take any wooden nickels.

Mycroft Holmes26-Jul-08 16:01

26-Jul-08 16:01

Out of curiosity I did, first hit, this question Poke tongue | ;-P

When I have used a user control I put all the management for the control in the code behind the control (it worked Ok for the rare occasions I have needed a UC)

Never underestimate the power of human stupidity
RAH

Guffa27-Jul-08 5:18

Guffa

27-Jul-08 5:18

Waoula wrote:
can anyone teach me please how to create an event in my form to fire a function in my usercontrol when the index is changed?

You could, but you shouldn't, as the code gets harder to follow and maintain. Handle the even in the form where the control is that causes the event, and from that event handler just call a method (or set a property) in your user conrol.

Despite everything, the person most likely to be fooling you next is yourself.

String Builder remove white spaces

Wael Hawari27-Jul-08 8:47

Wael Hawari

27-Jul-08 8:47

Thanks Guys.
in fact i found it, all i have to do is:
declaring a new event to my user control
Public Event Selected_Index_Changed()

and this
Public Sub My_ComboBox_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles My_ComboBox.SelectedIndexChanged
Index = Me.My_ComboBox.SelectedIndex
RaiseEvent Selected_Index_Changed()
End Sub

so when the combo box change index the user control raiseevent Selected_Index_Changed

this way i can use it in the original form

sorry if my post was to long just wanted to share my ideas and make the code much more better

thanks again.

waelhawari

Delegate in vb.net

Ahamed Azeem25-Jul-08 22:58

Ahamed Azeem

25-Jul-08 22:58

Hi gents,

Please provide me a real time example for Delegate.

Regards
Azeem

Re: Delegate in vb.net

jzonthemtn26-Jul-08 2:21

jzonthemtn

26-Jul-08 2:21

Delegate (.NET)[^], A Beginner's Guide to Delegates[^]

member2725-Jul-08 21:26

member27

25-Jul-08 21:26

How to remove white space from middle of string

Iam Using string builder and iam getting the text in string builder-
HI Welcome to India

I want to remove spaces in between and the result shouldbe

HIWelcometoIndia

pls any one help

Re: String Builder remove white spaces

jzonthemtn26-Jul-08 2:26

jzonthemtn

26-Jul-08 2:26

Dim asdf As New System.Text.StringBuilder
asdf.AppendLine("this is a test")
asdf.Replace(" ", String.Empty)
MsgBox(asdf.ToString)

username and passord problem

monika_vasvani25-Jul-08 19:00

monika_vasvani

25-Jul-08 19:00

Hi all

I have already posted my article for access permission.

But i would like to know how to give password and username to folder which is created at runtime?

is it possible through coding in vb?

If yes pls help me

Thnaks
monika

Re: username and passord problem

jzonthemtn26-Jul-08 2:21

jzonthemtn

26-Jul-08 2:21

You want to password protect a Windows folder?

Making TextBox visible

Dalek Dave25-Jul-08 15:04

25-Jul-08 15:04

For reasons too boring to go into, I need to make a set of textboxes open depending on the user input.

for example, I have TextBox1, TextBox2, TextBox3 etc up to 7.

I have a combobox that is populated 1 to 7

User selects 6 for example, I want textboxes 1-6 to become visible.

I am trying something like this...

For i = 1 to intNumOfBoxes
TextBox(a).Visible = True
Next

Of course it isn't working!

I tried TextBox & intNumOfBoxes, still no joy.

I know it is late and I am being dim, but any suggestions?

------------------------------------
"I want you to imagine I have a blaster in my hand" - Zaphod Beeblebrox.
"You DO have a blaster in your hand" - Freighter Pilot
"Yeah, so you don't have to tax your imagination too hard" - Zaphod Beeblebrox

Mycroft Holmes25-Jul-08 15:45

25-Jul-08 15:45

Declare a control TextBox using the contactenated string as the name. I think this works.
Dim oTB as new textbox("textboxname")

Never underestimate the power of human stupidity
RAH

Dalek Dave25-Jul-08 16:02

25-Jul-08 16:02

Mycroft Holmes wrote:
Dim oTB as new textbox("textboxname")

Doesnt seem to work.
It say "Too many Arguments to Public Sub New()"

However...

I tried this

Dim oTB As New TextBox
        For a = 1 To INumOfBox2
            oTB.Name = "TextBox"
            oTB.Name = oTB.Name & Str(a)
            oTB.Visible = True

        Next

It accepts it, but doesn't make visible the Text Boxes

Mycroft Holmes25-Jul-08 16:15

25-Jul-08 16:15

I think you will need to use reflections to get at the textbox (or a case statement which is simpler but a kludge)

dim oTB as textbox
Select Case cbo.selectedvalue
case 1....
otb = txtBox1

Dalek Dave wrote:
Dim oTB As New TextBox

This instantiates as new textbox which you then assign a name to and discard.

Never underestimate the power of human stupidity
RAH

Dalek Dave25-Jul-08 16:23

25-Jul-08 16:23

Thanks, I will try that in the morning though, 3.21am and brain starting to fry.

I can see a way of doing it that is long winded, so I hope that your method works! Smile | :)

Mycroft Holmes25-Jul-08 16:53

25-Jul-08 16:53

Well, it should be morning and here is a work around that made me chuckle. It may not be a good one bu it works.
Create a groupbox/panel to hold your combo and 7 text boxes.
Make sure the tab order is sequential within the container - critical
in the on change event of the combo put the following (i had it in a button event for testing)

Dim oCtrl As Control = Me.cboList
Dim iLimit As Int16
iLimit = CInt(cboList.Text)
For i = 1 To iLimit
    oCtrl = Me.GetNextControl(oCtrl, True)
Next
If Not IsNothing(oCtrl) Then
    oCtrl.Text = iLimit
End If

Never underestimate the power of human stupidity
RAH

supercat925-Jul-08 17:33

supercat9

25-Jul-08 17:33

If the textboxes are called TextBox1, Textbox2, etc. you may be able to do something like:

Dim Const TextBoxes() as TextBox = _
   {TextBox1, TextBox2, TextBox3, TextBox4, TextBox5, TextBox6, TextBox7}

and then do TextBoxes(a).Visible=True

Dalek Dave26-Jul-08 10:26

26-Jul-08 10:26

Thanks, I knew I was on the right track, but I couldn't work out the method!

That works perfectly well, and is exactly what I need!

I was trying to treat the method TEXTBOX as an array, obviously a no no.

Cheers.

Now, onto my next problem...soon Smile | :)

passing a variable to a procedure

duke_swh26-Jul-08 23:07

duke_swh

26-Jul-08 23:07

You can create the textboxes as an array control and change the indexes according to your needs, and use this code to make them visible:

for i=1 to numberselected
textbox(i).visible = trun
next i

Matthew Leggett25-Jul-08 14:46

Matthew Leggett

25-Jul-08 14:46

Can some1 remind me how I pass a variable from one procedure to another in excel visual basic

Re: passing a variable to a procedure

Dalek Dave25-Jul-08 15:49