کلیک بر روی دکمه

[IranVB]

سلام
چه دستوری میتوانم بر روی دکمه کلیک کنم؟

باتشکر از همه دوستان

[butterfly8528]

سلام دوست عزیز .

اگه دکمه مربوط به پروژه خودتون هست می تونید با فراخوانی رویداد Click دکمه مورد نظر ، کدهای رویداد Click آن دکمه را اجرا کنید .

مثال :
Private Sub Command1_Click()
MsgBox Time
End Sub

Private Sub Form_Load()
Command1_Click
End Sub


و اگه دکمه متعلق به برنامه خودتون نیست ، می تونید پس از به دست آوردن هندل دکمه مورد نظر، با استفاده از توابع SendMessage و یا PostMessage ، پیغام WM_LBUTTONDOWN = &H201 و WM_LBUTTONUP = &H202 رو بهش ارسال کنید .

همچنین می تونید از تابع mouse_event (http://barnamenevis.org/showthread.php?271673-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%B4%D8%A8%D9%8A%D9%87-%D8%B3%D8%A7%D8%B2%D9%8A-%D8%B1%D9%88%D9%8A%D8%AF%D8%A7%D8%AF-%D9%87%D8%A7%D9%8A-%D9%85%D9%88%D8%B3-%D9%88-%DA%A9%D9%8A%D8%A8%D9%88%D8%B1%D8%AF-%28-%D8%A7%D8%B1%D8%B3%D8%A7%D9%84-%DA%A9%D9%84%DB%8C%DA%A9-%D9%88-...-%29-.) استفاده کنید .

موفق باشید :لبخندساده:.

[بهروز عباسی]

درود
دوتا کامند بذار روی فرم و اینو اجرا کن
اابته اگه منظورت این بوده باشه

Private Sub Command1_Click()
MsgBox "click"
End Sub

Private Sub Command2_Click()
Command1_Click
End Sub




موفق باشی

[محسن واژدی]

سلام علیکم
برای کلیک بر دکمه روی فرم از دستور زیر هم میتوانید استفاده کنید:
Private Sub Command1_Click()
Command2.Value = True
End Sub

Private Sub Command2_Click()
MsgBox "Clicked"
End Sub


موفق باشید