Question

VB如何在多个文本框中选出最大的数字？ VB如何在文本框中只能输入数字，不接受其他字符？

1、比如写了6&7&8&9
让他选出输入9的文本框
2、我指的是不接受,而不是可以写入表示0！！！！
1个问题满意给5分
2个给10分

Answer 1

1.四个数据分别在Text(1)-text(4)四个文本框内
for I =1 to 4
if zuida<text(I) then zuida=text(i)
next
2 假定文本框名为text1
private sub text1_KeyPress(Asc As Integer)
if asc<49 or asc>57 then asc=0
end sub
说明：asc=0 并不是说输入为“0”，而是说“此次没有输入，程序不必反应”

追问

第一个问题能不能写在命令按钮内
8个文本框
第二个问题不行的

追答

1. Private Sub Command1_Click()
dim I as long,ZuiDa as long
for I =1 to 4
if zuida57) and asc 8 and asc9 and asc13 then asc=0
8为 del 9为 TAB 13为回车