Article ID: 191719
Article Last Modified on 5/13/2003
Private Sub Command1_Click()
MsgBox "Updown1 BuddyPropery is " & UpDown1.BuddyProperty
MsgBox "Updown2 BuddyPropery is " & UpDown2.BuddyProperty
End Sub
Private Sub Form_Load()
UpDown1.BuddyControl = Text1
UpDown1.BuddyProperty = "text"
UpDown2.BuddyControl = Slider1
UpDown2.BuddyProperty = "value"
End Sub
Additional query words: kbDSupport kbDSD kbVBp kbVBp600bug kbVBp500bug kbCmnCtrls
Keywords: kbbug KB191719