作者xtimer ()
看板Visual_Basic
標題[問題] 有關vb2005 類別與繼承的問題
時間Sun May 4 21:20:59 2008
版本:
VB2005
問題:
想用vb
寫出可輸入姓名與薪水的表格
以下是目前寫出的
Class Emplyee
Public Ename As String
Public Salary As Integer
Sub Emplyee()
End Sub
Sub Emplyee(ByVal a As String, ByVal b As Integer)
Ename = a
Salary = b
End Sub
Public Sub PrintData()
Console.WriteLine("員工姓名：" & Ename & vbTab & "員工薪水：" & Salary)
End Sub
Public Sub ShowError()
Console.WriteLine("新水必須介於20000到40000之間")
End Sub
End Class
Module module1
Sub main()
Dim ko1 As Emplyee = New Emplyee()
Console.Write("請輸入員工姓名 = ")
ko1.Ename = Console.ReadLine
L1: Console.Write("請輸入員工薪水 = ")
ko1.Salary = Console.ReadLine
If ko1.Salary < 20000 Or ko1.Salary > 40000 Then
ko1.ShowError()
GoTo L1
End If
ko1.PrintData()
Console.ReadLine()
End Sub
End Module
目前是可以輸入一人的姓名與薪水
然後馬上列出表格
請問該怎麼修改
才能一直無上限的輸入
最後再用一個指令
一次列出之前所輸入的資料呢?
目前想到的是用ko(x)
然後輸入一次 x = x +1 無限迴圈
一直到輸入某指令令它跳出迴圈
但似乎ko(x)不能這樣用...系統好像會自動判定它是陣列
而不會把x只當數字用?
請問是我哪裡錯了嗎
還是有另外正確的寫法呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.143.63.12
※ 編輯: xtimer 來自: 220.143.63.12 (05/04 21:21)