发你了。
Private Sub Command1_Click()a = CInt(InputBox("输入0~10之间的数"))If a >= 0 And a <= 10 Then Print Choose(a + 1, "零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖", "拾")End Sub
c语言可以这样写：include main(){
额
