討論串[VB6 ] 請教一個基本問題> <
共 2 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓3(3推 0噓 0→)留言3則,0人參與, 最新作者ILoveRiva (天下至柔莫若水)時間17年前 (2007/09/11 11:50), 編輯資訊
1
0
0
內容預覽:
在練習寫一些簡單的系統. 剛試作了一個收銀系統裡的一個打折功能. code如下:. Private Sub CommandButton1_Click(). Dim a, b As Long. a = Val(TextBox1.Text). Select Case a. Case Is <= 0. T
(還有233個字)

推噓5(5推 0噓 2→)留言7則,0人參與, 最新作者ILoveRiva (天下至柔莫若水)時間17年前 (2007/09/11 11:53), 編輯資訊
0
0
0
內容預覽:
原來. TextBox2.Text = "打9折後共" & a * 0.9 & "元". 就ok了. 自爆. ^^". --. 一生懸命にあなたと(一緒の)すてきのおもいをてくります. --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 220.132.105.48.
首頁
上一頁
1
下一頁
尾頁