要用Inline 语句来实现：

    Dim n as string

    n = inputbox (“出现在inputbox上的话”)

    c.setattrib “answer” , n               …………建立answer变量，记录输入的答案

在inputbox之处，亦可用askbox 替代。