سلام دوستان شديدآ كارم گيره اين چندتا سوال ترو خدا اگه كسي بلده كمك كنه
1- وقتي برنامه ميخواد براي اولين بار ركورد ثبت كنه اگه ديتابيس خالي باشه ارور ميده !!! چطوري بايد اين مشكل رو حل كنيم ؟؟؟
2- ميخوام تو ديتابيسم يه رنج عدد رو جست و جو كنم طبق كد زير
مثلآ از عدد 2 تا5
If Trim(txtrenge1.Text) = vbNullString Or Trim(txtrenge2.Text) = vbNullString Then
MsgBox "please fill blank textbox", vbInformation + vbMsgBoxRight, "error"
Else
Adodc1.Refresh
Adodc1.Recordset.Find "az='" & Trim(txtrenge1.Text) &"'"
DataGrid1.SetFocus
End Ifاين فقط يه تكس باكس رو تو ديتابيس جست و جو ميكنه و تو ديتا گريد فوكوس ميكنه حالا ميخوام تكس renge1 رو تا محدوده txtrenge2 جست و جو كنم چطوري ؟؟؟؟ هر چي ور رفتم نتونستم
3-اگه بخواهيم كل ركورد هاي يك تيبل رو از تو vb حذف كنيم چطوري اين كار رو بكنيم ؟
4- و سوال اصلي . چطوري ميشه يه متن + چندتا تكست باكس رو به پرينتر فرستاد مثلآ ميخوام اينطوري باشه
سلام كاربر محترم نام شما هست textbox1.text و رمز عبور text2.text حالا ميخوام اينارو چاپ كنه . چطوري اين كار رو بكنم ؟
ترو خدا اگه كسي ميدونه كمك كنه هر كس كمك كنه يه دنيا ممنونش ميشم .
1- وقتي برنامه ميخواد براي اولين بار ركورد ثبت كنه اگه ديتابيس خالي باشه ارور ميده !!! چطوري بايد اين مشكل رو حل كنيم ؟؟؟
2- ميخوام تو ديتابيسم يه رنج عدد رو جست و جو كنم طبق كد زير
مثلآ از عدد 2 تا5
If Trim(txtrenge1.Text) = vbNullString Or Trim(txtrenge2.Text) = vbNullString Then
MsgBox "please fill blank textbox", vbInformation + vbMsgBoxRight, "error"
Else
Adodc1.Refresh
Adodc1.Recordset.Find "az='" & Trim(txtrenge1.Text) &"'"
DataGrid1.SetFocus
End If
3-اگه بخواهيم كل ركورد هاي يك تيبل رو از تو vb حذف كنيم چطوري اين كار رو بكنيم ؟
4- و سوال اصلي . چطوري ميشه يه متن + چندتا تكست باكس رو به پرينتر فرستاد مثلآ ميخوام اينطوري باشه
سلام كاربر محترم نام شما هست textbox1.text و رمز عبور text2.text حالا ميخوام اينارو چاپ كنه . چطوري اين كار رو بكنم ؟
ترو خدا اگه كسي ميدونه كمك كنه هر كس كمك كنه يه دنيا ممنونش ميشم .