Es lo mismo que tu funcion de crear input, basicamente necesitas un ciclo for, yo haria una subrutina y no una funcion pues en teoria solo escribe codigo, no regresa un valor:
Código:
Sub CrearTabla(filas, columnas)
Response.Write("<table>")
for i = 1 to filas
Response.Write("<tr>")
for j = 1 to columnas
Response.Write("<td></td>")
next
Response.Write("</tr>")
next
Response.Write("</table>")
End Sub
Ahi esta la idea, ahora, dentro de esa misma sub, puedes llamar a tu funcion para escribir los campos necesarios y quizas necesites otra para textos.
Saludos