множение TextBox

[dr.MIG]

Мне размер заранее не известен

Так задай

Код: Выделить всё

ReDim Punkt(0 To NeedSize - 1)

Где NeedSize - переменная, в которой содержится количество элементов в массиве. Задай этот размер не заранее, а когда тебе станет известен необходимый размер массива.

[Технократ]

да, я разобрался, спасибо!

[Технократ]

А как возвращать значение из функции, по идее:

Переменная1 = Форма2.Функция(Перем1)

что то не хочет

[Viper]

что есть Форма2?

[dr.MIG]

И что есть функция? Т.е. что подразумевается под Функцией в данном примере и функция ли это?...

[Технократ]

Public Function An26(SigmaZARK)
......
......

SigmaZARK = 0.0175 * dS * Sqr((SigmaKURGrad ^ 2) + (SigmaPVGrad ^ 2))

End Function



Text1.Text = An26(SigmaZARK)

Не кладет он туда ничего(

[dr.MIG]

Я так и думал... И не должна в данном случае она ничего возвратить. Добавь последней строчкой в функцию:

Код: Выделить всё

An26=SigmaZARK ' собственно значение, которое должна вернуть функция

[Dmitriy2003]

Может все-таки создадим раздел "VB - НЕКРОФИЛИЗМ"...

An26=SigmaZARK

Это шутка что-ли,

При таком стиле челу и функция нафиг не нужна, передал переменную в процедуру ну так и присваивай ее к текстбоху.

Код: Выделить всё


Private VODKA, TRAVKA

Public Sub MachtsGUT(VODKA, TRAVKA)
    '
    VODKA = "0.5 pro Person"
    TRAVKA = "Ein mal rauchen"
    '
End Sub

Private Sub Form_Load()
    MachtsGUT VODKA, TRAVKA
    Me.Text1 = VODKA & vbNewLine & TRAVKA
End Sub


[Cytron]

Насчет того, что функция тут не нужна, Dmitry2003 прав.
Можно обойтись и Subом

[dr.MIG]

Я так и думал... И не должна в данном случае она ничего возвратить. Добавь последней строчкой в функцию:

Код: Выделить всё

An26=SigmaZARK ' СОБСТВЕННО, ЗНАЧЕНИЕ, КОТОРОЕ ДОЛЖНА ВЕРНУТЬ ФУНКЦИЯ

Думаю идея автору вопроса станет понятна после этого.
А насчёт An26=SigmaZARK в данном случае, понятно, что некрасиво...

[dr.MIG]

Насчет того, что функция тут не нужна, Dmitry2003 прав.
Можно обойтись и Subом

А кто сказал, что SigmaZARK - переменная уровня модуля?...

[Dmitriy2003]

Какой толк от такого параметра ?