Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - VBA

Страница:

 

  Вопрос: как слушать эвенты com-сервера? Добавлено: 02.07.10 13:31  

Автор вопроса:  С.В.И.Н
есть такой код работы с com-сервером


Public Class Form1

    Dim WithEvents obp As stpl.stpl_drv

    Private Sub obp_on_data_w_x_y(ByVal d1 As Double, ByVal d2 As Double, ByVal d3 As Double, ByVal d4 As Double, ByVal d5 As Double, ByVal d6 As Double)
        TextBox5.Text = Str(d5)
        TextBox6.Text = "xx"
    End Sub
    
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        obp = CreateObject("stpl.stpl_drv")

    End Sub

    Private Sub cmdDynamic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdDynamic.Click
        obp.data_w_x_y()
    End Sub

End Class


метод data_w_x_y сервером принимается.
эвент on_data_w_x_y программой не хочет отлавливаться.
в чем ошибка? если что, изучать VB начал вчера..

Ответить

  Ответы Всего ответов: 0  

Нет ответов

Страница:

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам