在Visual FoxPro （VFP） 中，主程序和子程序的编写方法如下：
主程序
主程序是程序的入口点，通常是项目的第一个运行程序。
在VFP中，主程序文件通常命名为 `main.prg`。
主程序包括基本参数设置、共有变量初始化、共用函数定义等。
编写主程序时，可以使用标准的VFP语法和结构，如 `DO WHILE`、`FOR` 循环、`IF` 条件语句等。
项目编译运行时，VFP会先启动主程序，然后根据主程序中的代码调用其他程序。
子程序
子程序是一个相对独立的程序段，通常被其他程序调用，一般不单独执行。
在VFP中，子程序可以通过 `PROCEDURE` 或 `FUNCTION` 语句定义。
子程序的调用格式有两种：
1. `DO [WITH] 子程序名`
2. `（[表达式表]）`
子程序文件可以作为一个单独的命令文件存在，也可以放在主程序的后面。在主程序里调用时，需要先使用 `SET PROCEDURE TO` 命令将子程序文件调入内存。
子程序的具体实现可以根据功能需求选择不同的编程语言来编写，但通常建议保持子程序的实现简洁明了，符合单一职责原则。
示例代码
主程序示例 （`main.prg`）
```foxpro
* 主程序入口点
SET TALK OFF
SET ESCAPE OFF
* 初始化环境
CLOSE ALL
CLEAR Menus
SET Sysmenu Save
SET Sysmenu Off
SET Sysmenu To
* 设置环境
SET DATE ANSI
SET DECIMALS TO 8
SET NULL ON
SET NullDisplay To ''
* 运行主程序逻辑
DO form frmbegin
READ events
DO form frmlogin
ENDDO
```
子程序示例 （`sum.prg`）
```foxpro
* 子程序：计算两个数的和
PROCEDURE SUM
PARAMETERS x, y
s = x + y
RETURN s
ENDPROC
```
调用子程序
在主程序中调用子程序：
```foxpro
* 调用子程序并获取结果
SET result = SUM(100, 200)
? "两数之和为: " + result
```
通过上述步骤和示例代码，你可以在VFP中编写主程序和子程序，并实现模块化的程序设计。
