Basic是壹種計算機語言，是初學者通用指令代碼的縮寫。可以說是為初學者設計的語言。
當然，我是學了VB才知道代碼的。雖然代碼是英文的，但是還是比較簡單的。畢竟這種語言是為初學者設計的。
下面是壹個計算器的程序代碼，只能進行加、減、乘、除、余數的運算，就不詳細解釋了。
選項？明確的
私人？Sub？Command1_Click()
文本2。文字？=?Text1。文本
短信3。文字？=?"+"
Text1。文字？=?""
Text1。SetFocus
結束？潛水艇
私人？Sub？Command2_Click()
文本2。文字？=?Text1。文本
短信3。文字？=?"-"
Text1。文字？=?""
Text1。SetFocus
結束？潛水艇
私人？Sub？Command3_Click()
文本2。文字？=?Text1。文本
短信3。文字？=?"*"
Text1。文字？=?""
Text1。SetFocus
結束？潛水艇
私人？Sub？Command4_Click()
文本2。文字？=?Text1。' Text '文本2中的文本等於文本1中的文本。
短信3。文字？=?"/"?文本3的內容更改為“/”
Text1。文字？=?" " '明文1
Text1。SetFocus？壹旦文本獲得焦點。
結束？潛水艇
私人？Sub？Command5_Click()
暗淡？答？作為？“Double”將定義為雙精度。
選擇？案子？短信3。文字？判斷課文3的內容。
案子？"+"?如果是“+”
答？=?Val(文本2。正文)？+?Val(Text1。Text)'然後text1加上text2，其值被賦給壹個。
Text1。文字？=?答？將分配給文本1
案子？"-"?如果是“-”
答？=?Val(文本2。正文)？-?Val(Text1。Text)'然後text1減去text2，其值被賦給。
Text1。文字？=?答？將分配給文本1
案子？"*"?如果是“*”
答？=?Val(文本2。正文)？*?Val(Text1。Text)'將text1乘以text2，其值賦給。
Text1。文字？=?答？'
案子？"/"?如果是“/”
答？=?Val(文本2。正文)？/?Val(Text1。Text)'將text1除以text2，其值賦給。
Text1。文字？=?答？'
案子？"\"?如果是“\”
答？=?Val(文本2。正文)？\?Val(Text1。Text)'那麽text1可被text2整除，其值賦給a。
Text1。文字？=?答？'
案子？“Mod”？如果是“Mod”
答？=?Val(文本2。正文)？Mod？Val(Text1。正文)？文本1除以文本2得到余數，其值賦給。
Text1。文字？=?壹個
結束？選擇‘結束判斷’。
結束？潛水艇
私人？Sub？Command6_Click()
文本2。文字？=?Text1。文本
短信3。文字？=?"\"
Text1。文字？=?""
Text1。SetFocus
結束？潛水艇
私人？Sub？Command7_Click()
文本2。文字？=?Text1。文本
短信3。文字？=?" Mod "
Text1。文字？=?""
Text1。SetFocus
結束？潛水艇
私人？Sub？CXDM_Click()
表格2。顯示
結束？潛水艇
如果妳開始，我可以建議妳讀壹下嗎？洪恩的創世紀5編程入門，裏面有VB(入門)，那妳可以找別的教程。創世紀電驢是個好東西，我的很多教程，資料，素材都在裏面找到了...