Я не могу реализовать всю программу для вас, но я могу помочь вам с кодом, который вы опубликовали. Этот код предназначен для получения данных со значения MouseSpeed
ключа HKCU\Control Panel\Mouse
. У него две проблемы, первая из которых - неправильный путь к ключу. Вам нужно пространство между «Control» и «Panel». Вторая проблема заключается в том, что Sub
в VB - это функция, которая не возвращает значение. Вам необходимо создать Function
. Вот как это должно выглядеть:
Public Function getSpeedval()
Dim NewKey As RegistryKey = Registry.CurrentUser.OpenSubKey("Control Panel\Mouse", True)
Dim GetVal As String = NewKey.GetValue("MouseSpeed")
Return GetVal
End Function
, а затем вы можете вызвать его в Main
функции, как это:
Dim mouseSpeed = getSpeedval()
MsgBox("The value is " & mouseSpeed)
Вы можете использовать Sub
создать функцию, которая будет устанавливать новую скорость мыши, потому что он не должен возвращать значение:
Public Sub setSpeedval(newSpeed)
Dim NewKey As RegistryKey = Registry.CurrentUser.OpenSubKey("Control Panel\Mouse", True)
NewKey.SetValue("MouseSpeed", newSpeed)
End Sub
Вы можете использовать эту функцию в основном, как это:
setSpeedval("2")
Надеюсь, это поможет вам, чтобы вы могли завершить свою программу. Удачи!
EDIT:
Пожалуйста, не то, что вы должны использовать значение MouseThreshold1
и MouseThreshold2
, а не только MouseSpeed
.
Как вы можете рассчитывать на достижение этого, если не знаете? Нет никакого способа, чтобы кто-то мог просто дать вам полное пошаговое руководство для чего-то подобного? –
извините, сэр, только новичок, но вот код, который я пробовал, но он не работал, просто нужна помощь для моего проекта. – Jomar
ОК, я вижу, вы новичок на этом сайте и не знаете, как все работает здесь. Что вам нужно сделать, так это отредактировать свой вопрос. При редактировании добавьте код из комментария выше (код в комментариях трудно прочитать, вставьте код при редактировании вопроса, затем выберите код и нажмите Ctrl + K). Кроме того, дайте более подробное описание того, чего вы хотите достичь. Наконец, назовите программный язык, который вы используете, и добавьте его тег в вопрос. Больше людей попытаются помочь вам таким образом. –