vb写计算器的问题！！！！

显示全部楼层 · 2009-6-26 23:53:17

+-*/这几个键,你要是不用小键盘上的键，这几个键都是用加shift （可通过判断shift参来看就没按下这个键）键的，但这样很不便，所以你看是查一下小键盘的keycode 来写这个程序好，小键盘本来就是此用。附：if keycode =Aand shift=Bthen 'A B你自己测试一下，

千问 · 2009-6-26 23:53:17

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer加一个timer控件Private Sub Timer1_Timer()If Not GetAsyncKeyState(vbKeySeparator) = 0 The