سلام. کد زیر یه مشکلی داره اما هرچی دستکاریش کردم درست نشد.
کسی هست بگه مشکل از کجاست؟
Sub save_click
If baazmoon.Checked = True Then
azmoon = 1
else if biazmoon.Checked = True Then
azmoon = 0
End If
sql1.ExecNonQuery("insert into data(leternumber,date,codemalli,city,fname,lname,birthday,reshte,start_date,azmoon) values("&Letter_num.Text&","&date.Text&","&codemelli.text&","&city.Text&","&fname.Text&","&lname.Text&","&birthday.Text&","&reshre.Text&","&date_start.Text&","&azmoon)
ToastMessageShow("اطلاعات کاربر ذخیره شد.",False)
End Sub
سوال
mostafaHD 44
سلام. کد زیر یه مشکلی داره اما هرچی دستکاریش کردم درست نشد.
کسی هست بگه مشکل از کجاست؟
Sub save_click If baazmoon.Checked = True Then azmoon = 1 else if biazmoon.Checked = True Then azmoon = 0 End If sql1.ExecNonQuery("insert into data(leternumber,date,codemalli,city,fname,lname,birthday,reshte,start_date,azmoon) values("&Letter_num.Text&","&date.Text&","&codemelli.text&","&city.Text&","&fname.Text&","&lname.Text&","&birthday.Text&","&reshre.Text&","&date_start.Text&","&azmoon) ToastMessageShow("اطلاعات کاربر ذخیره شد.",False) End Subلینک ارسال
به اشتراک گذاری در سایت های دیگر
6 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.