|
|
|
CALLBYNAME
|
|||
|---|---|---|---|
|
#18+
Пытаюсь вызвать функцию с помощью CallByName выдает ошибку:Argument not optional Функция объявлена в классе: Public Function TTT(s As String, s1 As String) MsgBox s & s1 End Function Вызываю вот так: Private Sub Command1_Click() Dim aParams() As Variant Dim oClass1 As Class1 On Error GoTo Error Set oClass1 = New Class1 ReDim aParams(0 To 1) aParams(0) = "DDD": aParams(1) = "ЖЖЖ" CallByName oClass1, "TTT", VbMethod, aParams Error: MsgBox Err.Description End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.05.2003, 15:15 |
|
||
|
|
start [/forum/search_topic.php?author=dmitri...&author_mode=last_topics&do_search=1]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
get settings: |
10ms |
get forum list: |
19ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
55ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
49ms |
get tp. blocked users: |
2ms |
| others: | 714ms |
| total: | 898ms |
| 0 / 0 |
