在窗体上建立名称为了ext1、Text2和Text3的三个文本框，其中Text1和Text2文本框用来接受两个整数(假设为M和N)，建立一个名称为Command1的命令按钮，单击它将得到数M从右边起的第N位数字，并把该数字显示在Text3文本框中，如图20-15如示。请填空。
Private Function digit(ByVal m As Integer，ByVal n As Integer)As Integer
Dim i As Integer
For i=1 To n-1
m=m\10
Next i
digit= 【11】
End Function
Private Sub Command1_Click()
Dim m As Integer，n As Integer，k As Integer
m=Val(Text1.Text)
n=Val(Text2.Text)
k= 【12】
Text3.Text=Str(k)
End Sub
