帮我看段程序！

Question

Private Sub Command4_Click()
    Dim c1, c2
    Dim p(1 To 2) As Byte
    Dim rec As Integer
    Dim Location As Long
    Dim HzFile As String
    Dim Hz(0 To 31) As Byte
    
    c1 = CLng(Text2.Text)    c2 = CLng(Text3.Text)    rec = c1 * 94 + c2    Location = CLng(rec) * 32 + 1 '该汉字在16*16点阵字库中字模第一个字节的位置    HzFile = App.Path + "\" + "hzk16"    Open HzFile For Binary Access Read As #1 '读取该汉字在16点阵字库中的原始字模    Get #1，Location，Hz    Close #1
End Sub
提示 Get #1，Location，Hz 有语法错误，不知道哪里错了，请各位执教

Answer 1

Dim Hz(0 To 31) As Byte
    

Answer 2

根据俺的复制粘贴，发现你的
Get #1，Location，Hz 这句的 "，"有问题，它应该是","