Я незнаю на чём я пишу, но мне нужна помощ

Пишу я в "Microsoft Visual Studio 2008" какой язык при создании проэкта выбрал - непомню >_< Кажись Visual Basic а может и C++
Ну не в этом смысл...
Есть такая функция

Я так понимаю, когда я вызываю check(число) он должен добавить его в Label2.Text
Я сделал вот так

А он мне в Label2.Text пишет "SmartDeviceProject3.F" ну тама продолжение будет если больше 20 вызывать
Тоесть при вызове check(3) он пропишет в Label2.Text букву "a"
Это как так вобще... Я расчитывал на то, чтоб он вывел
1234567891011121314151617181920
а он выводит
SmartDeviceProject3.F

Что курили авторы этого языка?
И что нужно сделать/скурить чтоб он мне вывел то, что я хочу
Подозреваю трабла в слове "ByVal" но я незнаю что оно значит, "Microsoft Visual Studio 2008" сам это слово вставил и не даёт удалить, возвращает обратно при компиляции

 

Название темы улыбнуло.

 

Мне гугл сказал скачать "Microsoft Visual Studio 2008" я скачал, а на чём в нём кодить над не написано, кодю на том, на чём работает

 

Дай весь код... пишешь ты vb.

 

1 из 3



МБ всётаки поможете за печеньку?
======

Code:

Public Class Form1
    Function check(ByVal num)
        Label2.Text = Label2.Text + ToString(num)
    End Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        check(0)
        check(1)
        check(2)
        check(3)
        check(4)
        check(5)
        check(6)
        check(7)
        check(8)
        check(9)
        check(10)
        check(11)
        check(12)
        check(13)
        check(14)
        check(15)
        check(16)
        check(17)
        check(18)
        check(19)
        check(20)
    End Sub
End Class

Кстате как в vb ставить комменатри?
//
#
--
/* */
{ }
ему не нравятся, а больше я незнаю

 

Компилятора, vb, под рукою у меня нету, да и не писал я никогда в нём)) но кажись дело и вправду в ByVal попробуй его замени на Integer

 

Function check(ByVal num As Integer)
Label1.Text = Label1.Text + num.ToString
Return 1
End Function
Вот попробуй...

 

Да я пробовал

Не помогло

 

ты Label1 оставил или поменял на свой(label2)?

 

Ну вот такое оно



обычный label...

 

хез)) скачай книжку какую нить толковую, методом тыка врядли быстро ненадоест... А, вообще, в след. раз выбирай C#

 

в той функции, которую я тебе написал, поменяй label1 на label2

 

Хакеры, звеняйте, не заметил чо ToString(num) над заменить на num.ToString
Так работает, цёма

И ещё, ToString это в строку, а как в Integer? ToInt/ToInteger нету

Нормально работает и без ToInt

А вот как округлить? Мне не в кайф видеть 3.3333333333333333
Round() нету, а гугл говорить юзать Round

 

юзай Math.Round()

 

' одинарная ковычка xD

 

В вб по-моему невозможно не разобраться.
Вот пример с округлением:

Code:

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For i = 0 To 20
            check(i / 3)
        Next i
    End Sub

    Private Sub check(ByVal num)
        Label1.Text = Label1.Text + Str$(System.Math.Round(num)) + " "
    End Sub
End Class

 

Math.Round работает, спс, прога работает, /me доволен

 

эх... народ... с0всем бейсик забыли...
Label1.Text = Label1.Text & num и будет тебе счастье.
А если учесть что это MS овское тварение, то прокатит даже такая конструкция:
Label1.Text &= num