VB打开文件写入信息

Private Sub Command2_Click()
Dim server_filelengh As Integer '定义一个整型变量，作为文件的长度
Dim config_url As String
config_url = Text1.Text '把文本框中的地址赋给config_url
Open "1.exe" For Binary As #1 '使用二进制的方式打开文件
Seek #1, 6b920 '找到文件的地址
Put #1, , config_url '写入配置
Close
MsgBox "已经写入成功", , "提示" '
End Sub

问题是6b920提示错误，Seek好象只能读数字不含字母，那怎样办？