PDA

View Full Version : نحوه استفاده از دکمه های Toolbar control



SAMARE
دوشنبه 23 شهریور 1388, 15:39 عصر
سلام به همه دوستان
میخواستم بدونم چجوری میتونم از دکمه های درون toolbar به عنوان لینک از یه صفحه به صفحه دیگر و غیره استفاده کنم؟؟؟

viper2009
دوشنبه 23 شهریور 1388, 20:40 عصر
سلام به همه دوستان
میخواستم بدونم چجوری میتونم از دکمه های درون toolbar به عنوان لینک از یه صفحه به صفحه دیگر و غیره استفاده کنم؟؟؟

سلام

یعنی چه؟ توضیح بیشتر بده.

shina jun
سه شنبه 24 شهریور 1388, 12:09 عصر
سلام من هم این مشکل را دارم
البته نمیدونم منظور (samare) جان این هست یا نه اما مشکل من این است که چون برای toolbar فقط یک رویداد کلیک اتفاق می افته کدهای مختلف برای دکمه های مختلف toolbar فقط یک کار را انجام میدهند
من از دستور ifوselect case هم استفاده کردم اما موفق نشدم از کسی از دوستان میدونه بگه که شدیدا بهش احتیاج دارم

shina jun
چهارشنبه 01 مهر 1388, 10:20 صبح
سلام دوستان من جوابش پیدا کردم
باید از خاصیت tag دکمه ها استفاده کرد.یعنی در formloud به خاصیت تگ هرکدوم مقدار میدهیم تا مشخص شود که رویدادکلیک کدام دکمه رخداده است سپس در رویداد کلیک toolbar با استفاده از ارگومان e کد مورد نظر را برای هر دکمه مینویسیم
یک مثال
formloud_click
ToolBar1.Buttons(0).Tag = 1
ToolBar1.Buttons(1).Tag = 2
ToolBar1.Buttons(2).Tag = 3
ToolBar1.Buttons(3).Tag = 4
ToolBar1.Buttons(4).Tag = 5
ToolBar1.Buttons(5).Tag = 6
--------------------------------
Private Sub ToolBar1_ButtonClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolBarButtonClickEventArgs) Handles ToolBar1.ButtonClick
Dim e1 As New System.EventArgs
Select Case e.Button.Tag
Case 1
Dim objform As New Form9
objform.Show()
Case 2
Dim objform As New Form8
objform.Show()
Case 3
Dim objform As New Form17
objform.Show()
Case 4
Dim objform As New Form19
objform.Show()
Case 5
Dim objform As New Form16
objform.Show()
Case 6
Dim objform As New Form14
objform.Show()
End Select
End Sub