2017-02-22 8 views
-4

Мне нужно проверить, сколько шестерков может вписаться в число, введенное пользователем, чтобы впоследствии использовать его в моей программе. Так, например, два шестерки могут вписаться в 13. Мне было интересно, есть ли алгоритм, который я могу использовать для этого.Visual Basic - как проверить, сколько раз число переходит в другое.

+6

Разве это не простое деление? –

+0

Просьба уточнить, используете ли вы vba (т. Е. В макросе Excel) или vb.net (вы отметили визуальную студию). –

+0

Чтобы объяснить, что все говорят о делении: в математической формуле 'a/b = c', c - это количество раз, которое b переходит в a *. Так, например, '13/6 = 2.16666 ...', поэтому '6' переходит в' 13' '2.16666 ...' раз. Если вам не нужна дробная часть, вы можете использовать «целочисленное деление» (оператор \ вместо оператора /), чтобы получить результат, усеченный до целого целого. В этом случае '13 \ 6 = 2'. – Blackhawk

ответ

3

Вы хотите сделать целочисленное деление. Смотрите страницу MSDN о arithmetic operators или страницу MSDN о \ Operator:

Dim k As Integer 
k = 23 \ 5 
' The preceding statement sets k to 4. 
2

, если вам нужно это, просто разделить одно на другое и изменить на целое число:

https://msdn.microsoft.com/en-us/library/se0w9esz.aspx говорит

number1 \ number2 

возвращает значение, которое вы хотите для VB, я предполагаю, что оно переносится на VBA.

В противном случае, вы можете использовать

CInt(Fix(number1/number2)) 

(от https://msdn.microsoft.com/en-us/library/xh29swte(v=vs.90).aspx)

Смежные вопросы