منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كود استدعاء - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كود استدعاء (/showthread.php?tid=2616)

كود استدعاء - ابراهيم مراد - 19-04-14

السلام عليكم ممكن كود تنفيذ الامر دا
PHP كود :
If ListBox1.SelectedIndex < ListBox1.Items.Count - 1 Then
            TextBox1.Text = ListBox1.SelectedItem.ToString
            Dim myclass As New vt
            myclass.GetData(TextBox1.Text)
        Else
            ' ListBox1.SelectedIndex = -1
        End If 
فى BackgroundWorker

RE: كود استدعاء - ابراهيم مراد - 20-04-14

رجاء المساعده المشكله فى اليست بوكس مش بيتقرا خالص دا فى الباك جروند

RE: كود استدعاء - Aly El-Haddad - 20-04-14

كود :
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Control.CheckForIllegalCrossThreadCalls = False
        BackgroundWorker1.RunWorkerAsync()
    End Sub

    Private Sub BackgroundWorker1_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        If ListBox1.SelectedIndex < ListBox1.Items.Count - 1 Then
            TextBox1.Text = ListBox1.SelectedItem.ToString
            Dim myclass As New vt
            myclass.GetData(TextBox1.Text)
        Else
            ListBox1.SelectedIndex = -1
        End If
    End Sub
End Class


RE: كود استدعاء - Aly El-Haddad - 20-04-14

بالمناسبة لا تسمي متغيراتك بالأسماء المحجوزة في الـVB مثل MyClass

RE: كود استدعاء - ابراهيم مراد - 21-04-14

(20-04-14, 06:39 PM)Aly El-Haddad كتب : بالمناسبة لا تسمي متغيراتك بالأسماء المحجوزة في الـVB مثل MyClass

اخى الفاضل اشكرك ع اهتمامك وردك ولكن عند التنفيذ لا يقوم باستدعاء الكلاس لماذا اكنى مفيش اكواد اتصال فى الكلاس