Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long
Dim s As String
If TargetColumn = 2 And TargetCount = 1 Then' 指定B列任意一个单元格输入
s = TargetValue
With Sheet2
For i = 1 To Range("B65536")End(xlUp)Row'从表2第1行循环到B列最后一个非空行号
If Cells(i, 2) = s Then
Rows(i)InteriorColorIndex = 3‘找到行红底
Else
Rows(i)InteriorColorIndex = 0'不符合的无底色
End If
Next
End With
End If
End Sub
<%@ page contentType="text/html;charset=gb2312" import="javasql"%>
<html>
<head>
<title></title>
</head>
<body>
<hr>
<%
try{
ClassforName("commysqljdbcDriver")newInstance();
String url="jdbc:mysql://localhost:3307/test";
String user="root";
String password="";
Connection conn=DriverManagergetConnection(url,user,password);
Statement stmt=conncreateStatement(ResultSetTYPE_SCROLL_SENSITIVE,ResultSetCONCUR_UPDATABLE);
String sql="select from test";
ResultSet rs=stmtexecuteQuery(sql);
%>
<table><tr bgcolor=green><th>id</th><th>name</th><th>ifpass</th></tr>
<%
while(rsnext())
{
if(rsgetObject("ifpass")equals("y"))
{
outprintln("<tr bgcolor=blue>");
}else{
outprintln("<tr bgcolor=red>");
}
%>
<td> <%=rsgetObject("id")%> </td>
<td> <%=rsgetObject("name")%> </td>
<td> <%=rsgetObject("ifpass")%> </td>
</tr>
<%
}
outprintln("</table>");
rsclose();
stmtclose();
connclose();
}
catch(ClassNotFoundException e)
{
outprintln("驱动程序类异常!<br>");
outprintln(egetMessage());
}
catch(SQLException e)
{
outprintln("数据库连接或SQL查询异常!<br>");
outprintln(egetMessage());
}
catch(Exception e)
{
outprintln("其他异常!<br>");
outprintln(egetMessage());
}
%>
</body>
</html>
数据库为MYSQL
CREATE TABLE test
(
id int(4) not null,
name char(10),
ifpass char(1)
)character set gbk;
insert into test values(1,"aaa",'y');
insert into test values(2,"bbb",'n');
insert into test values(3,"ccc",'n');
insert into test values(4,"ddd",'y');
您是想问gis保存到数据库后颜色没变怎么办吗？gis保存到数据库后颜色没变点击图层的颜色。gis保存到数据库后颜色没变解决方法
1、首先在ArcGIS中作图的时候，点击图层的颜色，会跳出以下符号选择器。
2、其次点击右侧修改我们需要的属性，鼠标图层右键，选择属性，跳出图层属性框。点击导入符号系统，选择已经设置好的图层。
3、最后在导入新图层后出现选择颜色，点击不改变。即可解决。
excel单元格显示数据库中查询内容解决方法：打开要查找的表格，选择要查找的范围，显示加深颜色。
1、选择菜单栏上面的排序和筛选，在下拉选项里选择筛选。
2、第一行的标题旁边都有个下拉小箭头，点击按钮。
3、在d出的对话框中选择相应的功能即可查询内容。
以上就是关于EXCEL如何用VBA设定SHEET1输入文字，在SHEET2数据库里自动查找并标颜色全部的内容，包括:EXCEL如何用VBA设定SHEET1输入文字，在SHEET2数据库里自动查找并标颜色、如何设置从数据库中都出来的文字的颜色(jsp)、gis保存到数据库后颜色没变等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）