Chops
03-23-2007, 01:10 PM
Alrighty, I've Googled around, tried some codes of my own, and asked one of my friends, but I have not found and answer, so I'm hopin' everyone on here can help me out.
I'm new to VB however I know a few other programing languages, so I have a general knoledge of what I'm doing.
Anywho, Basically, what I'm trying to do is make 43 Check Boxes (Don't Ask) linked together somehow where I can click a Command button and clear them all off... i know of atleast one very basic way of doing it, but I don't want to write:
Private Sub Blah_Click()
ChkSomething.Value = 0
ChkSomethingElse.Value = 0
ChkSoOn.Value = 0
End Sub
Also, I'm hoping that can help me with this (Mostly in the Linking Together Part), but I kinda want to do a similar thing with all my Text Boxes. Not Disabling them or making them the same text, but basically, I want them to carry the same if, which is a Integer, Delete, and Backspace KeyAscii only code, which is as Follows:
If KeyAscii = 6 Or KeyAscii = 8 Then Exit Sub
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
So basically, I want All 43 Text Boxes to be Integer Only, but without writing a Sub for each TextBox.
From what I've seen, VB is a little weak in some areas like this, so if there is nothing I can do about it, then that's good, but otherwise I thank anyway ahead of time just for reading my long post! Thanks.
- Chops
I'm new to VB however I know a few other programing languages, so I have a general knoledge of what I'm doing.
Anywho, Basically, what I'm trying to do is make 43 Check Boxes (Don't Ask) linked together somehow where I can click a Command button and clear them all off... i know of atleast one very basic way of doing it, but I don't want to write:
Private Sub Blah_Click()
ChkSomething.Value = 0
ChkSomethingElse.Value = 0
ChkSoOn.Value = 0
End Sub
Also, I'm hoping that can help me with this (Mostly in the Linking Together Part), but I kinda want to do a similar thing with all my Text Boxes. Not Disabling them or making them the same text, but basically, I want them to carry the same if, which is a Integer, Delete, and Backspace KeyAscii only code, which is as Follows:
If KeyAscii = 6 Or KeyAscii = 8 Then Exit Sub
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
So basically, I want All 43 Text Boxes to be Integer Only, but without writing a Sub for each TextBox.
From what I've seen, VB is a little weak in some areas like this, so if there is nothing I can do about it, then that's good, but otherwise I thank anyway ahead of time just for reading my long post! Thanks.
- Chops