دروستكردنی فه‌رهه‌نگی كوردی – ئینگلیزی به‌ VB.net

بابه‌تی هاوشیوه‌

نوسیتی: karwanpro / ڕێكه‌وتی: 2011-05-26 , پێنج شه‌ممه‌

له‌م بابه‌ته‌دا باس له‌ دروست كردنی فه‌رهه‌نگێك ده‌كه‌ین به‌ Visual Basic 2008 دوای ئه‌وه‌ی باسی دروستكردنی فه‌رهه‌نگمان كرد به‌ مه‌ڵتیمیدیا بڵده‌ر و http://karwan-pro.do.am/blog/vb6/2011-01-07-56 تاكوو به‌كارهێنه‌رانی فیژوال به‌یسك.نێت بێ به‌ش نه‌بن له‌م بابه‌ته‌ به‌و هیوایه‌ی له‌ دواڕۆژدا گه‌شه‌بكات و ببێت به‌ فه‌رهه‌نگێك هاوشێوه‌ی فه‌رهه‌نگی گووگل

هه‌نگاوی یه‌كه‌م :

سه‌ره‌تا پێویسته‌ داتابه‌یسێك دروست بكه‌ین به‌ ئه‌كسس به‌م شێوه‌ی خواره‌وه‌
به‌رنامه‌ی ئه‌كسس ده‌كه‌ینه‌وه‌ و Blank Database ده‌كه‌ین و پاشان ناوێك له‌ داتابه‌یسه‌كه‌ ده‌نێین و Create ده‌كه‌ین و پاشان خشته‌یه‌ك د روست ده‌كه‌ین و ئه‌م فیڵدانه‌ی تیا داده‌نێین

هه‌نگاوی دووه‌م :

ئێستا پێویسته‌ ئه‌و وشانه‌ی تیا تۆمار بكه‌ین كه‌ له‌ فه‌رهه‌نگه‌كه‌دایه‌
ئێسته‌ پێویسته‌ پرۆژه‌یه‌كی نوێ بكینه‌وه‌ و ئامرازه‌كانی(Listbox, label, textbox, button, groupbox)
بۆ فۆڕمه‌كه‌ زیاد بكه‌ین و به‌م شێوه‌یه‌ ڕێكی بخه‌ین
Image
دا ئه‌م سیفه‌تانه‌ جێبه‌جێی ده‌كه‌ین‌ Properties له‌په‌نجه‌ره‌ی
ئامرازه‌كان Properties گۆڕانكاری

Form1 Backcolor LightSlateGray
StartPosition CenterScreen
Text KarwanPro Dictionary
listbox1 Name ListEn
visible True
listbox2 Name ListKu
Visible False
Listbox3 Name ListAr
Visible False
Textbox1 Name TxtKu
Visible True
Textbox2 Name TxtEn
Visible False
Textbox3 Name TxtAr
Visible True
Picturebox1 Name PicWord
Label1 Name lbl
Button1 Text ” كوردی”
Button2 Text “ئینگلیزی”
Button3 Text “عةرةبى”

فۆڕمه‌كه‌ به‌ شێوه‌ لێ ده‌كه‌ین

ئێستا به‌ پێی ئه‌م وێنه‌یه‌

پاشان Next ده‌كه‌ین

كلیك له‌سه‌ر Browse و داتابه‌یسه‌كه‌مان ده‌هێنین و OK ده‌كه‌ین و پاشان Next ده‌كه‌ین و پاشان Yes و Next ده‌كه‌ین و نیشانه‌یه‌ك ده‌ده‌ین له‌ Tables و Finish ده‌كه‌ین
پاشان بۆ هه‌ریه‌كه‌ له‌ TxtKu و TxtEn و TxtAr ئه‌م هه‌نگاوانه‌ جێبه‌جێ‌ ده‌كه‌ین

ئه‌مه‌ بۆ TxtKu بوو بۆ TxtEn (English)و TxtAr (Arabic) دیاری‌ بكه
‌پاشان بڕۆ سه‌ر ListEn و به‌م شێوه‌ی لێ بكه

(Arabic)هه‌ڵبژێره‌ Display Member ListAr
(English) هه‌ڵبژێره‌ Display Member ListEn
(Kurdish) هه‌ڵبژێره‌ Display Member ListKu

هه‌نگاوی سێیه‌م :

ده‌بڵ كلیك له‌سه‌ر دووگمه‌ی كوردی ده‌كه‌ین و ئه‌م كۆده‌ی تیا ده‌نوسین:

Code

ListEn.Visible = False
ListAr.Visible = False
ListKu.Visible = True
TxtSearchEn.Visible = False
TxtSearchAr.Visible = False
TxtSearchKu.Visible = True
Lbl.Text = "ئينطليزى"
TxtEn.Visible = True
TxtKu.Visible = False

له‌ دوگمه‌ی ئینگلیزی ئه‌م كۆده‌ ده‌نوسین :

Code

ListEn.Visible = True
ListAr.Visible = False
ListKu.Visible = False
TxtSearchEn.Visible = True
TxtSearchAr.Visible = False
TxtSearchKu.Visible = False
Lbl.Text = "كوردى"
TxtEn.Visible = False
TxtKu.Visible = True

له‌ دوگمه‌ی عه‌ره‌بی ئه‌م كۆده‌ ده‌نوسین :

Code

ListEn.Visible = False
ListAr.Visible = True
ListKu.Visible = False
TxtSearchEn.Visible = False
TxtSearchAr.Visible = True
TxtSearchKu.Visible = False

ده‌چینه‌ سه‌ر Solution Explorer و تیایدا ده‌چینه‌ سه‌ر داتا سێته‌كه‌ كه‌ ئه‌وه‌ی من ناوی WordDataset ‌و View Designer ده‌كه‌ین و پاشان ئه‌م هه‌نگاوانه‌ جێبه‌جێ ده‌كه‌ین :
هه‌نگاوی یه‌كه‌م و دووه‌م Next ده‌كه‌ین و هه‌نگاوی سێیه‌م Query Builder ده‌كه‌ین

پاشان OK و Next ده‌كه‌ین و له‌ بۆكسی Method Name ده‌نوسین FillByEnglish ده‌نوسین و Finish

بۆ هه‌ریه‌كه‌ له‌ Arabic و Kurdish هه‌مان ڕێگه‌ به‌كارده‌هێنین وه‌ك ئه‌م وێنه‌یه‌

له‌ كۆتایدا به‌م شێوه‌یه‌یه‌ :

ئێستا پێویسته ‌كۆد بۆ دۆزینه‌وه‌ی وشه‌كه‌ بكه‌ین له‌ TxtSearchEn ئه‌م كۆده‌ ده‌نوسین

Code

Private Sub TxtSearchEn_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TxtSearchEn.TextChanged
Me.DataTableAdapter.FillByEnglish(Me.WordDataSet.Data, TxtSearchEn.Text)
End Sub

بۆ TxtSearchKu ئه‌م كۆده‌ ده‌نوسین :

Code

Private Sub TxtSearchKu_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtSearchKu.TextChanged
Me.DataTableAdapter.FillByKurdish(Me.WordDataSet.Data, TxtSearchKu.Text)
End Sub

بۆ TxtSearchAr ئه‌م كۆده‌ ده‌نوسین :

Code

Private Sub TxtSearchAr_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtSearchAr.TextChanged
Me.DataTableAdapter.FillByArabic(Me.WordDataSet.Data, TxtSearchAr.Text)
End Sub

هه‌موو كۆده‌كان لێره‌وه‌ داگردن

ئێستا كۆتای هات هیوادارم سودێكم به‌ ئێوه‌ گه‌یاندبێ و له‌ كه‌م و كورتیه‌كانم ببورن

1225 جار بينراوه‌