VPF::время нажатия на каждую клавишу

fanmagg

Дата 24.5.2015, 18:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 24.5.2015

Репутация: нет
Всего: нет

Здравствуйте, нужна ваша помощь!
Есть фраза, которую пользователь вводит в текстовое поле, необходимо посчитать в секундах время нажатия на каждую клавишу и время ее удержания и записать результат в массив.

Подскажите, пожалуйста, каким образом это осуществить?

fanmagg

Дата 24.5.2015, 20:14 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 24.5.2015

Репутация: нет
Всего: нет

Код


 Private Sub TextBox1_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
        If e.KeyCode = Keys.N Then
            t1 = TimeOfDay.Millisecond
        End If
    End Sub

Но выдает постоянно результат 0, как исправить ?

fanmagg

Дата 24.5.2015, 20:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 24.5.2015

Репутация: нет
Всего: нет

Код


Public Class Form1
    Dim t1, t2, t3 As Date
    Dim i As Integer


    Private Sub TextBox1_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
        If e.KeyCode = Keys.N Then
            t1 = Now

        End If
    End Sub

    Private Sub TextBox1_KeyUp(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyUp
        If e.KeyCode = Keys.N Then
            t2 = Now
            'e.Handled = True
        End If
    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        i = 0
        If TextBox1.Text = "тестова фраза" Then i = i + 1
        Label1.Text = Str(i)


        Label2.Text = CStr(t2.Millisecond - t1.Millisecond)
    End Sub
End Class

этот код рабочий, но считает только конкретно милисекунды, как его можно офрмить чтобы брались для разницы милисекунды и секунды вместе?

Akina

Дата 24.5.2015, 21:49 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20570
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 1
Всего: 453

Ну вот как можно программировать, если даже не знаешь, какой язык программирования используешь?
Перенесено...

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

diadiavova

Дата 25.5.2015, 12:47 (ссылка)

(нет голосов)

Загрузка ...

Доктор Зло(диагност, настоящий, с лицензией и полномочиями)

Профиль
Группа: Модератор
Сообщений: 5820
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142

Цитата(fanmagg @ 24.5.2015, 20:32

)

как его можно офрмить чтобы брались для разницы милисекунды и секунды вместе?

Миллисекунды переводятся в секунды путем деления на 1000. Если делить с остатком, то результат деления - это секунды, а остаток - оставшиеся миллисекунды.

--------------------

Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB .NET \| Следующая тема »