Wrox Programmer Forums
|
Beginning VB 6 For coders who are new to Visual Basic, working in VB version 6 (not .NET).
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Beginning VB 6 section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old May 26th, 2004, 08:58 AM
Registered User
 
Join Date: Jun 2003
Posts: 5
Thanks: 0
Thanked 0 Times in 0 Posts
Default grouping tools

When you group a number of textboxes is it possible to apply a "change" event which will recalculate all text boxes whenever a single textbox within the group is changed.
 
Old May 26th, 2004, 01:01 PM
Friend of Wrox
 
Join Date: Jun 2003
Posts: 627
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Put all you text boxes in the same container (like a frame) and
put this code in the myText_Change even. This loops through all the text boxes in the same container

dim obj as control
for each obj in me.control
if typeof obj is TextBox then
if obj <> myText then
if obj.parent = myText.parent then
'' do whatever with obj

But be careful that this introduces a reintrance!
Another way to deal with this problem is to create an array of text boxes (much easier)

Marco
 
Old June 2nd, 2004, 10:30 AM
Registered User
 
Join Date: Jun 2003
Posts: 5
Thanks: 0
Thanked 0 Times in 0 Posts
Default

cheers Marco will have a go





Similar Threads
Thread Thread Starter Forum Replies Last Post
tools.jar reza_ahmadi Java Espanol 0 December 26th, 2006 07:11 AM
Protect cells and allow grouping/un-grouping sfreuden Excel VBA 4 December 14th, 2006 08:01 AM
Java tools celticJedi Pro Java 0 May 9th, 2006 07:52 AM
Third Party Tools surendran MySQL 1 March 18th, 2005 11:30 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.