我在编一个小键盘,在触摸聘上使用,用于代替普通键盘上的数字键。
现在我用一个text1显示数字是没问题可是现在在这个窗口中有大概三个text
都要求用这的数字键盘现在我弄不明白怎么指定command的方向部分代码如下
Private Sub command1_click(i As Integer)Dim X, Y As IntegerFor X = 0 To 10
If Command1(i).Index = X Then
Text1.Text = Text1.Text + Command1(i).CaptionEnd If
Next X
End Sub希望各位高手帮忙!!!!!
现在我用一个text1显示数字是没问题可是现在在这个窗口中有大概三个text
都要求用这的数字键盘现在我弄不明白怎么指定command的方向部分代码如下
Private Sub command1_click(i As Integer)Dim X, Y As IntegerFor X = 0 To 10
If Command1(i).Index = X Then
Text1.Text = Text1.Text + Command1(i).CaptionEnd If
Next X
End Sub希望各位高手帮忙!!!!!
n = index
end subprivate sub command1_click(index as intefer)
text1(n).text = text1(n).text & command1(index).caption
end sub