请教在VB6.0中如何定义一个数据库（ORC1）和如何设置使一TEXTBOX中只能输入数字或字母和破折号呢？谢谢！

[tallboylq]

请教数据库的定义语句是什么？如　DIM　DATA1　AS　NEW　？
　　及请教对数据库的查寻和录入应用什么方法，如模块或别的？
　　另想请教对一文本框中输入的内容限定只能为数字、字母和破折号该怎么编辑呢，敬请举一例好吗？

　　祝愉快！

[luchunhua]

定义语句：dim data1 as New ADODB.Recordset
对文本框中输入入的内容限定只能为数字、字线和破折号：只要在此text的KeyPress事件中限定KeyAscii的范围（数字KeyAscii>=48 and KeyAscii<=57）

[lincanwen]

在SQL中数据库中定义变量：declare @变量名 as 变量类型和长度

[gxingmin]

'第二个问题
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii <> 8 And KeyAscii <> 45 And KeyAscii < 48 Or KeyAscii > 57 And KeyAscii < 65 Or KeyAscii > 90 And KeyAscii < 97 Or KeyAscii > 122 Then
Beep
KeyAscii = 0
End If
End Sub

[gxingmin]

'第一个问题：
dim conn as new adodb.connection
dim rs as new adodb.recordset