سلام من یه برنامه نوشتم که توش از دیتابیس افلاین استفاده کردم حالا میخوام براش سرچ بسازم.تو قسمت سرچ ارور نمیده ولی تو برنامه به محض وارد کردن حرف بیرون میاد.اینم از کد اگه میشه لطفا کمکم کنید.
Private Sub EditText1_TextChanged (Old As String, New As String)
cur=sql1.ExecQuery("SELECT * FROM test WHERE test1 LIKE '%" & EditText1.Text & "%'")
For i=0 To cur.RowCount-1
cur.Position=i
lst_result.AddTwoLines(cur.GetString("name"),(cur.GetString("family")))
If EditText1.Text="" Then
lst_result.Clear
End If
Next
End Sub
اینم از متغیر هام برای اینکه گیج نشین😁
Sub Process_Globals
Dim sql1 As SQL
Dim cur As Cursor
End Sub
Sub Globals
Private EditText1 As EditText
Private ListView1 As ListView
Private lst_result As ListView
End Sub
هم اکنون می توانید مطلب خود را ارسال نمایید و بعداً ثبت نام کنید.
اگر حساب کاربری دارید، برای ارسال با حساب کاربری خود اکنون وارد شوید .
توجه: strong> مطلب ارسالی شما پس از تایید مدیریت برای همه قابل رویت خواهد بود.
سوال
yasindeveloper 0
سلام من یه برنامه نوشتم که توش از دیتابیس افلاین استفاده کردم حالا میخوام براش سرچ بسازم.تو قسمت سرچ ارور نمیده ولی تو برنامه به محض وارد کردن حرف بیرون میاد.اینم از کد اگه میشه لطفا کمکم کنید.
اینم از متغیر هام برای اینکه گیج نشین😁
لینک ارسال
به اشتراک گذاری در سایت های دیگر
1 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
به گفتگو بپیوندید
هم اکنون می توانید مطلب خود را ارسال نمایید و بعداً ثبت نام کنید. اگر حساب کاربری دارید، برای ارسال با حساب کاربری خود اکنون وارد شوید .
توجه: strong> مطلب ارسالی شما پس از تایید مدیریت برای همه قابل رویت خواهد بود.