打印指定位置的文件

lanlow1

我要使用循环语句打印指定位置的文件，因此需要在shell中使用变量，不知道怎么设定。
1、在shell中使用变量，尤其是在“ ”中使用变量，怎么写？
2、怎么利用查询赋值给变量？



打印文件使用的是
Shell " mspaint.exe /p D:1\1.jpg", vbMaximizedFocus

文件的名称使用查询
select 配比送检编号 from QC01 WHERE ID = b

下列sub我不会写，麻烦大神给指导一下，谢谢！



Private Sub Command1_Click()
    Dim n, str1, a, b, c, d

    b = [Forms]![F351]![起始]
    c = [Forms]![F351]![扫描件位置]
    str1 = " 'select 配比送检编号 from QC01 WHERE ID ='  n+b-1"
    d = str1
   
    For n = 1 To 10
            Shell " 'mspaint.exe /p ' c  & d  '.jpg' ", vbMaximizedFocus
    Next
   
End Sub