Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / cint chr & ? / 5 сообщений из 5, страница 1 из 1
11.08.2015, 08:49
    #39026759
wtf_vb
wtf_vb
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cint chr & ?
Приветствую!

Перевожу код из VB в Oracle, наткнулся на кусок кода и не понимаю как это работает, может кто объяснит?

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Dim BCode(0 To 1023) As Integer
Dim BInd As Integer
Dim Ch As Integer 
Dim Ch2 As Integer
...
BCode(BInd) = CInt(Chr(Ch) & Chr(Ch2))
...


Chr, насколько я понимаю, возвращает символ по коду, а CInt - ближайшее целое четное (от числа, но не от символа)?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2015, 09:00
    #39026764
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cint chr & ?
берутся два кода символов, преобразовываются в символы, склеиваются и преобразовываются в число.

бред какой-то. коды ch и ch2 должны быть в промежутке 48-57 (символы 0-9), иначе этот код работать не будет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2015, 09:05
    #39026767
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cint chr & ?
wtf_vbChr, насколько я понимаю, возвращает символ по кодуДа.
wtf_vbCInt - ближайшее целое четное (от числа, но не от символа)?Нет. CInt округляет до целого, используя бухгалтерское округление (если дробная часть равна точно 0,5 - к ближайшему чётному, иначе к ближайшему целому).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2015, 09:09
    #39026772
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cint chr & ?
Antonariyкоды ch и ch2 должны быть в промежутке 48-57 (символы 0-9), иначе этот код работать не будет.ch может быть минусом или точкой, либо ch2 точкой.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2015, 09:14
    #39026777
wtf_vb
wtf_vb
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
cint chr & ?
Antonariy,

Спасибо. Они в промежутке (48-57) да, не понимал только зачем тут СInt, ибо дробной части тут не может быть, оказывается просто преобразование в число .

Akina,
Спасибо за участие )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / cint chr & ? / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 137ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2155828]:
 0ms
get settings:
 9ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 41ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 2ms
others: 12ms
total:  137ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]