نمایش نتایج 1 تا 6 از 6

نام تاپیک: تشخیص یک کلمه در لیست

  1. #1

    تشخیص یک کلمه در لیست

    سلام دوستان
    چطور میتونم اینکارو بکنم که برنامم :

    وقتی داخل list1 کلمه ای با عنوان 111 هست یک اررور بده و بگه هست و در غیر اینصورت بزنه نیست.

  2. #2

    نقل قول: تشخیص یک کلمه در لیست

    Dim i As Integer
    For i = 0 To List1.ListCount - 1
    List1.ListIndex = i
    If List1.Text = txtsearch.Text Then
    MsgBox " يافت شد" & i, vbInformation + vbOKOnly, "founded"
    Exit Sub
    End If
    Next i
    MsgBox " يافت نشد", vbExclamation + vbOKOnly, "not founded"


  3. #3

    نقل قول: تشخیص یک کلمه در لیست

    این کد خوبه...
    نمیشه ساده تر و جمع و جور تر نوشتش؟؟

  4. #4

    نقل قول: تشخیص یک کلمه در لیست

    همش چهار خط کده دیگه از این سادتره می خوای واسه چی

  5. #5

    نقل قول: تشخیص یک کلمه در لیست


    For i = 0 To List1.ListCount - 1
    If List1.List(i) = "111" Then
    MsgBox ("Error")
    Exit For
    End If
    Next


  6. #6
    کاربر دائمی
    تاریخ عضویت
    فروردین 1389
    محل زندگی
    اصفهان
    پست
    717

    نقل قول: تشخیص یک کلمه در لیست

    بیا این هم ساده ترین خط کد دنیا

    For i = 0 To List1.ListCount - 1
    If List1.List(i) = "111" Then msgbox "Hast": Exit for
    Next


تاپیک های مشابه

  1. تشخیص وجود یک کلمه در تکست
    نوشته شده توسط xrezax در بخش برنامه نویسی در 6 VB
    پاسخ: 6
    آخرین پست: چهارشنبه 24 شهریور 1389, 23:10 عصر
  2. چک کردن یک کلمه در لیست
    نوشته شده توسط xrezax در بخش برنامه نویسی در 6 VB
    پاسخ: 25
    آخرین پست: پنج شنبه 04 تیر 1388, 10:42 صبح
  3. تشخیص یک کلمه در جایی خارج از برنامه توسط برنامه
    نوشته شده توسط seven7777777 در بخش برنامه نویسی در Delphi
    پاسخ: 3
    آخرین پست: یک شنبه 23 دی 1386, 04:28 صبح

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •