小编dma*_*uca的帖子

我整天都在打这个.在我的styles.xml文件中,我有这样的颜色信息:

<fgColor theme ="0"tint =" - 0.249977111117893"/>

ECMA 376将主题颜色参考定义为:

索引到<clrScheme>集合,引用在Theme部分中表示的特定<sysClr>或<srgbClr>值.

好的,这听起来很容易.以下是我的clrScheme xml的摘录:

<a:clrScheme name ="Office">
<a:
dk1 > <a:sysClr val ="windowText"lastClr ="000000"/>
</ a:dk1>
<a:lt1>
<a:sysClr val ="window "lastClr ="FFFFFF"/>
</ a:lt1>

指数零是黑色,他们想要变暗吗？我可以告诉你,在应用色调后,颜色应为#F2F2F2.

我的困惑是主题="0"究竟意味着什么？它不可能意味着变暗#000000.检查MSDN只会让我更加困惑.来自http://msdn.microsoft.com/en-us/library/dd560821.aspx

请注意,主题颜色整数从调色板中从左到右开始从零开始计数.主题颜色3是深色2文本/背景颜色.

实际上,如果你从0开始计数,第三个条目是Light 2. Dark 2是第二个.这里的任何人都可以为我阐明这个问题吗？什么主题="0"真的意味着什么？

这是我一直在使用的VB6代码来应用色调.您可以将其粘贴到vba编辑器中并运行test子.

Public Type tRGB
    R As Byte
    G As Byte
    B As Byte
End Type

Public Type tHSL
    H As Double
    S As Double
    L As Double
End Type

Sub TestRgbTint()
    Dim c As tRGB
    RGB_Hex2Type "ffffff", c
    RGB_ApplyTint c, …

我对此有点困惑.我有一个这样的结构数据表:

表:数据

DataID    Val
1         Value 1
2         Value 2
3         Value 3
4         Value 4

然后我有另一个像这样的结构表:

表:表1

Col1    Col2
1       2
3       4
4       3
2       1

Table1中的两列都指向数据表中的数据.如何在查询中显示此数据？例如,一个返回此的查询:

查询:Query1

Column1    Column2
Value 1    Value 2
Value 3    Value 4
Value 4    Value 3
Value 2    Value 1

我对SQL很熟悉,可以用一个列进行连接,但是已经失去了.任何帮助表示赞赏.示例sql或要读取的内容的链接.谢谢!

PS:这是在sqlite中

我似乎对这个问题一无所知。我可以将 ADO 记录集附加到表单，但我不确定如何处理更新。我不想只使用 UpdateBatch，我希望能够检测出于日志记录目的而更改的内容。任何人都可以指出我正确的方向吗？

提供的 SQL 包含一个 Key 字段，它是一个名为“ID”的自动编号。

Private Sub Form_Load()
    Dim rst as Object
    Set rst = CreateObject("ADODB.Recordset")
    rst.CursorLocation = adUseClient
    '...edit out connection
    rst.Open sql, mConnection, adOpenStatic, adLockBatchOptimistic
    set rst.ActiveConnection = Nothing
    Set Me.Recordset =  rst
End Sub 

''Edit records on the form and now click save
Private Sub cmdSave_Click()
    Dim rst As Object
    Set rst = Me.Recordset
    Set rst.ActiveConnection = GetConnection
    rst.UpdateBatch
    'How do I detect deleted, added, or modified records for logging? 
End Sub