Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > как создать функци на вб


Автор: Step 28.4.2003, 11:13
функцию я создал а вызываться не хочет пишет что ошика объект рекваерт

Автор: Step 28.4.2003, 11:14
срочно, очень срочно....

Автор: valex13 29.4.2003, 10:31
Вот пример тупой функции.

'Функция определяющая длину строки sStr. Забивает остальное пробелами
Function SetLen(ByVal sStr As String, ByVal iCount As Integer) As String

If sStr = sEmpty Then Exit Function

If Len(sStr) = iCount Then
SetLen = sStr
Exit Function
End If

If Len(sStr) < iCount Then
sStr = sStr + String$(iCount - Len(sStr), " ")
Else
sStr = Left$(sStr, 25)
End If
SetLen = sStr
End Function

Автор: Step 29.4.2003, 14:38
так и сделал, а мне ошибка: "объект рекваерт"

Автор: valex13 30.4.2003, 03:56
Покажи код. Опиши. Это не нормально. И на приведенную функцию тоже ругается?

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)