int CurrentPage;//當前頁數 int PageSize; //每頁條數 int PageCount; //總頁數 int RecordCount;//總條數 private void Page_Load(object sender, System.EventArgs e) { PageSize=16;
Dim cInvo_No As String Dim cSql As String Dim cRec As rdoResultset Dim s As String cInvo_No = Trim(FlexGrid.TextMatrix(FlexGrid.Row, 1)) cSql = " select A.cPact_No 合約號,A.cDate 交款日期,I.iAmount 交款金額 " _
開門見山的說,他們是不同類型的常量一,const是編譯時間常量,意思就是編譯的時候const聲明的對象值就已經確定了,如果這以後改了值不編譯的話值還是原來的值 說的有點拗口,看代碼 const int B = 6;//編譯, 然後你改成 const int B = 8;//不編譯 這時候其實B=6; 這個就是const編譯時間常量的意思 很顯然,readonly是運行時常量 static readonly int A =
解決這個問題,可以先看到Style (2--dropdown list)也就是說,給改控制項賦值時候是這樣賦的: cSql = "SELECT cType_Name FROM tbl_Abs_Net WHERE cType = 'UNDER' and iCount=1 " Set cRec = gData.OpenResultset(cSql, rdOpenKeyset) Do While cRec.EOF = False cmbUnder.AddItem
1,首先在工程---引用,需要引用Microsoft Internet Controls2,代碼如下: Dim myIE As New InternetExplorer '注意在代碼中添加這句引用 Dim itypeNo As String Dim i As Long itypeNo = "" itypeNo = FlexGrid.TextMatrix(FlexGrid.Row, 1) '10064-產品
Sub TreeFill3(cTime As String, ByVal cKey As String) Tree3.Nodes.Clear ' 迴圈填充tree1控制項內容 Dim c As String Dim cNode As Node Dim cSql As String Dim cRec As rdoResultset Dim cRec1 As rdoResultset Dim i As Integer cSql =