I want to be able to resize a textbox when a user clicks on a textbox within a datarepeater. So the textbox will start out as a single line, but would expand to be multiline to better allow the user to enter text. When the user's mouse leaves the textbox I want it to return to the original size. I tried changing the textbox.height, but nothing happens. Any help is appreciated.

---

http://blogs.windowsclient.net/wwade73/

Well, this should be easily done by setting the multiline property of the textbox.
For example,

Private Sub TextBox1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseEnter
Me.TextBox1.Multiline = True
Me.TextBox1.Height = 100
End Sub

Private Sub TextBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseLeave
Me.TextBox1.Multiline = False
End Sub

Hope this would help.

---

John Chen -- See my team blog: http://blogs.msdn.com/vsdata. All my posts are provided "AS IS" with no warranties, and confer no rights.

Well, this should be easily done by setting the multiline property of the textbox.
For example,

Private Sub TextBox1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseEnter
Me.TextBox1.Multiline = True
Me.TextBox1.Height = 100
End Sub

Private Sub TextBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseLeave
Me.TextBox1.Multiline = False
End Sub

Hope this would help.

---

John Chen -- See my team blog: http://blogs.msdn.com/vsdata. All my posts are provided "AS IS" with no warranties, and confer no rights.

John,

I had already tried that (forgot to mention I used multiline = true) but nothing happens.

Wade

---

http://blogs.windowsclient.net/wwade73/

Hi Wade,

Sorry I have not tested my code with a DataRepeater as I thought your issue is on MultipleLine = true.
And yes you are right, it is nto straight-forward on the DataRepeater to realize it as theTextBox control are cloned inthedisplayed row.

Change to the following code, it should work:

Private Sub TextBox1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseEnter
Dim txtBox As TextBox = TryCast(sender, TextBox)
If (txtBox IsNot Nothing) Then
txtBox.Multiline = True
txtBox.Height = 100
End If
End Sub

Private Sub TextBox1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.MouseLeave
Dim txtBox As TextBox = TryCast(sender, TextBox)
If (txtBox IsNot Nothing) Then
txtBox.Multiline = False
End If
End Sub


You can see that inside the event hadler, we should not assume the TextBox control is me.TextBox1, which is just a template. You will need to use the one from sender.

Hope this time it will solve your issue.

Thanks!

---

John Chen -- See my team blog: http://blogs.msdn.com/vsdata. All my posts are provided "AS IS" with no warranties, and confer no rights.