ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

25.03.2010, 17:29
|
|
Участник форума
Регистрация: 20.02.2009
Сообщений: 224
Провел на форуме: 5075819
Репутация:
274
|
|
Сообщение от Ponchik
Да я пробовал

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

25.03.2010, 17:30
|
|
Новичок
Регистрация: 05.08.2009
Сообщений: 4
Провел на форуме: 60249
Репутация:
5
|
|
в той функции, которую я тебе написал, поменяй label1 на label2
|
|
|

25.03.2010, 17:30
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме: 6828219
Репутация:
2274
|
|
Хакеры, звеняйте, не заметил чо ToString(num) над заменить на num.ToString
Так работает, цёма
И ещё, ToString это в строку, а как в Integer? ToInt/ToInteger нету
Нормально работает и без ToInt
А вот как округлить? Мне не в кайф видеть 3.3333333333333333
Round() нету, а гугл говорить юзать Round
Последний раз редактировалось Ponchik; 25.03.2010 в 18:25..
|
|
|

25.03.2010, 18:41
|
|
Постоянный
Регистрация: 09.06.2005
Сообщений: 531
Провел на форуме: 3516666
Репутация:
439
|
|
Сообщение от Ponchik
Round() нету, а гугл говорить юзать Round
юзай Math.Round()
|
|
|

25.03.2010, 18:47
|
|
Познающий
Регистрация: 23.09.2007
Сообщений: 75
Провел на форуме: 938032
Репутация:
86
|
|
Сообщение от Ponchik
Кстате как в vb ставить комменатри?
ему не нравятся, а больше я незнаю
' одинарная ковычка xD
|
|
|

25.03.2010, 19:04
|
|
Reservists Of Antichat - Level 6
Регистрация: 25.03.2008
Сообщений: 670
Провел на форуме: 4137635
Репутация:
2407
|
|
В вб по-моему невозможно не разобраться.
Вот пример с округлением:
Код:
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
|
|
|

25.03.2010, 19:37
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме: 6828219
Репутация:
2274
|
|
Math.Round работает, спс, прога работает, /me доволен
|
|
|

25.03.2010, 22:33
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
эх... народ... с0всем бейсик забыли...
Label1.Text = Label1.Text & num и будет тебе счастье.
А если учесть что это MS овское тварение, то прокатит даже такая конструкция:
Label1.Text &= num
Последний раз редактировалось slesh; 25.03.2010 в 22:36..
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|