在易语言中连接数据库需要使用相关的数据库驱动程序，以下是一个简单的连接MySQL数据库的示例：
```vb
' 引用数据库驱动程序
$USE("e:\mylib\mysql\mysql.bas")
' 创建数据库连接
Dim conn As Mysql
' 初始化数据库连接
conn.Init("localhost", "root", "123456", "test", 3306)
' 连接数据库
If conn.Connect() Then
PrintLn "数据库连接成功"
Else
PrintLn "数据库连接失败"
End If
' 执行SQL语句
Dim sql As String
sql = "SELECT * FROM `user`"
If conn.Query(sql) Then
PrintLn "SQL语句执行成功"
Dim row As String
While conn.FetchRow(row)
PrintLn row
Wend
Else
PrintLn "SQL语句执行失败"
End If
' 关闭数据库连接
conn.Close()
```
在上述示例中，首先需要引用MySQL数据库驱动程序（mysql.bas），然后使用`Mysql`对象创建数据库连接，并通过`Init`方法设置连接参数，包括数据库地址、用户名、密码、数据库名和端口号。然后通过`Connect`方法连接数据库，连接成功时返回`True`，连接失败时返回`False`。然后可以使用`Query`方法执行SQL语句，并通过`FetchRow`方法逐行获取查询结果。最后使用`Close`方法关闭数据库连接。
