廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 3156 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
A-誠 手機
數位造型
個人文章 個人相簿 個人日記 個人地圖
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x0 鮮花 x19
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
[Basic] <求助>程式碼的問題 已解決
我是個初學者,這是我在練習時所遇到的問題
這個程式是用來計算正方形表面積和體積的
請問如何使用MsgBox輸出Print裡的東西呢?[內容要相同]
意思就是,我要把P ..

訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容



[ 此文章被A-誠在2005-05-18 23:37重新編輯 ]


獻花 x0 回到頂端 [樓 主] From:台灣中華電信 | Posted:2005-05-18 00:26 |
panasonic732 手機
個人頭像
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x2 鮮花 x30
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

Dim xlen, xarea, xcub As Integer
  xlen = InputBox("請輸入邊長:", "邊長", "")
  xarea = xlen ^ 2 * 6
  xcub = xlen ^ 3
  Print "正方形表面積="; xarea, "正方形體積="; xcub
  button = MsgBox("正方形表面積= " & xarea & " 正方形體積= " & xcub, vbInformation, "訊息")

變數=msgbox (主要內容,訊息方塊的樣式,抬頭列文字)
可省略 msgbox (主要內容)


憂慮不斷,心未寧靜
綿綿春雨,花失嬌艷
凋零磨滅,事情難回
得意失意,不再回想
放棄它吧,唯有如此
獻花 x0 回到頂端 [1 樓] From:台灣中華電信 | Posted:2005-05-18 18:41 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.058714 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言